십진법을 사용하여 지층 정의하기

Question

측량 데이터 세트가 있고 지층을 정의하기 위해 십진법을 사용하려면 U1 = (데이터 세트의 모든 유닛은 D0 = min과 D1 사이), U2 = (D1과 D2 사이). .... U10 = (D9에서 D10 사이 = 최대).

지층을 정의하는 데 십진법을 어떻게 사용합니까?

Answer 1

tapply 통해 다른 계산에 해당 계수를 사용하여 그 다른 분위에 기초하여 계수를 계산하는 하나 개의 변수의 십분을 계산 quantile 기능하고 cut 함수를 사용하여, 그리고 예 :

# Let's set up some data: 

y <- rnorm(30, 100, 20) 
x <- rpois(30, 25-y/20) # make x depend on y a little 
surveyres <- data.frame(y=y,x=x) 

# set up the deciles of one variable 

yd <- cut(y, breaks=c(-Inf,quantile(y,seq(0.1,0.9,by=0.1)),Inf)) 

# compute means of another variable over deciles of the first: 

tapply(surveyres$x, yd, mean)  
(-Inf,84.2] (84.2,88.8] (88.8,93.8] (93.8,97.5] (97.5,100] (100,104] 
    23.66667 28.00000 22.33333 20.00000 20.33333 17.33333 
    (104,110] (110,114] (114,123] (123, Inf] 
    20.66667 19.33333 21.00000 20.33333 

yd과 같은 변수를 사용할 수있는 by 함수도 참조하십시오.