Rのつぶやきを送信するには？

Question

おそらくUsing R to send tweetsと重複する質問が、残念ながらそれは私がジェフ・ジェントリーからTwitteRパッケージをインストールしていると私はOAuthの使用自分自身を認証することができるんだけど、何を私からR.

のためのOAuthを使用する方法についてのみ回答を提供ドキュメントには、Twitterの直接メッセージ（dmSendとdmGet）を操作する機能がありますが、私はつぶやきを送信するためのものは何も見つかりません。

> consumer_key <- "xxx" 
    > consumer_secret <- "zzz" 
    > access_token <- "aaa" 
    > access_secret <- "bbb" 
    > setup_twitter_oauth(consumer_key, consumer_secret, access_token, access_secret) 
    [1] "Using direct authentication" 

は今、私が認証してることを、どのように私は、有効なHTMLフォームを送信し、つぶやきを送信するためにRCurlを使用することができますか？

は、ありがとう twitteRパッケージで

Answer 1

：

updateStatus("Tweet goes here.") 

代替httr方法：

# assign keys and secrets 
api_key <- "a" 
api_secret <- "b" 
access_token <- "c" 
access_token_secret <- "d" 

# authenticate with httr 
oauth_endpoints("twitter") 
myapp <- oauth_app("twitter", key = api_key, secret = api_secret) 
twitter_token <- oauth1.0_token(oauth_endpoints("twitter"), myapp) 

tweet <- "Tweet goes here." 
tweet <- gsub(" ","%20", tweet) 

httr::POST(
    url = paste0("https://api.twitter.com/1.1/statuses/update.json?status=", tweet, "&display_coordinates=false"), 
    config(token = twitter_token) 
)