如何将数据表中加速度列的字符串转换为数值向量并替换原内容？

完全可以把拆分后的数值向量存在原字符串所在的单元格里——R的data.frame和data.table都支持在单个单元格中存储向量类型的数据，刚好匹配你这种一行对应一段时序加速度数据的场景。

具体实现方法 #

假设你的数据表是data.table类型（从你示例里的dt命名推测），可以用以下代码批量处理三列：

library(data.table)

# 遍历三轴加速度列，将字符串拆分为数值向量并替换原列
cols <- c("acc_x", "acc_y", "acc_z")
dt[, (cols) := lapply(.SD, function(col) {
  lapply(col, function(x) as.numeric(strsplit(x, " ")[[1]]))
}), .SDcols = cols]

如果是普通data.frame，写法类似：

cols <- c("acc_x", "acc_y", "acc_z")
df[cols] <- lapply(df[cols], function(col) {
  lapply(col, function(x) as.numeric(strsplit(x, " ")[[1]]))
})

验证结果 #

处理完成后，你可以直接访问原列的单元格，得到的就是数值向量：

# 查看第一行的acc_x向量
dt$acc_x[1]

输出会是长度为40的数值向量，和你拆分前的字符串内容一一对应。

额外提示 #

• 如果你处理的是超大型数据集，优先用data.table的方式，它是原地修改数据，内存效率更高。
• 建议提前检查所有字符串拆分后的长度是否都是40，避免后续分析出问题：

# 检查acc_x列每个单元格的向量长度
dt[, acc_x_length := lengths(acc_x)]
# 统计长度分布，确认全是40
table(dt$acc_x_length)

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