1 个数据的列 table 在另一个 data.frame 上成为额外的 headers

Question

一个数据table是通过以下方式生成的：

q <- data.frame(ID = c(1:5), replicate(10,sample(50:100,5,rep=TRUE))))

还有一个：

y <- data.frame(ID = c(1:10), replicate(2,sample(1:5,10,rep=TRUE))))

正在重命名 y 中的列名称，

colnames(y) <- c("size", "category")

我正在尝试向 q 添加 两行 header 行 ，使用 y 中的列 - 标题“类别”（带整数）将是（新) 第二行，标题为“大小”（带整数）第三行。

每个屏幕截图我的输出应该是这样的（仅前 5 行）-

输出显示 ID 列 (x-axis) 和 X1、X2、X3....（y1、y2、y3... 值）。在 ID 和 X1 之间可以看到 2 个新的 headers，Category 和 Size。我认为这将需要一个新列，以免侵犯 ID 列。

感谢

Answer 1

如果我没理解错的话，给你：

q <- rbind(c(colnames(y[2]),y[,2]),c(colnames(y[1]),y[,1]), q)

编辑后：

# same as above plus some new column
q <- rbind(c(NA,colnames(y[2]),y[,2]),c(NA,colnames(y[1]),y[,1]), cbind(q[,1], NA, q[,2:11]))

# add column names
colnames(q)[1:2] <- c("ID","new_col")

1 个数据的列 table 在另一个 data.frame 上成为额外的 headers

Columns of 1 data table become additional headers on another data.frame

r

header