将2列数据帧转换/组合为1列数据帧-R

下面的脚本显示存储在两列data.frame中的X、Y数据

a1 <- as.character(c(3456,2569))
a2 <- as.character(c(956,569))
a3 <- as.character(c(156,269))
mydf <- rbind(a1, a2, a3)

---

类似这样的方法可能会奏效：

data.frame(col1 = apply(mydf, 1, function(x) paste(paste0(x, '.000'), collapse = ', ')))
#                 col1
#a1 3456.000, 2569.000
#a2   956.000, 569.000
#a3   156.000, 269.000

---

apply

对矩阵的每行进行迭代，首先创建带零的数字（即

paste0

），然后将所有内容合并到一个逗号分隔的字符串中（即

paste

）。

所有数字都是整数，或者其中一些数字已经有小数点了吗？如果是后者，你可能想做一些类似的事情

sprintf("%.3f, %.3f", as.numeric(mydf[,1]), as.numeric(mydf[,2]))

sprintf("%.3f, %.3f", as.numeric(mydf[,1]), as.numeric(mydf[,2]))