R:不理解代码的目标

R:不理解代码的目标,r,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.

给定以下设置:

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))
我不明白添加
ftable
会对以下方面产生什么影响(如果有的话):

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

添加
ftable
将尝试将pop.area.region强制为
ftable类
。在这里 无需添加
ftable
,因为pop.area.region已经是一个ftable

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

添加
ftable
将尝试将pop.area.region强制为
ftable类
。在这里 无需添加
ftable
,因为pop.area.region已经是一个ftable

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

问题到底是什么?代码中是否有您不理解的部分?你想知道它是如何工作的,它产生了什么,或者为什么它是以这种方式实现的吗?我想tree是在问包括ftable对prop.table(pop.area.region,margin=2)有什么影响。@Backlin和Mark Miller你都是对的。问题到底是什么?代码中是否有您不理解的部分?你想知道它是如何工作的,它产生了什么,或者为什么它是这样实现的吗?我想tree是在问,包括ftable对prop.table(pop.area.region,margin=2)有什么影响。@Backlin和Mark Miller你都是对的。