You need to enable JavaScript to run this app.
优惠活动
大模型
产品
解决方案
定价
更多

如何合并行数不同的多个R统计对象为统一表格?

合并R统计对象为完整表格

以下是将你提供的freq、wf、prop、CI、CV对象合并为3行完整表格的R代码:

library(survey)

# 处理freq对象:转为数据框并设置行名
freq_df <- data.frame(freq = freq, row.names = c("0", "1", "Total"))

# 处理wf对象:提取total值和标准误,整理为数据框
wf_df <- data.frame(
  total = as.vector(wf),
  SE = sqrt(diag(attr(wf, "var"))),
  row.names = c("0", "1", "Total")
)

# 处理prop对象:提取均值、标准误和DEff,添加Total行
prop_df <- data.frame(
  mean = as.vector(prop),
  SE_prop = sqrt(diag(attr(prop, "var"))),
  DEff = diag(attr(prop, "deff")),
  row.names = c("0", "1")
)
prop_df <- rbind(prop_df, data.frame(mean = NA, SE_prop = NA, DEff = NA, row.names = "Total"))

# 处理CI对象:转为数据框并添加Total行
CI_df <- as.data.frame(CI)
CI_df <- rbind(CI_df, data.frame(`2.5 %` = NA, `97.5 %` = NA, row.names = "Total"))
rownames(CI_df) <- c("0", "1", "Total")

# 处理CV对象:转为数据框并添加Total行
CV_df <- data.frame(CV = CV, row.names = c("0", "1"))
CV_df <- rbind(CV_df, data.frame(CV = NA, row.names = "Total"))

# 合并所有数据框并调整列顺序
final_table <- cbind(freq_df, wf_df, prop_df, CI_df, CV_df)
final_table <- final_table[, c("freq", "total", "SE", "mean", "SE_prop", "DEff", "2.5 %", "97.5 %", "CV")]

# 打印结果(空值显示为空白)
print(final_table, na.print = "")

最终合并后的表格:

freqtotalSEmeanSE_propDEff2.5 %97.5 %CV
0110274327145987630.86218860.00879378.01810.84495340.87942390.01019923
11264691647483360.13781140.00879378.01810.12057610.15504660.06380940
Total122915018792108969

内容的提问来源于stack exchange,提问作者datadigger

相关产品推荐
方舟 Agent Plan

超全模态模型 × Harness 升级,最新支持 Deepseek-V4.1-Flash、GLM-5.3 系列、Doubao-Seedream-5.0-pro、Kimi-K3 (部分), 限时 9.9 元起

最近更新时间:2026.07.05 02:43:10