Skip to menu

변수 넣고 빼기

Yoonida 2018.11.01 16:15 Views : 200

credit$default <- factor(credit$default)

credit_rand <- credit[,c(3, 4, 5, 7,8,9,10,11,12)]

credit_train <- credit_rand[1:7000,]
credit_test <- credit_rand[7001:10000,]

credit_train_labels <- credit[1:7000, 25]
credit_test_labels <- credit[7001:10000, 25]

prop.table(table(credit_train_labels))
prop.table(table(credit_test_labels))


credit_classifier <- naiveBayes(credit_train, credit_train_labels)
credit_classifier

credit_test_pred <- predict(credit_classifier, credit_test)
credit_test_pred

CrossTable(credit_test_pred, credit_test_labels,
           prop.chisq = FALSE, prop.r = FALSE, prop.t = FALSE, 
           dnn = c('predicted', 'actual'))

이걸 해보는데요, credit_rand <- credit[,c(3, 4, 5, 7,8,9,10,11,12)]이 부분에서 변수 9개를 빼거나 해서 만들 수 있는 모든 조합을 
자동으로 실행 시켜볼 수는 없나요??
예를 들어 3열만 빼고 나머지 다쓰고, 4열만 빼고 나머진 넣고 하는 식으로요..
I want to
List
No. Subject Author Date
754 반복 측정한 자료에서 증가한 비율의 차이가 두 집단간에 유의하게 다른지 알아보려고 합니다. 렁닥 2018.09.20
753 data 전처리 관련 질문입니다.. [1] file 망고링고 2018.09.22
752 통계 초보가 효과 크기에 대해 질문드립니다. 상냥한펭귄씨 2018.10.01
751 R studio에서 data import 관련하여 문의드립니다. Jun 2018.10.04
750 Univariate and Multiple Logistic Regression: predictor의 선택 file 신희순 2018.10.04
749 Enter calculcation equation을 넣는 형식 신희순 2018.10.04
748 로지스틱 회귀분석 김밥친구 2018.10.04
747 교수님, 질문 드립니다. kjg 2018.10.06
746 메타분석 출간오류에 대하여 문의드립니다. file 노을 2018.10.14
745 교수님! cox 회귀분석 큐빅 스플라인 그래프 작성 질문드립니다! [1] susan 2018.10.15
744 출간올유 funnel plot 에 대해서 [2] file 노을 2018.10.15
743 boxplot 질문드립니다. [2] file jjunglammy 2018.10.17
742 결측치 메우는 방법 문의 [1] 김태오 2018.10.19
741 생존분석 error file gracehn 2018.10.25
740 다변량 분석 결과 작성시 기술방법에 대하여 질문 드립니다. [2] drted 2018.10.26
739 ggplot에서 y axis limit정하는 방법 여쭙니다. [2] fascinate23 2018.10.26
738 메타분석 문의 [1] secret Maruya 2018.10.29
737 교수님..ggBar를 시행하면 계속 에러메시지가 뜹니다..? [4] file 스튜던트 2018.10.30
» 변수 넣고 빼기 [1] Yoonida 2018.11.01
735 ROC 커브 관련 질문 [2] PedEndo 2018.11.02
Write Tag