ひさびさにRの設定を触る際にはusethisパッケージを使う

Rを起動するたびに友人の体重をAPI経由で取得したい。
R起動時の設定ファイルは.Rprofileファイルに書く。
参考：https://stats.biopapyrus.jp/r/devel/rprofile.html

しかし起動時の設定ファイル（.Rprofileファイル）がどこにあるのかよくわからなくなった。
そんな際はusethisパッケージを使う。

usethis::edit_r_profile()

すると下記のように.Rprofileの格納場所が返ってくると同時に.Rprofileファイルが開かれる。

• Modify '/Users/hogehoge/.Rprofile'
• Restart R for changes to take effect

ちなみに友人の体重は下記で取得できる。
なお、アクセストークンは友人の許可を得て公開している。

response <- httr::POST("https://www.healthplanet.jp/status/innerscan.json",
                 body = list(
                   access_token = "1713215418763/lRdcV5GuHjwvuJ9LiTW4Se0oCaDNNpA6CdVRvDh2",
                   date = 1,
                   tag = "6021"
                 ),
                 encode = "form")

tmp <- jsonlite::fromJSON(httr::content(response, as = "text"), flatten = TRUE)
print(tmp$data)