Question

在R工作，但这不重要。

我希望收集所有推文：https://twitter.com/ChrisChristie/status/663046613779156996

So Tweet ID：663046613779156996

    base = "https://ontributor_details = "contributor_details=true"
    ## include_rts
    include_rts = "include_rts=true"
    ## exclude_replies
    exclude_replies =         "exclude_replies=false"api.twitter.com/1.1/statuses/user_timeline.json?"
   queryName = "chrischristie"
   query = paste("q=", queryName, sep="")
   secondary_url = paste(query, count,        contributor_details,include_rts,exclude_replies, sep="&") 
   final_url = paste(base, secondary_url, sep="")
   timeline = GET(final_url, sig)

这（上述）有效。没有since_id。该网址为

   "https://api.twitter.com/1.1/statuses/user_timeline.json?q=chrischristie&count=200&contributor_details=true&include_rts=true&exclude_replies=false"

以下不是，只需添加以下内容

cur_since_id_url = "since_id=663046613779156996"

secondary_url = paste(query, count, 

contributor_details,include_rts,exclude_replies,cur_since_id_url, sep="&")

final_url = paste(base, secondary_url, sep="")

timeline = GET(final_url, sig)

上面的网址有

"https://api.twitter.com/1.1/statuses/user_timeline.json?q=chrischristie&count=200&contributor_details=true&include_rts=true&exclude_replies=false&since_id=663046613779156992"

Answer 1

这似乎有效：

require(httr)
myapp <- oauth_app(
  "twitter",
   key = "......",
   secret = ".......")
twitter_token <- oauth1.0_token(oauth_endpoints("twitter"), myapp)
req <- GET("https://api.twitter.com/1.1/statuses/user_timeline.json",
           query = list(
             screen_name="chrischristie",
             count=10,
             contributor_details=TRUE,
             include_rts=TRUE,
             exclude_replies=FALSE,
             since_id=663046613779156992),
           config(token = twitter_token))
content(req)

查看GET statuses/user_timeline

Twitter GET无法使用since_id

1 个答案: