Rでテキストをループして別のデータセットを呼び出す

Question

多くの国の「データセット」から同様のレーダープロットを作成し、それに応じて各チャートにタイトルを付けたいと考えています。 Rが私のデータフレームを認識するところで誰かがループを手に入れるのを助けることができますか？私が手にエラーがある：

> is.data.frame（DF）でエラー：オブジェクトが 'DATA_I' が見つかりません

コード：あなたはすべて配置でき

data_China=rbind(rep(100,1) , rep(1,100) , data)  
    data_Indonesia=rbind(rep(100,1) , rep(1,100) , data) 
    data_India=rbind(rep(100,1) , rep(1,100) , data) 
    data_Kenya=rbind(rep(100,1) , rep(1,100) , data) 

    par(mfrow=c(2,2),mar=c(1, 1, 1, 1)) 

clist <- c("Indonesia", "China", "India", "Kenya") 

for (i in clist) { 
    # Custom the radarChart ! 
    radarchart(data_i , axistype=1 , 

       #custom polygon 
       pcol=rgb(0.2,0.5,0.5,0.9) , pfcol=rgb(0.2,0.5,0.5,0.5) , plwd=4 , 

       #custom the grid 
       cglcol="grey", cglty=1, axislabcol="black", caxislabels=seq(0,100,20), cglwd=0.8, 

       #custom labels 
       vlcex=0.6 , title="i" 
    ) 
    } 

Answer 1

データセットをリストに追加し、それを繰り返します：

dataList <- list(China = data_China, 
       Indonesia = data_Indonesia, 
       India = data_India, 
       Kenya = data_Kenya) 

for (i in 1:length(dataList)) { 
radarchart(dataList[[i]] , axistype=1 , 

      #custom polygon 
      pcol=rgb(0.2,0.5,0.5,0.9) , pfcol=rgb(0.2,0.5,0.5,0.5) , plwd=4 , 

      #custom the grid 
      cglcol="grey", cglty=1, axislabcol="black", caxislabels=seq(0,100,20), cglwd=0.8, 

      #custom labels 
      vlcex=0.6 , title=names(dataList)[i] 
) 
}