Twitter APIの廃止とRでのエラーについて

Question

前提・実現したいこと

RでExploratoryをつかってwordcloudを作成しようとしています。
以下の記事を参考にしています。
参考記事

発生している問題・エラーメッセージ

記事の説明通りにやっているのですが、
記事の「安倍首相に言及しているTweetをTwitterからインポートする。」
「R スクリプトデータソースの作成」を実行しようとしたところ、

以下のエラーが出力されてしまい、修正方法がわからず困っています。

Error : 
  Forbidden (HTTP 403).

該当のソースコード

API Keyなどは正しく取得しています。
Exploratoryではうまくいかないようです。

library(rtweet)

## whatever name you assigned to your created app
appname <- "rtweet_token"

## api key (example below is not a real key)
key <- "xxxxxxxxxxx"

## api secret (example below is not a real key)
secret <- "xxxxxxxxxxxxx"

## create token named "twitter_token"
twitter_token <- create_token(
  app = appname,
  consumer_key = key,
  consumer_secret = secret)

rtweet::search_tweets(n = 2000, lang = 'ja', q = '安倍首相 -filter:retweets', token=twitter_token)

試したこと

R app からはまだワードクラウドが作ることができたので、まだtwitterAPIは使えると思います。
取得したtweetをあとで使えるようにする方法で、R appではテキストデータを保存できましたが、依然としてExploratoryでは

Error : 
  Forbidden (HTTP 403).

のエラーでtweetを取得できません。

###ご回答を受けて試したこと
ご回答でいただいたWebページの説明を参考にコードを修正しましたが、
別のエラーが出てしまいました。

なお、以下のパッケージはインストール済みです。

install.packages("rtweet")
install.packages("httpuv")

修正後のコード

library(rtweet)

## whatever name you assigned to your created app
appname <- "appname"

## api key (example below is not a real key)
key <- "***"

## api secret (example below is not a real key)
secret <- "***"

access_token_key <- "***"

access_token_secret <- "***"

twitter_token <- create_token(
app = appname,
consumer_key = key,
consumer_secret = secret,
access_token = access_t,
access_secret = access_token_secret,
set_renv = TRUE
)

rtweet::search_tweets(n = 2000, lang = 'ja', q = '安倍首相 -filter:retweets', token=twitter_token)

エラー

Error : 
  unused arguments (access_token = access_token_key, access_secret = access_token_secret)

補足情報（FW/ツールのバージョンなど）

R 3.5.0
Exploratory Version 4.4.0.5

Answer 1

これかな？
https://github.com/mkearney/rtweet/issues/265

Comments

[退会済みユーザー]

ご回答いただきましてありがとうございます。
いただいたWebページの説明を参考にコードを修正しましたが、
別のエラーが出てしまいました。詳しくは質問に追記致しました。
お手数おかけしますが、ご確認いただけますと幸いです。