R 로지스틱회귀분석 (분류)

Jmnote bot (토론 | 기여)님의 2020년 11월 15일 (일) 01:10 판 (봇: 자동으로 텍스트 교체 (-</source> +</syntaxhighlight>, -<source +<syntaxhighlight ))
(차이) ← 이전 판 | 최신판 (차이) | 다음 판 → (차이)
  다른 뜻에 대해서는 R 로지스틱회귀분석 문서를 참조하십시오.
  다른 뜻에 대해서는 R 로지스틱회귀분석 (분류) 문서를 참조하십시오.

1 개요[ | ]

R 로지스틱회귀 분류

2 예시 1: 공부시간과 합격확률[ | ]

df = data.frame(
  Hours = c(0.50,0.75,1.00,1.25,1.50,1.75,1.75,2.00,2.25,2.50,2.75,3.00,3.25,3.50,4.00,4.25,4.50,4.75,5.00,5.50),
  Pass = c(0,0,0,0,0,0,1,0,1,0,1,0,1,0,1,1,1,1,1,1)
)
library(caret, quietly=T)
idx = createDataPartition(df$Pass, list=F, p=0.8)
Train = df[ idx,]
Test  = df[-idx,]

options(echo=T)
model = glm(Pass ~ ., data=Train, family="binomial")
Test$Pass_predicted = ifelse(predict(model,Test)>0.5,1,0)
print( Test )
cat( "accuracy=", sum(Test$Pass==Test$Pass_predicted)/nrow(Test) )

3 같이 보기[ | ]