использовать имя в качестве ключа в списке R - PullRequest
0 голосов
/ 19 февраля 2012

У меня есть эта строка, и я хотел бы добавить имя файла в качестве ключа к результирующему списку.

lapply(Sys.glob('data*'), function(file) {result = do.call("rbind", fromJSON(file=file)); mode(result) <- 'numeric'; result} )


[[1]]
<matrix>

должно быть

filename
<matrix>

DoМне нужна другая структура, чем список?

Ответы [ 2 ]

1 голос
/ 19 февраля 2012

Вы должны установить атрибут имен в векторе имен файлов.

filenames <- Sys.glob("data*")
names(filenames) <- filenames
result <- lapply(filenames, function(file) 
                    {result = do.call("rbind", fromJSON(file=file))
                     mode(result) <- 'numeric'
                     result} )
1 голос
/ 19 февраля 2012
filenames <- Sys.glob("data*")

result <- lapply(filenames, function(file) {result = do.call("rbind", fromJSON(file=file)); mode(result) <- 'numeric'; result} )

names(result) <- filenames
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...