0
我一直在使用Twitter中的Twitter API提取推文。 我一直在使用write.csv2命令將結果保存到csv中,這很好,但是存在一個問題,即tweet文本中的字符返回導致電子表格中的多行用於一條推文。如何從字符串中刪除換行符?
我試過使用str_replace_all,但它似乎並沒有爲我工作,我找不到任何爲什麼。
這裏是我的代碼
searchTags = c("Galwaybikeshare", "Corkbikeshare", "dublinbikes", "BelfastBikes", "SantanderCycles", "CitiBikeNYC", "obike", "Hubway", "bicing")
additionalParams = c("-rt -http")
searchString <- paste((paste(searchTags[1:9], collapse = " OR ")), additionalParams, collapse = "")
tweets_list <- searchTwitter(searchString, n=20, lang = "en", resultType = 'recent')
str_replace_all(tweets_list, "[\r\n]" , "")
tweets.df <- twListToDF(tweets_list)
todayDate <- Sys.Date()
tweetArchive <- paste("BikeShareTweets ", todayDate, ".csv", sep ="")
write.csv2(tweets.df, file = tweetArchive)
下面的文本是這是造成這一問題的鳴叫的例子。
"TransitNinja205: 0.01% of the budget for 5-borough @CitiBikeNYC,\nand 0.2% for #FairFares. @NYCmayor @NYCmayorsOffice #progressive"
爲什麼我的str_replace_all不能從文本中刪除\ n?