RからMediumにMarkdownを投稿するパッケージmediumrをつくりました

前に書いたこれを

パッケージ化しました。

使うかどうか分からないんですけど、まあないよりあった方がいいかなあということで。機能としては前回と変わり映えしない(画像のアップロード機能が増えた)ので、使い方は詳しくは解説しませんが、お知らせまでに。

インストール

# install.packages("devtools")
devtools::install_github("yutannihilation/mediumr")

使い方

まずはAPIトークンを発行して、MEDIUM_API_TOKENという環境変数に指定しましょう。.Renvironに書くならこんな感じ。

MEDIUM_API_TOKEN='<your api token here>'

ユーザ情報の取得:

library(mediumr)

medium_get_current_user()
#> $id
#> [1] "5303d74c64f66366f00cb9b2a94f3251bf5"
#> 
#> $username
#> [1] "majelbstoat"
#> 
#> $name
#> [1] "Jamie Talbot"
#> 
#> $url
#> [1] "https://medium.com/@majelbstoat"
#> 
#> $imageUrl
#> [1] "https://images.medium.com/0*fkfQiTzT7TlUGGyI.png"

記事の投稿:

  content <- "
  # test

  1. test1
  2. test2

  ```r
  this <- is(test)
  ```
  "

  medium_create_post("test", content = content)

画像のアップロード:

medium_upload_image("/path/to/image.png")