before for loop start

This commit is contained in:
2014-11-29 21:52:46 +01:00
parent d0621942ca
commit c2190c7060
+6 -2
View File
@@ -36,10 +36,14 @@ params <- c(
); );
url <- "https://api.twitter.com/1.1/statuses/user_timeline.json"; url <- "https://api.twitter.com/1.1/statuses/user_timeline.json";
query <- c(screen_name="mxmehl", include_rts=1, count="100", exclude_replies="true", trim_user="true", include_entities="false"); query <- c(screen_name="mxmehl", include_rts=1, count="200", exclude_replies="true", trim_user="true", include_entities="false");
as.character(as.numeric(result$id_str[nrow(result)]) - 1)
str_detect(result$created_at[nrow(result)], "2013$")
result <- twitter_api_call(url, query, params) result <- twitter_api_call(url, query, params)
result <- fromJSON(correctJSON(result)) result <- fromJSON(correctJSON(result))
# --------------- # ---------------