{"id":1519,"date":"2024-11-05T08:02:29","date_gmt":"2024-11-04T23:02:29","guid":{"rendered":"https:\/\/info.zanet.biz\/?p=1519"},"modified":"2024-11-05T08:37:06","modified_gmt":"2024-11-04T23:37:06","slug":"rismed%e3%82%92%e7%94%a8%e3%81%84%e3%81%9fpubmed%e6%a4%9c%e7%b4%a2","status":"publish","type":"post","link":"https:\/\/info.zanet.biz\/?p=1519","title":{"rendered":"RISmed\u3092\u7528\u3044\u305fPubMed\u691c\u7d22"},"content":{"rendered":"\n<p>RISmed\u306fPubMed\u691c\u7d22\u306e\u305f\u3081\u306eR\u306e\u30d1\u30c3\u30b1\u30fc\u30b8\u3067\u3059\u3002\u4f5c\u8005\u306fStephanie Kovalchik\u6c0f\u3067\u3059\u3002ASReview <a href=\"https:\/\/asreview.nl\/\" target=\"_blank\" rel=\"noreferrer noopener\">https:\/\/asreview.nl\/<\/a> \u3092\u7528\u3044\u305f\u6587\u732e\u9078\u5b9a\u306e\u969b\u306b\u306f\u3001Title, Abstract\u306e\u30c7\u30fc\u30bf\u3092\u7528\u3044\u307e\u3059\u3002\u66f8\u8a8c\u60c5\u5831\u3068\u5408\u308f\u305b\u3066\u3001\u3053\u308c\u3089\u306e\u30c7\u30fc\u30bf\u3092\u542b\u3080Excel\u30d5\u30a1\u30a4\u30eb\u3001\u307e\u305f\u306fCSV\u3042\u308b\u3044\u306fRIS\u30d5\u30a1\u30a4\u30eb\u3092\u7528\u610f\u3059\u308b\u5fc5\u8981\u304c\u3042\u308a\u307e\u3059\u3002\u305d\u306e\u969b\u306b\u3001RISmed\u3092\u4f7f\u3046\u306e\u304c\u3072\u3068\u3064\u306e\u65b9\u6cd5\u3067\u3059\u3002<\/p>\n\n\n\n<p>PubMed\u3067\u306fGET\u30e1\u30bd\u30c3\u30c9\u3067\u76f4\u63a5\u30c7\u30fc\u30bf\u30d9\u30fc\u30b9\u306b\u30a2\u30af\u30bb\u30b9\u3057\u3066\u3001\u691c\u7d22\u7d50\u679c\u3092\u30c0\u30a6\u30f3\u30ed\u30fc\u30c9\u3067\u304d\u308be-utilities\u3068\u3044\u3046\u30b5\u30fc\u30d3\u30b9\u304c\u3042\u308a\u307e\u3059\u3002MeSH\u3078\u306eAutomatic Term Mapping\u306f\u9069\u7528\u3055\u308c\u307e\u305b\u3093\u3002<a href=\"https:\/\/www.ncbi.nlm.nih.gov\/books\/NBK25501\/\">https:\/\/www.ncbi.nlm.nih.gov\/books\/NBK25501\/<\/a><\/p>\n\n\n\n<p>\u305d\u308c\u3092\u5229\u7528\u3059\u308bR\u306e\u30d1\u30c3\u30b1\u30fc\u30b8\u3067\u3059\u3002<a href=\"https:\/\/stat.zanet.biz\/sr\/pmsearch.htm\" target=\"_blank\" rel=\"noreferrer noopener\">pmSearch<\/a>\u3082\u540c\u3058\u30b5\u30fc\u30d3\u30b9\u3092\u5229\u7528\u3057\u3066\u3044\u307e\u3059\u3002<\/p>\n\n\n\n<p>RISmed\u3068tcltk2\u306e\u30d1\u30c3\u30b1\u30fc\u30b8\u3092The Comprehensive R Archive Network (CRAN)\uff08<a href=\"https:\/\/cran.r-project.org\/\" target=\"_blank\" rel=\"noreferrer noopener\">https:\/\/cran.r-project.org\/<\/a>\uff09\u304b\u3089R\u306b\u30a4\u30f3\u30b9\u30c8\u30fc\u30eb\u3057\u3066\u304a\u304d\u307e\u3059\u3002tcltk2\u306f\u691c\u7d22\u7d50\u679c\u3092CSV\u30d5\u30a1\u30a4\u30eb\u3068\u3057\u3066\u4fdd\u5b58\u3059\u308b\u969b\u306e\u30a4\u30f3\u30bf\u30fc\u30d5\u30a7\u30fc\u30b9\u3068\u3057\u3066\u7528\u3044\u307e\u3059\u3002<br>Stephanie Kovalchik: RISmed <a href=\"https:\/\/cran.r-project.org\/web\/packages\/RISmed\/index.html\" target=\"_blank\" rel=\"noreferrer noopener\">https:\/\/cran.r-project.org\/web\/packages\/RISmed\/index.html<\/a><br>Philippe Grosjean: tcltk2 <a href=\"https:\/\/cran.r-project.org\/web\/packages\/tcltk2\/index.html\" target=\"_blank\" rel=\"noreferrer noopener\">https:\/\/cran.r-project.org\/web\/packages\/tcltk2\/index.html<\/a><\/p>\n\n\n\n<p>\u30d1\u30c3\u30b1\u30fc\u30b8\u304c\u307e\u3060\u30a4\u30f3\u30b9\u30c8\u30fc\u30eb\u3055\u308c\u3066\u3044\u306a\u3044\u5834\u5408\u306f\u3001\u4ee5\u4e0b\u306e\u30b9\u30af\u30ea\u30d7\u30c8\u3092R\u3067\u5b9f\u884c\u3057\u3066\u304f\u3060\u3055\u3044\u3002<br>#Install the packages.<br>packneed=c(&#8220;RISmed&#8221;,&#8221;tcltk2&#8243;);current=installed.packages();addpack=setdiff(packneed,rownames(current));url=&#8221;https:\/\/ftp.yz.yamagata-u.ac.jp\/pub\/cran\/&#8221;;if(length(addpack)&gt;0){install.packages(addpack,repos=url)};if(length(addpack)==0){print(&#8220;Already installed.&#8221;)}<\/p>\n\n\n\n<p>\u4ee5\u4e0b\u306eR\u3067\u30b9\u30af\u30ea\u30d7\u30c8\u3092\u5b9f\u884c\u3059\u308b\u3068\u691c\u7d22\u7d50\u679c\u3092CSV\u30d5\u30a1\u30a4\u30eb\u3068\u3057\u3066\u4fdd\u5b58\u3067\u304d\u307e\u3059\u3002SearchWords\u3068\u8a00\u3046\u5909\u6570\u306b\u691c\u7d22\u5f0fsearch query\u3092\u683c\u7d0d\u3057\u307e\u3059\u306e\u3067\u3001&#8221;&#8221;\u3067\u56f2\u3093\u3067\u3042\u308b\u3068\u3053\u308d\u3092\u66f8\u304d\u63db\u3048\u3066\u4f7f\u7528\u3057\u3066\u304f\u3060\u3055\u3044\u3002\u3059\u3079\u3066\u3092\u9078\u629e\u3057\u3066\u3001\u5b9f\u884c\u3059\u308b\u3068\u3001\u30d5\u30a1\u30a4\u30eb\u4fdd\u5b58\u306e\u30c0\u30a4\u30a2\u30ed\u30b0\u307e\u3067\u5b9f\u884c\u3055\u308c\u307e\u3059\u3002ResultsData=EUtilsGet(Results, type=&#8221;efetch&#8221;, db=&#8221;pubmed&#8221;)\u306e\u5b9f\u884c\u306b\u6642\u9593\u304c\u304b\u304b\u308a\u307e\u3059\u3002<\/p>\n\n\n\n<p>\u4fdd\u5b58\u3057\u305fCSV\u30d5\u30a1\u30a4\u30eb\u3092\u76f4\u63a5\u958b\u304f\u306e\u3067\u306f\u306a\u304f\u3001Excel\u3092\u8d77\u52d5\u3057\u3066\u3001\u30c7\u30fc\u30bf\u30e1\u30cb\u30e5\u30fc\u304b\u3089\u30c6\u30ad\u30b9\u30c8\u307e\u305f\u306fCSV\u30d5\u30a1\u30a4\u30eb\u304b\u3089\u30a4\u30f3\u30dd\u30fc\u30c8\u3057\u307e\u3059\u3002\u5143\u306e\u30d5\u30a1\u30a4\u30eb\u306fUTF-8\u3067\u30a8\u30f3\u30b3\u30fc\u30c9\u3055\u308c\u3066\u304a\u308a\u3001Shift JIS\u304c\u30c7\u30d5\u30a9\u30eb\u30c8\u306eExcel\u3067\u306f\u6587\u5b57\u5316\u3051\u3059\u308b\u306e\u3067\u3001\u305d\u306e\u3088\u3046\u306a\u624b\u9806\u3092\u53d6\u308a\u307e\u3059\u3002\u30d5\u30a1\u30a4\u30eb\u4fdd\u5b58\u306e\u969b\u306f.xlsx\u306b\u3059\u308b\u3053\u3068\u3082\u3067\u304d\u307e\u3059\u3002<\/p>\n\n\n\n<p>\u307e\u305f\u3001CSV\u30d5\u30a1\u30a4\u30eb\u306f\u30c6\u30ad\u30b9\u30c8\u30d5\u30a1\u30a4\u30eb\u306a\u306e\u3067\u3001Notepad\uff0b\uff0b <a href=\"https:\/\/notepad-plus-plus.org\/\" target=\"_blank\" rel=\"noreferrer noopener\">https:\/\/notepad-plus-plus.org\/<\/a> \u306a\u3069\u3067\u4e00\u5ea6\u958b\u3044\u3066\u3001\u30a8\u30f3\u30b3\u30fc\u30c7\u30a3\u30f3\u30b0\u3092UTF-8-BOM\u306b\u5909\u63db\u3059\u308b\u3068Excle\u3067\u76f4\u63a5\u958b\u3044\u3066\u3082\u6587\u5b57\u5316\u3051\u3057\u307e\u305b\u3093\u3002<\/p>\n\n\n\n<figure class=\"wp-block-image size-full\"><img loading=\"lazy\" decoding=\"async\" width=\"907\" height=\"454\" src=\"https:\/\/info.zanet.biz\/wp\/wp-content\/uploads\/2024\/11\/rismed_csv_excel.png\" alt=\"\" class=\"wp-image-1520\" srcset=\"https:\/\/info.zanet.biz\/wp\/wp-content\/uploads\/2024\/11\/rismed_csv_excel.png 907w, https:\/\/info.zanet.biz\/wp\/wp-content\/uploads\/2024\/11\/rismed_csv_excel-300x150.png 300w, https:\/\/info.zanet.biz\/wp\/wp-content\/uploads\/2024\/11\/rismed_csv_excel-768x384.png 768w\" sizes=\"auto, (max-width: 709px) 85vw, (max-width: 909px) 67vw, (max-width: 1362px) 62vw, 840px\" \/><figcaption class=\"wp-element-caption\">\u56f3 Excle\u3067\u53d6\u308a\u8fbc\u3093\u3067.x.sx\u30d5\u30a1\u30a4\u30eb\u3068\u3057\u3066\u4fdd\u5b58\u3057\u305fPubMed\u691c\u7d22\u7d50\u679c\u3002<\/figcaption><\/figure>\n\n\n\n<p>\u4ee5\u4e0b\u306bR\u7528\u306e\u30b9\u30af\u30ea\u30d7\u30c8\u3092\u793a\u3057\u307e\u3059\u3002<br>library(&#8220;RISmed&#8221;)<br>library(&#8220;tcltk2&#8221;)<br><br>#Make a search query for PubMed. Write your query in &#8221; &#8220;.<\/p>\n\n\n\n<p>SearchWords=&#8221;(junior doctor OR young doctor OR resident physician OR intern) AND mindfulness AND humans[mh] AND (english[la] OR japanese[la]) AND hasabstract[tw] AND 2024[dp]&#8221;<br><br>#Connect and retrieve a list of PubMed IDs. You can change retmax and set years asmindate=2000, maxdate=2024, retmax=2000<\/p>\n\n\n\n<p>Results=EUtilsSummary(SearchWords, type=&#8221;esearch&#8221;, db=&#8221;pubmed&#8221;, retmax=2000)<br><br>#Show the number of citations retrieved and get title, abstract and other data. This step takes time.<\/p>\n\n\n\n<p>QueryCount(Results)<br>ResultsData=EUtilsGet(Results, type=&#8221;efetch&#8221;, db=&#8221;pubmed&#8221;)<br><br>#Make publication year list.<\/p>\n\n\n\n<p>year=YearEntrez(ResultsData)<br><br>#Make a list of authors (Last name + initials) for each citation and a list of reference id (first author + year).<\/p>\n\n\n\n<p>au=Author(ResultsData)<br>refn=length(au)<br>auv=rep(&#8220;&#8221;,refn)<br>refidv=rep(&#8220;&#8221;,refn)<br>for(i in 1:refn){<br>authors=cbind(au[[i]]$LastName,au[[i]]$Initials)<br>ma=nrow(authors)<br>authors[1,]<br>paste(authors[1,1],authors[1,2])<\/p>\n\n\n\n<p>aul=&#8221;&#8221;<br>for(j in 1:ma){<br>aut=paste(authors[j,1],authors[j,2])<br>aul=paste(aul,aut,sep=&#8221;, &#8220;)<br>}<br>aul=substr(aul,3,nchar(aul))<br>auv[i]=aul<br>refidv[i]=paste(authors[1,1],authors[1,2],year[i])<br>}<br><br>#Make citation list. No formatting. Including DOI information.<br>refer=Citations(ResultsData)<br><br>cite=rep(&#8220;&#8221;,refn)<br>for(i in 1:refn){<br>cite[i]=refer[[2]][[i]]<br>}<br><br>#Create a data frame of PMID, Reference_ID,Citation,Year, Title,Abstract. Citation format is not modified.<br><br>pubmed_data=data.frame(&#8216;PMID&#8217;=PMID(ResultsData),&#8217;Reference_ID&#8217;=refidv,&#8217;Citation&#8217;=cite, &#8216;Year&#8217;=YearEntrez(ResultsData), &#8216;Title&#8217;=ArticleTitle(ResultsData), &#8216;Abstract&#8217;=AbstractText(ResultsData))<br><br>#Save the frame work as a CSV file with a save file dialogue. Add file extension &#8220;.csv&#8221;.<br><br>filnam=tclvalue(tkgetSaveFile(initialfile=&#8221;export.csv&#8221;,filetypes=&#8221;{{CSV Files} {.csv}} {{All files} *}&#8221;));if(filnam!=&#8221;.csv&#8221;){write.csv(pubmed_data,filnam,row.names=FALSE)}<br><br>#Do not open the file directly to avoid character encoding trouble. Launch Excel, then from Data menu use import text\/csv file.<br>#The saved file is a text file with UTF-8. You can change encoding from UTF-8 to UTF-8-BOM using Notpad++, and you can directly open the file with Excel without garbles.<\/p>\n\n\n\n<p><\/p>\n","protected":false},"excerpt":{"rendered":"<p>RISmed\u306fPubMed\u691c\u7d22\u306e\u305f\u3081\u306eR\u306e\u30d1\u30c3\u30b1\u30fc\u30b8\u3067\u3059\u3002\u4f5c\u8005\u306fStephanie Kovalchik\u6c0f\u3067\u3059\u3002ASReview https:\/\/asreview.nl\/ \u3092\u7528\u3044\u305f\u6587\u732e\u9078\u5b9a\u306e\u969b\u306b\u306f\u3001Title, Abstr &hellip; <a href=\"https:\/\/info.zanet.biz\/?p=1519\" class=\"more-link\"><span class=\"screen-reader-text\">&#8220;RISmed\u3092\u7528\u3044\u305fPubMed\u691c\u7d22&#8221; \u306e<\/span>\u7d9a\u304d\u3092\u8aad\u3080<\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[23,2],"tags":[],"class_list":["post-1519","post","type-post","status-publish","format-standard","hentry","category-literature-search","category-sr"],"_links":{"self":[{"href":"https:\/\/info.zanet.biz\/index.php?rest_route=\/wp\/v2\/posts\/1519","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/info.zanet.biz\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/info.zanet.biz\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/info.zanet.biz\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/info.zanet.biz\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=1519"}],"version-history":[{"count":6,"href":"https:\/\/info.zanet.biz\/index.php?rest_route=\/wp\/v2\/posts\/1519\/revisions"}],"predecessor-version":[{"id":1526,"href":"https:\/\/info.zanet.biz\/index.php?rest_route=\/wp\/v2\/posts\/1519\/revisions\/1526"}],"wp:attachment":[{"href":"https:\/\/info.zanet.biz\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=1519"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/info.zanet.biz\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=1519"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/info.zanet.biz\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=1519"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}