set.seed(123). > test_index <- sample(1:n,test_n). > test_data <- iris[test_index,]. > train_index <- seq(n)[-test_index].
確定! 回上一頁