r - 時間がかかりすぎるプロセス

Question

私は R にまったく慣れていないので、非常に時間のかかるプロセスに関連する問題を解決するためにあなたの助けが必要です。

ファイルデータを作成するためにサブセット化しようとしている非常に大きなデータセットがあります。私が書いたコードは機能していますが、時間がかかりすぎて、高速化する方法がわかりません。

データセットをサブセット化するコードは次のとおりです

df<-data.frame(a,b,c,d,e,f,g,h)

mylist <- list()

for(i in 1:(length(df$a))) {
  mylist[[i]] <- subset(df, a==df$a[i])   
  dep <- as.data.frame(mylist[i])
  SHYRMODY <- split(dep, data.frame(dep$a,dep$b, dep$c, dep$d), drop=TRUE)
  lapply(names(SHYRMODY),function(x, SHYRMODY)
    write.table(SHYRMODY[[x]],
                paste(x, ".dat", sep = ""),
                col.names=FALSE, 
                row.names=FALSE, 
                sep="\t",
                quote=FALSE),SHYRMODY)
}