如何在R中插入空白列[重复]

Question

我有一个数据框“数据”，它有大约 20 列。有点像：

Name Data1 Data2 Data3 Data4 Data5 ....
Fred   2     0     1     3    7  
Tim    2     3     6     5    6
Jack   3     1     1     2    6
Denise 4     5     0     2    8

我想在第一列之后插入三列“ID”、“Age”、“School”。

有没有办法做到这一点？

我试过这个：

ID<-''
Age<-''
School<-''
data<-cbind(data[,1], ID, Age, School, data[,2:ncol(data)])

它添加了这些列，但第一列变成了“data[,1]”，我无法重命名它。

Answer 1

试试这个：

> data = read.table(header=T, text='Name Data1 Data2 Data3 Data4 Data5

Fred   2     0     1     3    7  
Tim    2     3     6     5    6
Jack   3     1     1     2    6
Denise 4     5     0     2    8')

> cbind(Name=data[,1], ID="", Age="", School="", data[,2:ncol(data)])

    Name ID Age School Data1 Data2 Data3 Data4 Data5
1   Fred                   2     0     1     3     7
2    Tim                   2     3     6     5     6
3   Jack                   3     1     1     2     6
4 Denise                   4     5     0     2     8

Answer 2

Append也可以。

dat <- read.table(text = "
Name Data1 Data2 Data3 Data4 Data5
Fred   2     0     1     3    7  
Tim    2     3     6     5    6
Jack   3     1     1     2    6
Denise 4     5     0     2    8", header = TRUE)

dat.new <- data.frame(append(dat, list(ID = "", age = ""), after =  2))
head(dat.new)
#    Name Data1 ID age Data2 Data3 Data4 Data5
#1   Fred     2            0     1     3     7
#2    Tim     2            3     6     5     6
#3   Jack     3            1     1     2     6
#4 Denise     4            5     0     2     8

我们在这里使用data.frame 只是等长向量的list 的事实（几乎）。