重命名全部的列是
name(data) <- c("NO","name")
但是数据集有点长的时候用name，没办法对单个列
查了一下
colnames(data)[2] <- 'newname'
可行
