Как вернуть данные. Красим с указанным именем из функции?

StackOverflow https://stackoverflow.com/questions/4041806

  •  27-09-2019
  •  | 
  •  

Вопрос

Предположим, у меня есть функция, которая читает данные из таблицы MySQL, манипулирует его и возвращает некоторые данные. Crame. Примечание. Функция является просто примером, функциональность которой не имеет значения ..., например:

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(...)

Я в конечном итоге с Data.rame называется MyDF. Теперь я хотел бы сделать с этим на символ векторных имен таблиц SQL и назвать возвращенные данные данные соответственно. Если я просто использую

x=lapply(MySQLtablenames,addRowSd,con)

Я получу список под названием x. Конечно, я мог не отказаться и переименовать все, как я хотел бы, но мой вопрос:

Как я могу сделать Laply (или другую сопоставимую функцию) Возвращать Multple Onow Dataframes или, по крайней мере, список, который содержит некоторые имена, полученные из моего вектора персонажа «MySQLTableNames»?

Это было полезно?

Решение

только что нашел ответ самостоятельно:

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

Другие советы

Если вы поставляете Sapt Vector символ, он будет назвать элементы в возвращенном списке по прилагаемому вектору символов (use.namese по умолчанию true) ... я бы также использовал упрощение = false, как в зависимости от данных. Сделаны Получить непредсказуемые результаты

x=sapply(MySQLtablenames,addRowSd,con, simplify=FALSE)
Лицензировано под: CC-BY-SA с атрибуция
Не связан с StackOverflow
scroll top