list 名称为data，给list的第x个元素重命名为data_x：
names(data)[x] <- "data_x"
补充：规律给list元素命名：
list 名称为data，给list的第i个元素重命名为data_i：
for (i in 1:length(data)){
names(data)[i] <- paste("data_", i, sep = "")
}
for循环结构语法：
其中var表示循环变量，seq为向量，expr为执行的语句。
例1 下面我们通过for循环来计算
因此
例2 Fibonacc数列为： ，求Fibonacc数列前50项的和。
运行结果
因此Fibonacc数列前50项的和为32951280098。
assign可以实现批量命名
for(i in 1:5){
assign(paste("a",i,sep=""),rnorm(5))
}
a1a2a3a4a5
