R :

2013-05-25 3 views
0

는 다음 설치를 감안할 때 코드의 목적을 이해하지 마십시오R :

area.factor <- cut(state.x77[,"Area"], 
        breaks=quantile(state.x77[,"Area"],c(0,.25,.75,1)), 
        labels=c("small","medium","large"), 
        include.lowest=TRUE) 

state <- data.frame(pop=state.x77[,"Population"], 
       inc=state.x77[,"Income"], 
       area=area.factor, 
       region=state.region) 

pop.area.region <- with(state,ftable(pop,area,region)) 

다음은 동일한 결과를 보여 두 줄의 코드는 다음과 같습니다

head(ftable(prop.table(pop.area.region,margin=2))) 

head(prop.table(pop.area.region,margin=2)) 

내가 무엇을 이해하지를

head(ftable(prop.table(pop.area.region,margin=2))) 
+0

정확히 무엇이 문제입니까? 이해하지 못하는 코드의 일부가 있습니까? 그것이 어떻게 작동하는지, 그것이 무엇을 생산하는지 또는 그것이 어떻게 구현되는지를 알고 싶습니까? – Backlin

+2

나는 나무가 prop.table (pop.area.region, margin = 2)에 ftable을 포함하여 어떤 효과가 있는지 묻고 있다고 생각합니다. –

+0

@Backlin & Mark Miller 둘 다 맞습니다. – time

답변

3

ftable를 추가하면 pop.area을 강요하려고 witll : 어떤 경우 사실상, ftable있다 추가 .region을 ftable class으로 변경하십시오. 여기 pop.area.region이 이미 ftable이므로 ftable을 추가 할 필요가 없습니다.

identical(ftable(prop.table(pop.area.region,margin=2)), 
       prop.table(pop.area.region,margin=2)) 
TRUE