質問

私が操作して、MySQLのテーブルからデータを読み込む機能を持っており、いくつかのdata.frameを返すとします。関数は、その機能自体は問題ではありません単なる一例であることに注意してください...、例えば:

addRowSd <- function(table,con,pattern="^Variable") {

dframe <- dbReadTable(con,table)
cn <- colnames(dframe)
qs <- subset(x, x  %in% grep(pattern, x, value=TRUE))
dframe$qsd <- sd(t(dframe[,c(qs)])) 

return(dframe)
}

mydf$sd <- addRowSd(...)

私はmydf呼ばdata.frameで終わります。今、SQLテーブル名の文字ベクトルにこれを行うには、相応に戻っデータフレームに名前を付けるようI'd。私は使用している場合は、

x=lapply(MySQLtablenames,addRowSd,con)

- 私は、xと呼ばれるいくつかのリストを取得します。もちろん私は非公開にし、名前の変更方法がしたいI'dすべてを、私の質問はある可能性があります:

どのように私はlapply作る(または他の同等の機能)することができますがmultple、単一のデータフレームを返すか、少なくともいくつかの名前を含むリストは、私の文字ベクトル「MySQLtablenames」?

から派生しました
役に立ちましたか?

解決

ちょうど自分で答えを見つけます:

assign("somename",dframe,envir = .GlobalEnv)

他のヒント

あなたはsapply文字ベクトルを供給する場合は、付属の文字ベクトル(USE.NAMESデフォルトTRUEに)によって返されたリスト内の項目に名前を付けます...私はまたdata.framesに応じて簡素化= FALSEを使用しますあなたが予期しない結果を得ることが返さ

x=sapply(MySQLtablenames,addRowSd,con, simplify=FALSE)
ライセンス: CC-BY-SA帰属
所属していません StackOverflow
scroll top