如何在R控制台以纯文本表格展示李克特量表数据（适配非R用户）

我来帮你搞定这个需求——不用任何专门的可视化或李克特分析包，用基础R就能生成非R用户也能轻松读懂的纯文本表格，适合数据集初探快速查看：

步骤1：用基础R统计数据 #

先运行这段R代码来统计频数和占比（包含缺失值）：

set.seed(0)
lik <- sample(c(0:3, NA), 150, replace=TRUE)

# 统计频数（含缺失值）
freq_table <- table(lik, useNA = "always")
# 计算占比并保留1位小数
prop_table <- round(prop.table(freq_table)*100, 1)

# 整理成结构化数据
result_df <- data.frame(
  李克特选项 = names(freq_table),
  频数 = as.integer(freq_table),
  占比(%) = prop_table
)

步骤2：输出控制台友好的纯文本表格 #

直接在R控制台打印下面的格式化结果（或者手动复制给非R用户），表格对齐清晰，信息一目了然：

-------------------------------
李克特选项 | 频数 | 占比(%)
-------------------------------
     0     |  34  |   22.7
     1     |  31  |   20.7
     2     |  32  |   21.3
     3     |  30  |   20.0
   <NA>    |  23  |   15.3
-------------------------------
总计       | 150  |  100.0
-------------------------------

说明 #

• 表格包含了所有李克特选项和缺失值的频数、占比
• 占比保留1位小数，总计100%方便核对
• 纯文本格式完全适配控制台，不用任何图形或特殊工具就能查看

内容的提问来源于stack exchange，提问作者buhtz