jiangbeilu 发表于 2019-9-1 14:53 
get只是帮你去拿一个东西,你得给他重新命个名字,才能修改属性。
# a是数据框 想利用 assgin 和 get函数循环取值
name <- c("h6_1", "h6_2", "h11_1", "h11_2", "h24_1", "h24_2")
for (i in 1:6)
{
name_i <- name
data_i <- a[,c(1,i+1)]
assign(name_i,as.data.frame(tapply(data_i[,2],data_i[,1],sum)))
colnames(get(name_i)) # 可以查看
# colnames(get(name_i)) <- name_i # 不能修改这个命令会报错
}