r - преобразовать вывод searchTwitter во фрейм данных?

Привет всем в Stackoverflow. Я новичок в R, и у меня проблема с функцией lapply.

Сейчас я использую R версии 3.0.1 (2013-05-16) — «Хороший спорт», работающий на сервере Ubuntu 12.04.2 LTS.

Моя проблема в том, что я не могу использовать функцию lapply для преобразования вывода из searchTwitter (в twitteR) в фрейм данных.

Я могу собрать твит в переменную 'tweet', но не могу преобразовать во фрейм данных.

Мой код:

require(twitteR) 
require(RJSONIO)
load('cred.Rdata')
registerTwitterOAuth(cred)
tweet <- searchTwitter('bus')
tweet1 <- lapply(tweet, as.data.frame) //error here
df <- do.call("rbind",tweet1)
write.csv(df,file='oneearthquake.csv')

Я получил ошибку:

Error in data.frame(text= "(tweet text)")
    arguments imply differing number of rows: 1,0

Я пробовал на другом сервере Ubuntu, на котором работает та же версия R, он может работать без каких-либо предупреждений. Подскажите, пожалуйста, как решить эту ошибку?

заранее спасибо

Уловка


person user2536641    schedule 30.06.2013    source источник
comment
Пробовали ли вы twListToDF или ответы здесь? Хотя, возможно, они немного устарели...   -  person Ben    schedule 30.06.2013
comment
Я попробовал, и ошибка была той же.   -  person user2536641    schedule 01.07.2013


Ответы (1)


Попробуйте что-нибудь вроде этого

load('cred.Rdata')
registerTwitterOAuth(cred)
rawtweets <- searchTwitter("bus")

df <- do.call("rbind", lapply(rawtweets, as.data.frame))
write.csv(df, file='oneearthquake.csv')
person dickoa    schedule 30.06.2013
comment
Спасибо за ваше предложение. Пробовал, но ошибка та же. - person user2536641; 01.07.2013
comment
Это сработало для меня - person Hack-R; 01.01.2017