메뉴 건너뛰기

웹에서 하는 R 통계

Web-R과 R에서 logistic regression을 한 값이 다르게 나옵니다.
R과 SPSS에서 돌린 거의 같습니다.

1. R로 돌린 값입니다.
> result <-glm(AE_90D~age+sex+IHD+HF+BA2+FEV1+Home_O2+CRP, family=binomial, data=AE)
> reduced.model2=step(result)
Start:  AIC=85.32
AE_90D ~ age + sex + IHD + HF + BA2 + FEV1 + Home_O2 + CRP

          Df Deviance    AIC
- IHD      1   67.378 83.378
- CRP      1   67.678 83.678
- sex      1   68.143 84.143
- age      1   68.429 84.429
<none>         67.316 85.316
- Home_O2  1   69.693 85.693
- FEV1     1   70.795 86.795
- BA2      1   70.820 86.820
- HF       1   70.858 86.858

Step:  AIC=83.38
AE_90D ~ age + sex + HF + BA2 + FEV1 + Home_O2 + CRP

          Df Deviance    AIC
- CRP      1   67.707 81.707
- sex      1   68.238 82.238
- age      1   68.541 82.541
<none>         67.378 83.378
- Home_O2  1   69.731 83.731
- BA2      1   70.833 84.833
- FEV1     1   70.849 84.849
- HF       1   71.261 85.261

Step:  AIC=81.71
AE_90D ~ age + sex + HF + BA2 + FEV1 + Home_O2

          Df Deviance    AIC
- sex      1   68.661 80.661
- age      1   68.869 80.869
<none>         67.707 81.707
- Home_O2  1   70.545 82.545
- FEV1     1   70.897 82.897
- BA2      1   71.099 83.099
- HF       1   71.877 83.877

Step:  AIC=80.66
AE_90D ~ age + HF + BA2 + FEV1 + Home_O2

          Df Deviance    AIC
- age      1   69.326 79.326
<none>         68.661 80.661
- FEV1     1   71.177 81.177
- BA2      1   71.417 81.417
- Home_O2  1   72.511 82.511
- HF       1   73.026 83.026

Step:  AIC=79.33
AE_90D ~ HF + BA2 + FEV1 + Home_O2

          Df Deviance    AIC
<none>         69.326 79.326
- FEV1     1   72.081 80.081
- BA2      1   72.483 80.483
- Home_O2  1   73.297 81.297
- HF       1   73.298 81.298
> extractOR(reduced.model2)
              OR  lcl   ucl      p
(Intercept) 0.48 0.06  3.66 0.4750
HFYes       7.04 1.03 49.27 0.0415
BA2Yes      3.30 0.89 14.08 0.0837
FEV1        0.29 0.05  1.23 0.1195
Home_O2Yes  5.69 1.03 35.40 0.0497


그런데 Web-R로 돌린 값은 아래와 같습니다.

(Intercept)0.11400.89300.130.89841.120.206.87
FEV1-1.31180.7604-1.730.08450.270.051.07
Home_O2Yes1.15930.78891.470.14173.190.6715.77


p-value threshold entering multiple regression가 달라서 그런가 해서 0.1로 바꿔봤는데, 변화가 없습니다.

논문 몇개를 Web-R로 logistic regression을 했는데 맨붕이 되었습니다.

도와주셨으면 합니다. ㅜㅜ

(파일 첨부했습니다.)


감사합니다.


번호 제목 글쓴이 날짜 조회 수
120 비교분석 [2] secret dkdnqk 2017.08.19 4
119 선생님께 [1] yjinchunmd 2017.07.26 235
118 성향점수분석에서 caliper 설정 [1] alse 2017.06.20 272
117 교수님 추후 강의일정이 있으신가요? [1] 멋진남자 2017.06.20 558
116 데이터 업로드 관련 문의드립니다. [2] secret 통계 2017.06.16 5
115 실험 동물 실험에서 Web R 등의 접근을 통한 통계 처리를 여쭙고자 합니다. [1] secret 에구머니나 2017.06.05 3
114 데이터 upload가 제한이 있습니다. [1] secret bogam 2017.06.05 4
113 반복측정 분산분석에서 [2] secret 김날 2017.05.07 7
112 몇 가지 궁금한 점이 있어요........선생님...... [3] secret 에구머니나 2017.04.26 4
111 샤이니 대시보드 관련입니다. [1] secret 아리스도 2017.04.25 6
110 통계 작업 중에 몇 가지 궁금한 점이 있어서 글을 올립니다. [4] secret 에구머니나 2017.04.24 6
109 문건웅 교수님, 인사가 많이 늦어서 죄송합니다. [3] secret 스튜던트 2017.04.23 2
108 웹 3.0 에서 survival 분석 할때 자꾸 server 에러나는경우 [1] file 김날 2017.04.18 389
107 Learn ggplot2 using shiny app file cardiomoon 2017.04.16 188
106 JS error message [1] file cardiomoon 2017.04.04 125
105 책 "웹에서 클릭만으로 하는 R통계분석" 을 시작해 본다... [1] sasRspss 2017.04.03 249
104 웹R을 보기 시작했습니다... 꾸뻑 [1] sasRspss 2017.04.03 547
103 3/31 운영진 모임 [1] file cardiomoon 2017.03.31 131
102 정말로 잘 만들어 놓으셨네요. [1] secret 에구머니나 2017.03.27 5
101 공동연구진 지원 [1] secret NZ특파원 2017.03.25 3