Skip to menu

회귀모형 자동해석

cardiomoon 2020.03.08 22:25 Views : 446

안녕하세요? 문건웅입니다. 이번에 웹R프로그램을 대대적으로 다시 짜고 있습니다. 프로그램을 손보는 김에 우선 회귀모형에 대한 설명을 해주는 함수를 만들어 보았습니다. 제가 영어도 짧고 통계가 전공이 아니어서 오류가 있을까 걱정됩니다. 한번 보시고 평가해주시면 고맙겠습니다. 

Loading the packages

library(webrSub)
library(predict3d)

Simple linear regression

fit=lm(mpg~wt,data=mtcars)
ggPredict(fit)

cat(result=explain(fit))
The predictor variable 'wt' accounts for 75.28 % of the total variation of your dependent variable 'mpg'. Your R^2 is quite good. The coefficient for 'wt' is smaller than zero. This means that the value of your dependent variable 'mpg' decreases by 5.34 for any increase of 1 in your independent variable 'wt'. The coefficient is  significantly different from zero(p< 0.001). The predicted value of dependent variable 'mpg' is calculated by the equation: '37.29 - 5.34*wt'.

Polynomial regression

fit=lm(mpg~wt+I(wt^2),data=mtcars)
ggPredict(fit)

cat(explain(fit))
The predictor variables 'wt','I(wt^2)' account for 81.91 % of the total variation of your dependent variable 'mpg'. Your R^2 is quite good. The coefficient for 'wt' is  significantly different from zero(p< 0.001) The coefficient for 'I(wt^2)' is  significantly different from zero(p =0.003) The predicted value of dependent variable 'mpg' is calculated by the equation: '49.93 - 13.38*wt + 1.17*I(wt^2)'.

Multiple linear regression

fit=lm(mpg~hp+wt+am,data=mtcars)
ggPredict(fit)

cat(explain(fit))
The predictor variables 'hp','wt','am' account for 83.99 % of the total variation of your dependent variable 'mpg'. Your R^2 is quite good. The coefficient for 'hp' is smaller than zero. This means that the value of your dependent variable 'mpg' decreases by 0.037 for any increase of 1 in your independent variable 'hp', if 'wt','am' remain(s) constant. The coefficient is  significantly different from zero(p< 0.001), controlling for the other variable(s). The coefficient for 'wt' is smaller than zero. This means that the value of your dependent variable 'mpg' decreases by 2.88 for any increase of 1 in your independent variable 'wt', if 'hp','am' remain(s) constant. The coefficient is  significantly different from zero(p =0.004), controlling for the other variable(s). The coefficient for 'am' is larger than zero. This means that the value of your dependent variable 'mpg' increases by 2.08 for any increase of 1 in your independent variable 'am', if 'hp','wt' remain(s) constant. The coefficient is  not significantly different from zero(p =0.141) suggesting that 'am' and 'mpg' are not linearly related when controlling for other predictor variable(s). The predicted value of dependent variable 'mpg' is calculated by the equation: '34.00 - 0.04*hp - 2.88*wt + 2.08*am'.

Multiple linear regression with interaction

fit=lm(mpg~hp*wt,data=mtcars)
ggPredict(fit)

cat(explain(fit))
The predictor variables 'hp','wt' and the interaction 'hp:wt' account for 88.48 % of the total variation of your dependent variable 'mpg'. Your R^2 is quite good. The interaction between 'hp' and 'wt' is significant. This means that the relationship between one predictor and the response variable depends on the level of the other variable(s). Here it means that the relationship between 'mpg' and 'hp' varies by 'wt'. The predicted value of dependent variable 'mpg' is calculated by the equation: '49.81 - 0.12*hp - 8.22*wt + 0.03*hp*wt' which simplifies to '49.81 - 8.22*wt + (-0.12 + 0.03*wt)*hp'. If 'wt' is 2.24, the value of your dependent variable 'mpg' decreases by 0.058 for any increase of 1 in your independent variable 'hp' If 'wt' is 3.22, the value of your dependent variable 'mpg' decreases by 0.031 for any increase of 1 in your independent variable 'hp' If 'wt' is 4.2, the value of your dependent variable 'mpg' decreases by 0.0033 for any increase of 1 in your independent variable 'hp'
No. Subject Author Date
» 회귀모형 자동해석 cardiomoon 2020.03.08
833 샤이니 앱에서 SQL 명령어 사용 방법 [2] 김브링이 2015.05.06
832 설명 변수 고르기에 대해서.. [2] 짱이야 2018.05.25
831 ROC 커브에 대한 다른 질문입니다. [1] file Victo 2016.01.15
830 ROC 커브 분석에 대하여 문의 드립니다. [1] DOC 2020.10.23
829 교수님, 맥에서 R studio 설치해서 엑셀을 불러오는데 어려움이 있습니다. [1] hslee0511 2022.01.12
828 안녕하세요 교수님. PSM 2:1 matching 방법 질문드립니다.. [7] 깔끔한성격 2020.09.23
827 케이스 선택에 관하여 질문이 있습니다.. [1] selteen 2017.05.02
826 교수님, 메타분석에 대한 질문 몇가지 올립니다. SOL 2017.10.26
825 Web으로 하는 R meta 서비스는 더 이상 안하는 건가요? [1] 묵사마 2020.04.09
824 Box plot 그래프를 그리고 싶은데요. [2] file 알은어려워 2018.12.25
823 SEM에서 path analysis후 moderation effect보는 과정에 대해 여쭙습니다. [2] fascinate23 2018.01.26
822 heatmap [2] zkbi 2020.05.26
821 PSM의 matching 방법 기술에 대한 질문입니다. [1] ng2o321 2020.12.01
820 mytable(), mytable2()관련 질문이 드립니다. [1] file 닉네임은별명 2021.08.03
819 성향점수분석에서 caliper 설정 [1] alse 2017.06.20
818 ROC curve 수정 관련해서 문의드립니다. [2] file hamdgogo 2020.05.01
817 생존분석에서 생존표... [2] 파랑파랑하늘 2016.08.02
816 knit PDF 및 ztable에서 표 출력에 대하여 질문드립니다. [5] file zepiros15 2018.12.22
815 데이타 업로드후 작업이 안됩니다. T.T [1] 유로정 2016.04.22