728x90

iris

ran1 <- sample(150,50)    # 1부터 150까지 숫자를 이용하여 50개의 난수를 발

iris[ran1,]                       # 50개의 난수에 해당되는 관측치를 추출

 

sample(10)     # 1~10까지 숫자를 이용 샘플 10

sample(10)     # 1~10까지 숫자를 이용 샘플 10, 앞의 난수와는 다른 결과가 나용

sample(10,3)   # 1~10까지 숫자를 이용샘플 3

set.seed(123)  # seed를 지정하면 동일한 난수를 발생

sample(10,3) # 샘플 3

 

sample(10,replace=T) # 복원 허용

sample(20,3,replace=T) # 숫자 20으로 3개 만들기

 

set.seed(123)

x <- rnorm(50); x     # 정규분포를 따르는 난수 50개  발생

x[x >0]                  # 난수 50개중 양수에 해당되는 것만 추출

id <- x>0               # 난수 중에서 0보다 크면 TRUE, 아니면 FALSE

id

+ Recent posts