1、在最后一行的下一行追加字符
dat <- read.csv("test.csv", header = T) ## 读取测试数据 dat temp <- c("final", rep("", ncol(dat) - 1)) ## 生成要添加的字符 rbind(dat, temp) ## 利用行合并追加
2、在最后一行后面追加
dat <- read.csv("test.csv", header = T) ## 读取测试数据 dat temp <- c(rep("", nrow(dat) - 1), "final") ## 生成追加字符 cbind(dat, temp) ## 利用列合并追加