20221115 빅데이터&AI(머신러닝,딥러닝)인공지능

첨부파일 1115_training.R 파일 다운로드 # xgboos # 1단계: 패키지 설치 install.packages("xgboost") library(xgboost) # 2단계: y변수 생성 iris_label <- ifelse(iris$Species == 'setosa', 0, ifelse(iris$Species == 'versicolor', 1, 2)) table(iris_label) iris$label <- iris_label # 3단계: data set 생성 idx <- sample(nrow(iris), 0.7 * nrow(iris)) train <- iris[idx, ] test <- iris[-idx, ] # 4단계: matrix 객체 변환 train_mat <- as.matrix(train[-c(5:6)]) dim(train_mat) train_lab <- train$label length(train_lab) # 5단계: xgb.DMatrix 객체 변환 dtrai...