サプリーやforループを使った文字列のRの繰り返しタスク

Question

リストの一部を抽出して新しい変数名に保存するという繰り返し作業があります。

私はaaa_report <- original[["aaa"]]を使用することができますし、私は今、私はこの繰り返し作業を自動化したいリスト変数original

からaaaセクションでaaa_reportという名前の新しい変数があります。

aaa_report <- original[["aaa"]]

をbbb_report <- original[["bbb"]]

ccc_report <- original[["ccc"]]

...

私はsapplyを使用して、このエラーを取得しようとするすべての名前dept <- c("aaa", "bbb", "ccc", "...")

とdeptという別の「文字」リスト変数を持っています。

sapply(dept, function(x) x"_report" <- original[[x]]) 

Error: unexpected string constant in "sapply(dept, function(x) x"_report""

私は運ですべてapply家族やfor loopを試してみました。

for(x in dept){ 
    x"_report" <- original[[x]] 
} 

私は初心者からプログラミングまで一般的ですので、アドバイスが大いに役立ちます。

Answer 1

あなたはassign機能を使用し、接近していた：

for(x in dept) assign(paste0(x, "_report"), original[[x]]) 

割り当てがapply機能のローカル環境になりますので、それは、apply機能では動作しません。

コメントに記載されているとおり、すべてをリストに保存する方が常に優れています。