合并第一行的单元格

Question

有人可以帮我吗？

这是我的真人data_frame

这就是我想要的

有没有办法只合并 R 中第一行的单元格？

我试图在 excel 中一一完成，但我有 6000 多列，所以我花了很长时间！

感谢您的帮助！

Answer 1

您可以将第一行中的所有单元格折叠成一个单元格，并将其他单元格留空。如果 x 是您的数据框：

x[1,] <- c(paste(x[1,], collapse=""), rep("", ncol(x)-1))

Answer 2

正如@Dion Groothof 在评论中提到的，您不能合并 R 数据框中的两个单元格，但如果您希望合并 excel 工作表中的单元格，您可以使用 openxlsx 包裹：

library(openxlsx)

> df
# A tibble: 4 x 2
  var1  var2 
  <chr> <chr>
1 A     B   
2 1     2    
3 3     4    
4 5     6  

wb <- createWorkbook()
addWorksheet(wb, "Sheet1")
df[1,] <- paste(df[1,], collapse = "")
writeData(wb, "Sheet1", df)
mergeCells(wb, "Sheet1", cols = (1:2), rows = 2)
saveWorkbook(wb , "E:/test1.xlsx", overwrite = T)

结果将是：

合并第一行的单元格

Combine cells in the first row

union

r

dataframe