サブセットRの割り当て機能付きデータ

Question

R（またはまったく）でプログラミングするのが初めてで、数日間問題を抱えています。この質問が何らかの形ですでに存在している場合は申し訳ありませんが、私は何かを見つけることができます。

私は、pop1、pop2、pop3などと呼ばれる複数のデータセットを持っています。私はforループ内から指定されたサブセットに値0を割り当てようとしています。

subset(get(paste("pop", 1, sep = "")), ind == 46, select = -ind) 

私が探しているサブセットを返しますが、私がしようとすると：：試行錯誤の末、私はコードが検出されませんでした

：

for (i in 1:3) { 
    assign(subset(get(paste("pop", i, sep = "")), ind == 46, select = -ind), 0) 
} 

は、私は、エラーメッセージが表示されます

#Error in assign(subset(get(paste("pop", i, sep = "")), ind == 46, select = -ind), : 
    #invalid first argument 

assign関数は、次のいずれも機能しないため、サブセットを最初の引数として受け取らないようです。

assign(pop1[46, -1], 0) 
assign(pop1$trait1, 0) 
assign(subset(pop1, ind == 46), 0) 

私はこの作業を行う方法はありますか？おかげさまで、もっと情報が役立つかどうか教えてください。

Answer 1

コメントで述べたように、リストを介してこれらの種類のタスクを実行する方が簡単です。

リストにすべてのデータセットを保存することができます。その後、通常のサブ設定を使用して、定期的な割り当てを行うことができます。

df1=data.frame(a=1:10,b=c(1,2)) 
df2=data.frame(a=1:10,b=c(1,2)) 
l=list(df1,df2) 
lapply(l, function(x) { x[which(x[,2]==1),2]=999; return(x)}) 

これをループで実行したい場合は、evalとともに解析することができます。

for(i in 1:2){ 
    txt=paste('df',i,'[df',i,'[,2]==1,2]','=999', sep = "") 
    eval(parse(text = txt)) 
}