lapplyを使用して、いくつかのデータフレームに関数を適用しました。
data.cleaned <- lapply(data.list, shooter_cleaning)
次に、リスト内の結果の各データフレームに、件名番号(100など)に従ってラベルを付けます。
names(data.cleaned) <- subject.names
私がやりたいのは、新しいデータフレームをサブジェクト番号に基づいて個別の.csvファイルとして保存することです。たとえば、サブジェクト100の場合、.csvファイルに「100.csv」というラベルを付けます。通常、これを行うには(単一のデータフレームの場合)、次のように記述します(xはデータフレームです)。
write.csv(x, "100.csv", row.names = F)
しかし、明らかに、データフレームのリストに対してこれを行うためにlapplyを使用すると、サブジェクト番号に基づいてファイルを一意にしたい場合に、「100.csv」のコピーが多数生成されます。これらの各データフレームを独自の.csvファイルに保存するにはどうすればよいですか(適用を使用しますか?)。
これはリチャードのコメントに沿った自己完結型の例ですが、CSVファイルのファイル名としてリスト内のデータフレームの名前を使用しています。
# Create a list of n data frames
n <- 10
my_list <- lapply(1:n, function(i) data.frame(x = rnorm(10), y = rnorm(10)) )
# name the data frames
names(my_list) <- letters[1:n]
# save each new data frame as an individual .csv file based on its name
lapply(1:length(my_list), function(i) write.csv(my_list[[i]],
file = paste0(names(my_list[i]), ".csv"),
row.names = FALSE))
この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。
侵害の場合は、連絡してください[email protected]
コメントを追加