数値で始まる列名を変更する

Question

データを2つの列の名前を変更するためにループを実行しようとしていますが、これらの2つの列の名前は数字で始まります。同じ仕事のために、私はそれらを（数字で始まっていなかった）以下のように書くことで変更しましたが、それは機能しません。ここで

は（ループが後で終了）コードです：

#Filtering 

for(i in 1:length(names$ID)){ 
    f<-names$ID[[i]] 
    corrpoints<-sprintf("corrpoints%i",as.numeric(levels(f))[f]) 
    pts=readOGR(dsn="C:/Users/Charlie/Desktop/Stage_permafrost/SIG/Quantification_des_mouvements/Corr_points_disp/Corr_points_ubaye", layer=corrpoints) 
    pts$Gvalue2004<-pts$2004_red_gr 
    pts$Gvalue2012<-pts$2012_red_gr 
    pts$Aspect_mnt<-pts$Aspect_25m_ 

私はこの問題を解決できる方法上の任意のアイデア？

おかげ

Answer 1

あなたの例では、私たちのために再現可能ではありません。 列名は数字で始めることができます。名前の周りにティックを使用して、以下のようにそれにアクセスします。これが良いアイデアかどうかは全く別の話です。

x <- mtcars 
colnames(x)[1] <- '1mpg' 
x$`1mpg`