0
kodunuzu buraya girin Bir searchTwitter
komutunda iki farklı hastayı aramak mümkün mü?twitteR iki hashtag'i nasıl arayabilirim
Örnek
my_h <- as.POSIXlt(Sys.time())
my_h <- strptime(my_h, format = "%Y-%m-%d %H:%M:%S", tz = "CET")
hrs <- function(u) {
x <- u * 3600
return(x)
}
my_h <- my_h - hrs(24)
my_h <- data.frame(day = strptime(my_h, "%Y-%m-%d", tz = ""))
Ben hastags
#dn
için bakmak istiyorum
ve #park
ben
tweets<-twListToDF(searchTwitter("#dn", n=5000, since = as.character(my_h$day)))
write.table(tweets, "all_dn_tweets.csv", row.names = F, append = T, sep = ";", col.names = F)
tweets<-twListToDF(searchTwitter("#park", n=5000, since = as.character(my_h$day)))
write.table(tweets, "all_park_tweets.csv", row.names = F, append = T, sep = ";", col.names = F)
soru aşağıdaki gibi ayrı ayrı yapabilir, bu iki birine sıkılmış olabilir ne olur? tweets tolower
kullanmak, bu
hashtags <- c("#metallica", "#slayer")
needle <- paste(hashtags, collapse = " OR ")
tweets <- searchTwitter(needle, n = 10)
df <- twListToDF(tweets)
for (hashtag in hashtags) {
write.csv(df[grep(hashtag, tolower(df$text), fixed = TRUE), ], paste0(hashtag, ".csv"))
}
gibi
İstediğim şey budur, döngüyü yeniden üretemedim ama bu sorunun bir parçası değildi. Teşekkürler – Mateusz1981