r-删除data.table中多余的colname

Question

我有类似的数据表x

@ A B C D
1 2 3 4 n/a
5 6 7 8 n/a
.
.
.

我想把它改成

A B C D
1 2 3 4
5 6 7 8
.
.
.

如果有简单的方法做？即使在CCD_ 2或CCD_？

Answer 1

这个怎么样？

headers <- names(x)[1:(length(x)-1)]
x <- x[, 1:(length(x)-1)]
names(x) <- headers