J-STAGEに収録されている資料情報をAPI経由で楽々取得できるパッケージの紹介です。情報の取得はジャーナル名だけでなく著者名、所属名、キーワードなどで可能です。また、取得した結果はxlsx形式で保存できます。
そのため、科研費の申請や組織内での成果報告だけでなく、日本における特定分野の研究傾向を知るのに大変便利なパッケージだと思います。
なお、J-STAGE(科学技術情報発信・流通総合システム)は、国立研究開発法人科学技術振興機構が運営する電子ジャーナルプラットフォームで国内の4,000誌以上のジャーナルや会議録等の刊行物公開しています。
・J-STAGE
https://www.jstage.jst.go.jp/browse/-char/ja
・J-STAGEの概要
https://www.jstage.jst.go.jp/static/pages/JstageOverview/-char/ja
・J-STAGEの収録資料一覧
https://www.jstage.jst.go.jp/journal/fields/-char/ja
・J-STAGE WebAPI 利用規約
https://www.jstage.jst.go.jp/static/pages/WebAPI/-char/ja
API経由での情報取得は節度を守り利用しましょう。
パッケージバージョンは0.0.2。実行コマンドはwindows 11のR version 4.3.1で確認しています。
パッケージのインストール
下記コマンドを実行してください。
# パッケージのインストール
install.packages("jstager")
実行コマンド
詳細はコマンド、パッケージのヘルプを確認してください。
# パッケージの読み込み
library("jstager")
# 指定資料の情報を取得:get_jstage_volumes
# 情報の取得開始年を指定:pubyearfromオプション;初期値:NA
# 情報の取得終了年を指定:pubyeartoオプション;初期値:NA
# 資料名を指定:materialオプション;初期値:""
# isnnを"XXXX-XXXX"で指定:issnオプション;初期値:""
# 資料コードを指定:cdjournalオプション;初期値:""
# 巻号の並び順を指定:volorderオプション;初期値:1;昇順/2;降順
GetData <- get_jstage_volumes(pubyearfrom = 2023,
material = "化学と生物", issn = "",
cdjournal = "", volorder = NA)
# 確認
# 結果はList classで$metadataと$entryで構成されています
GetData
# $metadata
# # A tibble: 1 × 10
# 処理結果ステータス 処理結果メッセージ フィード名 クエリのURL クエリのURI サービスコード
# <chr> <chr> <chr> <chr> <chr> <chr>
# 1 0 "" Volumes and Is… "" https://ap… 2
# # ℹ 4 more variables: 取得日時 <chr>, 検索結果総数 <dbl>, 開始件数 <dbl>, 件数 <dbl>
#
# $entry
# # A tibble: 6 × 25
# `巻号一覧表示名(英)` `巻号一覧表示名(日)` `目次一覧URL(英)` `目次一覧URL(日)` `Print ISSN`
# <chr> <chr> <chr> <chr> <chr>
# 1 "Vol. 61 (2023) , No.… "Vol. 61 (2023) , N… https://www.jsta… https://www.jsta… NA
# 2 "Vol. 61 (2023) , No.… "Vol. 61 (2023) , N… https://www.jsta… https://www.jsta… NA
# 3 "Vol. 61 (2023) , No.… "Vol. 61 (2023) , N… https://www.jsta… https://www.jsta… NA
# 4 "Vol. 61 (2023) , No.… "Vol. 61 (2023) , N… https://www.jsta… https://www.jsta… NA
# 5 "Vol. 61 (2023) , No.… "Vol. 61 (2023) , N… https://www.jsta… https://www.jsta… NA
# 6 "Vol. 61 (2023) , No.… "Vol. 61 (2023) , N… https://www.jsta… https://www.jsta… NA
# # ℹ 20 more variables: `Online ISSN` <chr>, `学協会名(英)` <chr>, `学協会名(日)` <chr>,
# # `学協会URL(英)` <chr>, `学協会URL(日)` <chr>, 資料コード <chr>, `資料名(英)` <chr>,
# # `資料名(日)` <chr>, 巻 <dbl>, 分冊 <chr>, 号 <dbl>, 開始ページ <dbl>, 終了ページ <dbl>,
# # 発行年 <dbl>, システムコード <chr>, システム名 <chr>, サブフィード名 <chr>,
# # サブフィードURL <chr>, サブフィードID <chr>, 最新公開日 <chr>
# 著者名,所属,キーワードなどに一致する情報を取得:get_jstage_articlesコマンド
# 注:一度に取得できるデータは最大1000件,
# 1000件以上続きで取得する場合はstartオプションで開始番号を指定
# 著者名を指定:authorオプション;初期値:""
# 所属を指定:affilオプション;初期値:""
# キーワードを指定:keywordオプション;初期値:""
# 情報取得開始の番号を指定:startオプション;初期値:NA
GetData <- get_jstage_articles(pubyearfrom = 2000, pubyearto = NA,
material = "", article = "", author = "", affil = "",
keyword = "クロレラ", abst = "", text = "",
issn = "", cdjournal = "", sortflg = NA,
vol = NA, no = NA, start = NA, count = NA, lang = "ja")
# 確認
# 結果はList classで$metadataと$entryで構成されています
GetData
# $metadata
# # A tibble: 1 × 10
# 処理結果ステータス 処理結果メッセージ フィード名 クエリのURL クエリのURI サービスコード
# <chr> <chr> <chr> <chr> <chr> <chr>
# 1 0 "" Articles "" https://api.jst… 3
# # ℹ 4 more variables: 取得日時 <chr>, 検索結果総数 <dbl>, 開始件数 <dbl>, 件数 <dbl>
#
# $entry
# # A tibble: 17 × 25
# `論文タイトル(英)` `論文タイトル(日)` `書誌URL(英)` `書誌URL(日)` `著者名(英)` `著者名(日)`
# <chr> <chr> <chr> <chr> <chr> <chr>
# 1 "Effects of Chlor… ウラン腎臓取り込… https://www.… https://www.… "Kazushi TA… "瀧山 和志\…
# 2 "" クロレラで有用物… https://www.… https://www.… "Japan Scie… "国立研究開…
# 3 "" 迅速な進化が捕食… https://www.… https://www.… "" "吉田 丈人\…
# 4 "Use of complemen… 消化器病患者にお… https://www.… https://www.… "Ryukichi K… "神代 龍吉\…
# 5 "Effect of Chlore… インフルエンザ感… https://www.… https://www.… "Toru MIZOG… "溝口 亨\n…
# 6 "Lipid and Fatty … ドコサヘキサエン… https://www.… https://www.… "Tsugiyo Yu… "雪野 繼代\…
# 7 "Clinical Study o… 血圧が高めの健常… https://www.… https://www.… "Takashi Ts… "土田 隆\n…
# 8 "Mechanism of est… 単細胞動物ミドリ… https://www.… https://www.… "Yuuki Koda… "児玉 有紀\…
# 9 "Leakage of Intra… 撹拌による藍藻ス… https://www.… https://www.… "Yuichi Ohi… "大平 勇一\…
# 10 "Toxic eruption a… クロレラによる中… https://www.… https://www.… "Izumi Kono… "木花 いづ…
# 11 "Effects of a pep… 緑藻 クロレラ <i>… https://www.… https://www.… "HIROKO ITO… "伊藤 浩子\…
# 12 "Optimal Sparging… 藻類培養における… https://www.… https://www.… "Yuichi OHI… "大平 勇一\…
# 13 "Verification and… フェオホルバイド… https://www.… https://www.… "Yusuke Fur… "古川 祐輔\…
# 14 "Method Improveme… クロレラ加工品中… https://www.… https://www.… "Shizuka Sa… "志田(齊藤…
# 15 "Green Innovation… 重イオンビーム育… https://www.… https://www.… "Yusuke Kaz… "風間 裕介\…
# 16 "Effect of Liposo… 高血圧自然発症ラ… https://www.… https://www.… "Makoto Tak… "高橋 誠\n…
# 17 "" 微細藻類が地球を… https://www.… https://www.… "Japan Scie… "国立研究開…
# # ℹ 19 more variables: 資料コード <chr>, `資料名(英)` <chr>, `資料名(日)` <chr>,
# # `Print ISSN` <chr>, `Online ISSN` <chr>, 巻 <dbl>, 分冊 <chr>, 号 <dbl>,
# # 開始ページ <dbl>, 終了ページ <chr>, 発行年 <dbl>, JOI <chr>, DOI <chr>,
# # システムコード <chr>, システム名 <chr>, サブフィード名 <chr>, サブフィードURL <chr>,
# # サブフィードID <chr>, 最新公開日 <chr>
# 各種取得データを作業フォルダにxlsx形式で保存:write_jstage_to_excelコマンド
write_jstage_to_excel(GetData, file_name = "Test.xlsx")
少しでも、あなたの解析が楽になりますように!!