데이터 프레임의 행을 샘플링하고 선택하지 않은 행을 저장

Question

데이터 프레임에서 임의로 행을 선택하려고합니다. 그러나 나는 또한 선택하지 않은 것들이 필요하다. 나는 다음과 같이 진행했다.

#grades is data with size 100 
half-grades = grades[sample(nrow(grades), 50), ] 

선택하지 않은 것들은 어떻게 저장합니까?

Answer 1

50 %로 분할하려고한다고 가정하면 코드는 다음과 같습니다.

library(caTools) 
split = sample.split(grades,SplitRatio=0.5) 
half-grades1 = subset(grades, split == TRUE) 
half-grades2 = subset(grades, split == FALSE) 

Answer 2

이것은 쉽게 caret::createDataPartition()으로 수행됩니다.

library(caret) 
theIndex <- createDataPartition(grades, p = .50,list=FALSE) 
sampled <- grades[theIndex,] 
notSampled <- grades[-theIndex,] 

Answer 3

set.seed(1234) 
half-grades=grades[-(sample(nrow(grades), 50)), ]