在R中使用scale()后如何将数据框写入CSV文件？

解决方法：将矩阵列转为普通数值向量 #

scale()函数返回的不是普通数值向量，而是带有center（均值）和scale（标准差）属性的1列矩阵。当数据框中包含这种矩阵类型的列时，write_csv会因结构不兼容报错。只需把标准化后的列强制转为数值向量即可：

两种实现方式 #

1. 标准化时直接转换：

testDF <- testDF %>%
  mutate(x1_scaled = as.numeric(scale(x1, center = TRUE, scale = TRUE)))

2. 事后单独转换列：

# 先完成标准化
testDF <- testDF %>%
  mutate(x1_scaled = scale(x1, center = TRUE, scale = TRUE))
# 再转换为数值向量
testDF$x1_scaled <- as.numeric(testDF$x1_scaled)

转换完成后，直接调用write_csv(testDF, "testDF.csv")就能正常写入CSV，无需转成矩阵。而且转换后的数值和原标准化结果完全一致，不会影响后续的绘图、线性建模操作。

为什么scale()要这么设计？ #

scale()返回带属性的矩阵，是为了兼顾统计分析的实用性和灵活性：

• 支持可逆转换：保留center和scale属性后，随时可以把标准化值还原为原始值（公式：原始值 = 标准化值 * scale + center），不用手动记录均值和标准差，避免出错。
• 兼容统计模型需求：线性模型（如lm）、绘图函数（如ggplot2）可以识别这些属性，或者在后续分析中直接调用这些标准化参数，比如某些变量重要性评估方法需要用到原始尺度的信息。
• 统一多列处理逻辑：scale()不仅能处理单列数据，还能直接处理多列矩阵/数据框。返回矩阵类型可以统一单列、多列的输出结构，让函数在不同输入场景下的行为保持一致。

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