遍歷列並將迭代編號添加到相應的列名稱

Question

我有一個包含實驗數據的數據框。 我想通過以下方式命名數據幀的某些部分：“ expA_mult4_belA4”，並添加后綴“ _inv”，其中inv是從1到10的循環迭代。

for(inv in 1:10){ colnames(data)[18:27] <- paste("expA_mult4_belA4",inv,sep="_") }

代碼輸出很接近，但是問題是我的第18到27列中的所有變量的后綴始終為10。我希望后綴是第一個變量1，第二個2，...，十分之十。預先。

Answer 1

您不需要循環：

data <- iris
colnames(data)[2:3] <- paste("test",1:2,sep="_")
head(data)  
#   Sepal.Length test_1 test_2 Petal.Width Species
# 1          5.1    3.5    1.4         0.2  setosa
# 2          4.9    3.0    1.4         0.2  setosa
# 3          4.7    3.2    1.3         0.2  setosa
# 4          4.6    3.1    1.5         0.2  setosa
# 5          5.0    3.6    1.4         0.2  setosa
# 6          5.4    3.9    1.7         0.4  setosa