如何在R函数中使用字符串变量传递多变量信息

如果你需要给mtcars数据集的变量加上更直观的标签，方便后续数据分析和结果展示，这段expss包的代码就非常合适。我把代码整理并补充了注释，方便你理解：

# 安装expss包（首次使用时运行，已安装可注释掉）
install.packages("expss")
# 加载expss包
library("expss")

# 加载内置的mtcars数据集
data(mtcars)

# 使用apply_labels为变量添加标签
mtcars = apply_labels(mtcars,
    mpg = "Miles/(US) gallon",          # 变量：每加仑英里数
    cyl = "Number of cylinders",        # 变量：气缸数量
    disp = "Displacement (cu.in.)",     # 变量：排量（立方英寸）
    hp = "Gross horsepower",            # 变量：总马力
    drat = "Rear axle ratio",           # 变量：后轴比
    wt = "Weight (1000 lbs)",           # 变量：重量（千磅）
    qsec = "1/4 mile time",             # 变量：1/4英里耗时
    vs = "Engine",                      # 变量：发动机类型
    vs = c("V-engine" = 0, "Straight engine" = 1),  # 值标签：0对应V型引擎，1对应直列引擎
    am = "Transmission",                # 变量：变速箱类型
    am = c("Automatic" = 0, "Manual"=1),            # 值标签：0对应自动，1对应手动
    gear = "Number of forward gears",   # 变量：前进挡数量
    carb = "Number of carburetors"      # 变量：化油器数量
)

# 你可以在这里继续编写后续的分析代码，比如：
# view(mtcars)  # 查看带标签的数据集
# cross_cpct(mtcars, am, vs)  # 生成交叉表并显示标签

关键说明： #

• apply_labels()是expss包的核心函数，支持同时定义变量标签（直接赋值字符串）和值标签（用向量映射数值到文本）
• 处理后的数据集在使用expss的统计函数（比如freq()、cross_cpct()）时，会自动调用这些标签，让输出结果更具可读性
• 如果已经安装过expss包，记得把install.packages("expss")这行注释掉，避免重复安装

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