,我有以下的数据帧:如何通过交替列名复制数据帧列
df <- structure(list(Vertebral = c(16.43, 1.06, 0.38), BoneMarrow = c(19.69,
1.16, 1.13)), .Names = c("Vertebral", "BoneMarrow"), row.names = c("Gnai3",
"Cdc45", "Cav2"), class = "data.frame")
df
#> Vertebral BoneMarrow
#> Gnai3 16.43 19.69
#> Cdc45 1.06 1.16
#> Cav2 0.38 1.13
我想要做的就是创建一个看起来像这样的数据帧:
即对于每个原始列名称,创建两个副本:以'control'和'treated'作为后缀。
Vertebral.control BoneMarrow.control Vertebral.Treated BoneMarrow.Treated
Gnai3 16.43 19.69 16.43 19.69
Cdc45 1.06 1.16 1.06 1.16
Cav2 0.38 1.13 0.38 1.13
我该怎么做?
我坚持用这个代码:
library(tidyverse)
subtype <- colnames(df)
expand.grid(subtype,c("Control","Treated")) %>%
mutate(new_col = paste0(Var1,".",Var2))
#> Var1 Var2 new_col
#> 1 Vertebral Control Vertebral.Control
#> 2 BoneMarrow Control BoneMarrow.Control
#> 3 Vertebral Treated Vertebral.Treated
#> 4 BoneMarrow Treated BoneMarrow.Treated
我可以请你?什么功能!做??它的含义是什么?我们如何参考它? – Onyambu
@Onyambu,看我的编辑和链接。 – mt1022