{"id":370,"date":"2021-01-01T03:12:42","date_gmt":"2021-01-01T03:12:42","guid":{"rendered":"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/?p=370"},"modified":"2024-05-24T07:04:46","modified_gmt":"2024-05-23T22:04:46","slug":"rscript","status":"publish","type":"post","link":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/","title":{"rendered":"\u3088\u304f\u4f7f\u3046R\u5c0f\u6280\u96c6(\u968f\u6642\u66f4\u65b0)"},"content":{"rendered":"\n<figure class=\"wp-block-image aligncenter size-large\"><img loading=\"lazy\" decoding=\"async\" width=\"1024\" height=\"538\" src=\"http:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1-1024x538.png\" alt=\"\" class=\"wp-image-709\" srcset=\"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1-1024x538.png 1024w, https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1-300x158.png 300w, https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1-768x404.png 768w, https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1-1536x807.png 1536w, https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1-1920x1009.png 1920w, https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1.png 2002w\" sizes=\"auto, (max-width: 1024px) 100vw, 1024px\" \/><\/figure>\n\n\n\n<p>\u30c7\u30fc\u30bf\u30e9\u30f3\u30b0\u30ea\u30f3\u30b0\u3084\u53ef\u8996\u5316\u3001\u5206\u6790\u3092\u3059\u308b\u305f\u3081\u306bR\u3092\u64cd\u4f5c\u3057\u3066\u3044\u308b\u3068\u3001\u4ee5\u524d\u66f8\u3044\u305f\u30b3\u30fc\u30c9\u3092\u5fd8\u308c\u3066\u3001\u8abf\u3079\u308b\u305f\u3073\u306b\u540c\u3058\u9801\u306b\u884c\u304d\u7740\u304f\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u3002\u4e00\u5b9a\u56de\u6570\u4ee5\u4e0a\u300c\u3042\u308c\u3001\u3069\u3046\u3060\u3063\u305f\u3051\u306a\uff1f\u300d\u3068\u601d\u3063\u3066\u8abf\u3079\u305f\u5c0f\u6280\u306b\u3064\u3044\u3066\u3001\u968f\u6642\u63b2\u8f09\u3057\u3066\u3044\u304d\u307e\u3059\u3002<\/p>\n\n\n\n<p><\/p>\n\n\n\n<div id=\"ez-toc-container\" class=\"ez-toc-v2_0_76 ez-toc-wrap-left counter-hierarchy ez-toc-counter ez-toc-grey ez-toc-container-direction\">\n<div class=\"ez-toc-title-container\">\n<p class=\"ez-toc-title\" style=\"cursor:inherit\">Table of Contents<\/p>\n<span class=\"ez-toc-title-toggle\"><a href=\"#\" class=\"ez-toc-pull-right ez-toc-btn ez-toc-btn-xs ez-toc-btn-default ez-toc-toggle\" aria-label=\"Toggle Table of Content\"><span class=\"ez-toc-js-icon-con\"><span class=\"\"><span class=\"eztoc-hide\" style=\"display:none;\">Toggle<\/span><span class=\"ez-toc-icon-toggle-span\"><svg style=\"fill: #999;color:#999\" xmlns=\"http:\/\/www.w3.org\/2000\/svg\" class=\"list-377408\" width=\"20px\" height=\"20px\" viewBox=\"0 0 24 24\" fill=\"none\"><path d=\"M6 6H4v2h2V6zm14 0H8v2h12V6zM4 11h2v2H4v-2zm16 0H8v2h12v-2zM4 16h2v2H4v-2zm16 0H8v2h12v-2z\" fill=\"currentColor\"><\/path><\/svg><svg style=\"fill: #999;color:#999\" class=\"arrow-unsorted-368013\" xmlns=\"http:\/\/www.w3.org\/2000\/svg\" width=\"10px\" height=\"10px\" viewBox=\"0 0 24 24\" version=\"1.2\" baseProfile=\"tiny\"><path d=\"M18.2 9.3l-6.2-6.3-6.2 6.3c-.2.2-.3.4-.3.7s.1.5.3.7c.2.2.4.3.7.3h11c.3 0 .5-.1.7-.3.2-.2.3-.5.3-.7s-.1-.5-.3-.7zM5.8 14.7l6.2 6.3 6.2-6.3c.2-.2.3-.5.3-.7s-.1-.5-.3-.7c-.2-.2-.4-.3-.7-.3h-11c-.3 0-.5.1-.7.3-.2.2-.3.5-.3.7s.1.5.3.7z\"\/><\/svg><\/span><\/span><\/span><\/a><\/span><\/div>\n<nav><ul class='ez-toc-list ez-toc-list-level-1 ' ><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-1\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E3%83%87%E3%83%BC%E3%82%BF%E3%83%A9%E3%83%B3%E3%82%B0%E3%83%AA%E3%83%B3%E3%82%B0\" >\u30c7\u30fc\u30bf\u30e9\u30f3\u30b0\u30ea\u30f3\u30b0<\/a><ul class='ez-toc-list-level-3' ><li class='ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-2\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E3%83%95%E3%82%A9%E3%83%AB%E3%83%80%E5%86%85%E3%81%AEcsv%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%82%92%E8%AA%AD%E3%81%BF%E8%BE%BC%E3%82%93%E3%81%A7%E4%B8%80%E6%B0%97%E3%81%AB%E7%B5%90%E5%90%88%E3%81%99%E3%82%8B\" >\u30d5\u30a9\u30eb\u30c0\u5185\u306e.csv\u30d5\u30a1\u30a4\u30eb\u3092\u8aad\u307f\u8fbc\u3093\u3067\u4e00\u6c17\u306b\u7d50\u5408\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-3\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E6%BC%A2%E6%95%B0%E5%AD%97%E3%82%92%E3%82%A2%E3%83%A9%E3%83%93%E3%82%A2%E6%95%B0%E5%AD%97%E3%81%AB%E5%A4%89%E6%8F%9B%E3%81%99%E3%82%8B\" >\u6f22\u6570\u5b57\u3092\u30a2\u30e9\u30d3\u30a2\u6570\u5b57\u306b\u5909\u63db\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-4\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E5%85%A8%E8%A7%92%E3%82%92%E5%8D%8A%E8%A7%92%E3%81%AB%E3%81%99%E3%82%8B\" >\u5168\u89d2\u3092\u534a\u89d2\u306b\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-5\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E6%95%B0%E5%AD%97%E3%82%92%E6%8C%87%E5%AE%9A%E3%81%97%E3%81%9F%E6%A1%81%E6%95%B0%E3%81%A7%E3%83%91%E3%83%87%E3%82%A3%E3%83%B3%E3%82%B0%E3%81%99%E3%82%8B9_%E2%86%92_09\" >\u6570\u5b57\u3092\u6307\u5b9a\u3057\u305f\u6841\u6570\u3067\u30d1\u30c7\u30a3\u30f3\u30b0\u3059\u308b(9 \u2192 09)<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-6\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E6%95%B0%E5%AD%97%E5%88%97%E3%81%AENA%E3%82%920%E3%81%AB%E7%BD%AE%E6%8F%9B%E3%81%99%E3%82%8B\" >\u6570\u5b57\u5217\u306eNA\u30920\u306b\u7f6e\u63db\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-7\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#NA%E4%BB%A5%E5%A4%96%E3%81%AE%E8%A1%8C%E3%82%92%E9%81%B8%E6%8A%9E\" >NA\u4ee5\u5916\u306e\u884c\u3092\u9078\u629e<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-8\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#dplyr_if_else_%E3%81%A7_0_%E3%82%92_NA_%E3%81%AB%E7%BD%AE%E6%8F%9B\" >dplyr::if_else \u3067 0 \u3092 NA \u306b\u7f6e\u63db<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-9\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#NA%E3%81%AE%E3%81%82%E3%82%8B%E5%88%97%E3%82%92%E3%81%B5%E3%81%8F%E3%82%81%E3%81%9F%E3%83%87%E3%83%BC%E3%82%BF%E3%81%A7%E6%96%87%E5%AD%97%E7%B5%90%E5%90%88%EF%BC%88str_c%EF%BC%89%E3%81%99%E3%82%8B\" >NA\u306e\u3042\u308b\u5217\u3092\u3075\u304f\u3081\u305f\u30c7\u30fc\u30bf\u3067\u6587\u5b57\u7d50\u5408\uff08str_c()\uff09\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-10\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E3%83%87%E3%83%BC%E3%82%BF%E5%9E%8B%E3%81%AE%E4%B8%80%E6%8B%AC%E5%A4%89%E6%8F%9B\" >\u30c7\u30fc\u30bf\u578b\u306e\u4e00\u62ec\u5909\u63db<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-11\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E5%88%97%E5%90%8D%E3%81%AE%E4%B8%80%E6%8B%AC%E5%A4%89%E6%9B%B4\" >\u5217\u540d\u306e\u4e00\u62ec\u5909\u66f4<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-12\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E8%A6%81%E7%B4%A0%E5%90%8D%E3%81%AE%E5%A4%89%E6%9B%B4\" >\u8981\u7d20\u540d\u306e\u5909\u66f4<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-13\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E8%A6%81%E7%B4%A0%E5%90%8D%E3%82%92%E3%81%BE%E3%81%A8%E3%82%81%E3%81%A6%E5%86%8D%E3%82%B0%E3%83%AB%E3%83%BC%E3%83%97%E3%81%99%E3%82%8B\" >\u8981\u7d20\u540d\u3092\u307e\u3068\u3081\u3066\u518d\u30b0\u30eb\u30fc\u30d7\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-14\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E8%A6%81%E7%B4%A0%E5%90%8D%E3%81%AE%E9%A0%86%E5%BA%8F%E3%81%AE%E5%A4%89%E6%9B%B4\" >\u8981\u7d20\u540d\u306e\u9806\u5e8f\u306e\u5909\u66f4<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-15\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#dplyr_rename_%E3%81%A7_%E6%96%87%E5%AD%97%E3%83%99%E3%82%AF%E3%83%88%E3%83%AB%E3%82%92%E4%BD%BF%E3%81%A3%E3%81%A6%E4%B8%80%E6%8B%AC%E5%A4%89%E6%9B%B4\" >dplyr::rename \u3067 \u6587\u5b57\u30d9\u30af\u30c8\u30eb\u3092\u4f7f\u3063\u3066\u4e00\u62ec\u5909\u66f4<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-16\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E3%83%99%E3%82%AF%E3%83%88%E3%83%AB%E3%81%A7%E5%88%97%E5%90%8D%E3%82%92%E5%8F%96%E5%BE%97\" >\u30d9\u30af\u30c8\u30eb\u3067\u5217\u540d\u3092\u53d6\u5f97<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-17\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E3%83%99%E3%82%AF%E3%83%88%E3%83%AB%E5%86%85%E3%81%AE%E7%89%B9%E5%AE%9A%E3%81%AE%E5%80%A4X%E3%81%AE%E5%80%8B%E6%95%B0%E3%82%92%E5%8F%96%E5%BE%97\" >\u30d9\u30af\u30c8\u30eb\u5185\u306e\u7279\u5b9a\u306e\u5024(X)\u306e\u500b\u6570\u3092\u53d6\u5f97<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-18\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E6%96%87%E5%AD%97%E5%88%97%E3%82%92%E5%88%A5%E3%81%AB%E6%8C%87%E5%AE%9A%E3%81%97%E3%81%A6%E9%96%A2%E6%95%B0%E3%81%AB%E4%BD%BF%E7%94%A8%E3%81%99%E3%82%8B\" >\u6587\u5b57\u5217\u3092\u5225\u306b\u6307\u5b9a\u3057\u3066\u95a2\u6570\u306b\u4f7f\u7528\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-19\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#dplyr_filter_%E3%81%A7%E5%88%97%E6%8C%87%E5%AE%9A%E3%82%92%E6%96%87%E5%AD%97%E5%88%97%E3%81%A7%E3%81%AF%E3%81%AA%E3%81%8F%E5%88%97%E7%95%AA%E5%8F%B7%E3%81%A7%E6%8C%87%E5%AE%9A%E3%81%99%E3%82%8B\" >dplyr::filter \u3067\u5217\u6307\u5b9a\u3092\u6587\u5b57\u5217\u3067\u306f\u306a\u304f\u5217\u756a\u53f7\u3067\u6307\u5b9a\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-20\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#dplyr_filter_%E3%81%A7_%E6%96%87%E5%AD%97%E3%81%AE%E9%83%A8%E5%88%86%E4%B8%80%E8%87%B4_%E3%82%92%E4%BD%BF%E3%81%86%EF%BC%88_%E5%88%97%E7%95%AA%E5%8F%B7%E3%81%A7%E6%8C%87%E5%AE%9A%EF%BC%89\" >dplyr::filter \u3067 \u6587\u5b57\u306e\u90e8\u5206\u4e00\u81f4 \u3092\u4f7f\u3046\uff08 + \u5217\u756a\u53f7\u3067\u6307\u5b9a\uff09<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-21\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E6%95%B0%E5%AD%97%E3%81%A8%E6%96%87%E5%AD%97%E3%81%8C%E7%B5%90%E5%90%88%E3%81%97%E3%81%9F%E5%88%97%E3%82%92%E5%88%86%E9%9B%A2%E3%81%99%E3%82%8B\" >\u6570\u5b57\u3068\u6587\u5b57\u304c\u7d50\u5408\u3057\u305f\u5217\u3092\u5206\u96e2\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-22\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#2%E3%81%A4%E3%81%AE_Date%E5%9E%8B_%E3%81%AE%E6%97%A5%E4%BB%98%E3%83%87%E3%83%BC%E3%82%BF%E3%81%8B%E3%82%89%E5%B9%B4%E9%BD%A2%E3%82%92%E8%A8%88%E7%AE%97\" >2\u3064\u306e Date\u578b \u306e\u65e5\u4ed8\u30c7\u30fc\u30bf\u304b\u3089\u5e74\u9f62\u3092\u8a08\u7b97<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-23\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E6%97%A5%E4%BB%98%E3%83%87%E3%83%BC%E3%82%BF%E3%81%8B%E3%82%89%E7%89%B9%E5%AE%9A%E3%81%AE%E6%9C%9F%E9%96%93%E3%81%AE%E3%83%87%E3%83%BC%E3%82%BF%E3%82%92%E6%8A%9C%E3%81%8D%E5%87%BA%E3%81%99\" >\u65e5\u4ed8\u30c7\u30fc\u30bf\u304b\u3089\u7279\u5b9a\u306e\u671f\u9593\u306e\u30c7\u30fc\u30bf\u3092\u629c\u304d\u51fa\u3059<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-24\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#lubridate_asduration_%E3%81%A7%E8%A8%88%E7%AE%97%E3%81%97%E3%81%9F%E5%80%A4%E3%82%92%E6%97%A5%E6%95%B0%E5%8D%98%E4%BD%8D%E3%81%AB%E8%A8%88%E7%AE%97%E3%81%99%E3%82%8B\" >{lubridate} as.duration() \u3067\u8a08\u7b97\u3057\u305f\u5024\u3092\u65e5\u6570\u5358\u4f4d\u306b\u8a08\u7b97\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-25\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#list_%E5%9E%8B%E3%81%AE%E3%83%87%E3%83%BC%E3%82%BF%E3%82%92_dataframe_%E3%81%AB%E5%B1%95%E9%96%8B%E3%81%99%E3%82%8B\" >list \u578b\u306e\u30c7\u30fc\u30bf\u3092 data.frame \u306b\u5c55\u958b\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-26\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E9%87%8D%E8%A4%87%E8%A1%8C%E3%81%AE%E5%89%8A%E9%99%A4\" >\u91cd\u8907\u884c\u306e\u524a\u9664<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-27\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E9%87%8D%E8%A4%87%E8%A1%8C%E3%81%AE%E7%A2%BA%E8%AA%8D\" >\u91cd\u8907\u884c\u306e\u78ba\u8a8d<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-28\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E7%89%B9%E5%AE%9A%E3%81%AE%E5%88%97%E3%81%AE_NA_%E3%82%92%E7%BD%AE%E3%81%8D%E6%8F%9B%E3%81%88%E3%82%8B\" >\u7279\u5b9a\u306e\u5217\u306e NA \u3092\u7f6e\u304d\u63db\u3048\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-29\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E8%A1%8C%E5%88%97_%E3%81%AE_%E4%B8%8A%E4%B8%89%E8%A7%92_%E3%82%92_%E4%B8%8B%E4%B8%89%E8%A7%92_%E3%81%AB%E3%82%B3%E3%83%94%E3%83%BC\" >\u884c\u5217 \u306e \u4e0a\u4e09\u89d2 \u3092 \u4e0b\u4e09\u89d2 \u306b\u30b3\u30d4\u30fc<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-30\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#mutate_%E3%81%A7%E8%A4%87%E6%95%B0%E5%88%97%E3%82%92%E9%81%B8%E6%8A%9E%E3%81%97%E3%81%A6%E5%90%88%E8%A8%88%E3%81%97%E3%81%9F%E3%81%84%E5%A0%B4%E5%90%88\" >mutate() \u3067\u8907\u6570\u5217\u3092\u9078\u629e\u3057\u3066\u5408\u8a08\u3057\u305f\u3044\u5834\u5408<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-31\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#wide_%E3%83%87%E3%83%BC%E3%82%BF%E3%81%AE%E3%81%BE%E3%81%BE%E3%80%81%E5%88%97%E6%AF%8E%E3%81%AB%E4%B8%80%E6%8B%AC%E3%81%97%E3%81%A6%E8%A8%88%E7%AE%97%E3%81%97%E3%81%9F%E3%81%84%E5%A0%B4%E5%90%88\" >wide \u30c7\u30fc\u30bf\u306e\u307e\u307e\u3001\u5217\u6bce\u306b\u4e00\u62ec\u3057\u3066\u8a08\u7b97\u3057\u305f\u3044\u5834\u5408<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-32\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E3%82%B5%E3%83%96%E3%83%87%E3%82%A3%E3%83%AC%E3%82%AF%E3%83%88%E3%83%AA%E5%86%85%E3%81%AE%E3%83%87%E3%83%BC%E3%82%BF%E3%82%82%E5%8F%96%E5%BE%97%E3%81%99%E3%82%8B\" >\u30b5\u30d6\u30c7\u30a3\u30ec\u30af\u30c8\u30ea\u5185\u306e\u30c7\u30fc\u30bf\u3082\u53d6\u5f97\u3059\u308b<\/a><\/li><\/ul><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-33\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E5%8F%AF%E8%A6%96%E5%8C%96\" >\u53ef\u8996\u5316<\/a><ul class='ez-toc-list-level-3' ><li class='ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-34\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#ggplot2_theme_set_%E3%81%AE%E6%B4%BB%E7%94%A8\" >{ggplot2} theme_set() \u306e\u6d3b\u7528<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-35\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#ggplot2_%E3%81%AE_aes_%E3%81%AB_%E6%96%87%E5%AD%97%E5%88%97%E3%81%A7%E3%82%AB%E3%83%A9%E3%83%A0%E5%90%8D%E3%82%92%E6%B8%A1%E3%81%99\" >{ggplot2} \u306e aes() \u306b \u6587\u5b57\u5217\u3067\u30ab\u30e9\u30e0\u540d\u3092\u6e21\u3059<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-36\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#ggplot2_%E3%81%AE_x_%E8%BB%B8%E3%81%AE%E3%83%A9%E3%83%99%E3%83%AB%E3%82%92%E5%B0%91%E3%81%97%E3%81%A0%E3%81%91%E5%82%BE%E3%81%91%E3%82%8B\" >{ggplot2} \u306e x \u8ef8\u306e\u30e9\u30d9\u30eb\u3092\u5c11\u3057\u3060\u3051\u50be\u3051\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-37\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#ggplot2_%E5%87%A1%E4%BE%8B%E3%81%AE%E4%BD%8D%E7%BD%AE%E8%AA%BF%E6%95%B4%EF%BC%9Abottom%E3%81%AB%E7%BD%AE%E3%81%84%E3%81%A6%E5%8F%B3%E5%AF%84%E3%81%9B\" >{ggplot2} \u51e1\u4f8b\u306e\u4f4d\u7f6e\u8abf\u6574\uff1abottom\u306b\u7f6e\u3044\u3066\u53f3\u5bc4\u305b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-38\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#ggforcegeom_sina_%E3%81%A7_geom_jitter%E3%81%AE%E5%B9%85%E3%82%92%E5%AF%86%E5%BA%A6%E5%88%86%E5%B8%83%E3%81%A7%E5%88%B6%E5%BE%A1%E3%81%99%E3%82%8B\" >{ggforce}geom_sina \u3067 geom_jitter()\u306e\u5e45\u3092\u5bc6\u5ea6\u5206\u5e03\u3067\u5236\u5fa1\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-39\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#100%E7%A9%8D%E3%81%BF%E4%B8%8A%E3%81%92%E6%A3%92%E3%82%B0%E3%83%A9%E3%83%95%E3%81%AE%E3%83%A9%E3%83%99%E3%83%AB%E4%BD%8D%E7%BD%AE%E8%AA%BF%E6%95%B4\" >100%\u7a4d\u307f\u4e0a\u3052\u68d2\u30b0\u30e9\u30d5\u306e\u30e9\u30d9\u30eb\u4f4d\u7f6e\u8abf\u6574<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-40\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E3%80%8CColorbrewer%E3%80%8D%E3%81%A7%E9%85%8D%E8%89%B2%E3%81%AE%E6%B1%BA%E5%AE%9A\" >\u300cColorbrewer\u300d\u3067\u914d\u8272\u306e\u6c7a\u5b9a<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-41\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E3%80%8CColor_Palette_Cinema%E3%80%8D%E3%81%A7%E9%85%8D%E8%89%B2%E3%81%AE%E6%B1%BA%E5%AE%9A\" >\u300cColor Palette Cinema\u300d\u3067\u914d\u8272\u306e\u6c7a\u5b9a<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-42\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E9%85%8D%E8%89%B2%E3%83%90%E3%83%AA%E3%82%A2%E3%83%95%E3%83%AA%E3%83%BC%EF%BC%88safe_color%EF%BC%89\" >\u914d\u8272\u30d0\u30ea\u30a2\u30d5\u30ea\u30fc\uff08safe color\uff09<\/a><\/li><\/ul><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-43\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E5%88%86%E6%9E%90\" >\u5206\u6790<\/a><ul class='ez-toc-list-level-3' ><li class='ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-44\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#tidydata_%E3%81%8B%E3%82%89_Steel-Dwass_%E3%81%AE%E5%A4%9A%E9%87%8D%E6%AF%94%E8%BC%83\" >tidydata \u304b\u3089 Steel-Dwass \u306e\u591a\u91cd\u6bd4\u8f03<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-45\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#rstan_%E5%AE%9F%E8%A1%8C%E9%80%9F%E5%BA%A6%E3%81%AE%E9%AB%98%E9%80%9F%E5%8C%96\" >{rstan} \u5b9f\u884c\u901f\u5ea6\u306e\u9ad8\u901f\u5316<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-46\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#gtsummary_%E5%80%8B%E4%BA%BA%E7%9A%84%E9%9B%9B%E5%BD%A2_%E5%AF%BE%E5%BF%9C%E3%81%82%E3%82%8B%E6%A4%9C%E5%AE%9A\" >{gtsummary} \u500b\u4eba\u7684\u96db\u5f62 (\u5bfe\u5fdc\u3042\u308b\u691c\u5b9a)<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-47\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#gtsummary_%E3%81%A7%E9%80%A3%E7%B6%9A%E5%80%A4%E3%80%81%E3%82%AB%E3%83%86%E3%82%B4%E3%83%AA%E5%80%A4%E3%82%92%E4%B8%80%E6%8B%AC%E3%81%A7%E6%8C%87%E5%AE%9A\" >{gtsummary} \u3067\u9023\u7d9a\u5024\u3001\u30ab\u30c6\u30b4\u30ea\u5024\u3092\u4e00\u62ec\u3067\u6307\u5b9a<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-48\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#gtsummary_%E8%A4%87%E6%95%B0%E8%A1%8C%E3%81%A7%E9%80%A3%E7%B6%9A%E5%80%A4_%E3%81%AE_summary_%E3%82%92%E8%A8%98%E8%BC%89%E3%81%99%E3%82%8B\" >{gtsummary} \u8907\u6570\u884c\u3067\u9023\u7d9a\u5024 \u306e summary \u3092\u8a18\u8f09\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-49\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#gtsummary_%E8%A1%8C%E5%88%97%E5%90%8D%E3%82%84%E6%B3%A8%E9%87%88%E3%82%92%E6%97%A5%E6%9C%AC%E8%AA%9E%E8%A1%A8%E8%A8%98%E3%81%AB%E3%81%99%E3%82%8B\" >{gtsummary} \u884c\u5217\u540d\u3084\u6ce8\u91c8\u3092\u65e5\u672c\u8a9e\u8868\u8a18\u306b\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-50\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#gtsummary_snakecase_snake_case_%E3%81%AB%E3%81%97%E3%81%A6%E3%81%84%E3%82%8B%E5%A4%89%E6%95%B0%E5%90%8D%E3%82%92_camelCase_%E3%81%AB%E5%A4%89%E6%9B%B4%E3%81%97%E3%81%A6%E8%A1%A8%E7%A4%BA%E3%81%99%E3%82%8B\" >{gtsummary} {snakecase} snake_case \u306b\u3057\u3066\u3044\u308b\u5909\u6570\u540d\u3092 camelCase \u306b\u5909\u66f4\u3057\u3066\u8868\u793a\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-51\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#gtsummary_%E3%81%A7%E4%BD%9C%E6%88%90%E3%81%97%E3%81%9F%E5%88%97%E3%81%AE%E9%A0%86%E5%BA%8F%E3%82%92%E9%A0%BB%E5%BA%A6%E9%A0%86%E3%81%AB%E4%B8%A6%E3%81%B3%E6%9B%BF%E3%81%88%E3%82%8B\" >{gtsummary} \u3067\u4f5c\u6210\u3057\u305f\u5217\u306e\u9806\u5e8f\u3092\u983b\u5ea6\u9806\u306b\u4e26\u3073\u66ff\u3048\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-52\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#gtsummary_%E3%81%A7%E4%BD%9C%E6%88%90%E3%81%97%E3%81%9F_table_%E3%82%92%E7%B8%A6%E6%A8%AA%E5%A4%89%E6%8F%9B%E3%81%99%E3%82%8B\" >{gtsummary} \u3067\u4f5c\u6210\u3057\u305f table \u3092\u7e26\u6a2a\u5909\u63db\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-53\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#modelsummary_%E3%81%A7_star_%E3%82%92%E3%81%A4%E3%81%91%E3%81%9F%E3%81%84%E5%A0%B4%E5%90%88\" >{modelsummary} \u3067 star \u3092\u3064\u3051\u305f\u3044\u5834\u5408<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-54\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#gtsummary_%E3%81%A72%E5%A4%89%E6%95%B0%E4%BB%A5%E4%B8%8A%E3%81%A7_by_%E3%81%97%E3%81%9F%E3%81%84\" >{gtsummary} \u30672\u5909\u6570\u4ee5\u4e0a\u3067 by = \u3057\u305f\u3044<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-55\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#corrplot_%E7%9B%B8%E9%96%A2%E8%A1%8C%E5%88%97%E3%82%92%E3%82%AB%E3%82%B9%E3%82%BF%E3%83%9E%E3%82%A4%E3%82%BA\" >{corrplot} \u76f8\u95a2\u884c\u5217\u3092\u30ab\u30b9\u30bf\u30de\u30a4\u30ba<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-56\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#polycor_%E3%82%AB%E3%83%86%E3%82%B4%E3%83%AA%E3%82%AB%E3%83%AB%E5%A4%89%E6%95%B0%E3%81%A8%E3%82%AB%E3%83%86%E3%82%B4%E3%83%AA%E3%82%AB%E3%83%AB%E5%A4%89%E6%95%B0%E3%81%A7%E7%9B%B8%E9%96%A2%E8%A1%8C%E5%88%97%EF%BC%88%E3%83%9D%E3%83%AA%E3%82%B3%E3%83%AA%E3%83%83%E3%82%AF%E7%9B%B8%E9%96%A2%E8%A1%8C%E5%88%97%EF%BC%89\" >{polycor} \u30ab\u30c6\u30b4\u30ea\u30ab\u30eb\u5909\u6570\u3068\u30ab\u30c6\u30b4\u30ea\u30ab\u30eb\u5909\u6570\u3067\u76f8\u95a2\u884c\u5217\uff08\u30dd\u30ea\u30b3\u30ea\u30c3\u30af\u76f8\u95a2\u884c\u5217\uff09<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-57\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#ggplot_%E8%A1%A8%E7%A4%BA%E7%AF%84%E5%9B%B2%E8%A8%AD%E5%AE%9A%E3%81%ABxlim_ylim_%E3%82%92%E4%BD%BF%E3%81%A3%E3%81%A6%E3%81%AF%E3%81%84%E3%81%91%E3%81%AA%E3%81%84%E7%90%86%E7%94%B1\" >{ggplot} \u8868\u793a\u7bc4\u56f2\u8a2d\u5b9a\u306bxlim , ylim \u3092\u4f7f\u3063\u3066\u306f\u3044\u3051\u306a\u3044\u7406\u7531<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-58\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#ggstatsplot_%E3%81%A7%E4%BD%9C%E6%88%90%E3%81%97%E3%81%9F%E5%9B%B3%E3%81%AB_ggsignif_%E3%81%A7%E6%9C%89%E6%84%8F%E5%B7%AE%E3%81%AE%E3%83%90%E3%83%BC%E3%82%92%E4%BB%98%E3%81%91%E3%82%8B\" >{ggstatsplot} \u3067\u4f5c\u6210\u3057\u305f\u56f3\u306b {ggsignif} \u3067\u6709\u610f\u5dee\u306e\u30d0\u30fc\u3092\u4ed8\u3051\u308b<\/a><\/li><\/ul><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-59\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E3%82%B3%E3%83%9F%E3%83%A5%E3%83%8B%E3%82%B1%E3%83%BC%E3%82%B7%E3%83%A7%E3%83%B3%E3%83%BB%E3%81%9D%E3%81%AE%E4%BB%96\" >\u30b3\u30df\u30e5\u30cb\u30b1\u30fc\u30b7\u30e7\u30f3\u30fb\u305d\u306e\u4ed6<\/a><ul class='ez-toc-list-level-3' ><li class='ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-60\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#library_%E3%81%AE%E3%81%8B%E3%82%8F%E3%82%8A%E3%81%AB_pacman_p_load%E3%82%92%E4%BD%BF%E3%81%86\" >library() \u306e\u304b\u308f\u308a\u306b pacman::p_load\u3092\u4f7f\u3046<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-61\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#tomwenseleersexport_eoffice_%E5%9B%B3%E8%A1%A8%E3%82%92_ppt_%E5%BD%A2%E5%BC%8F%E3%81%A7%E5%87%BA%E5%8A%9B\" >{tomwenseleers\/export} {eoffice} \u56f3\u8868\u3092 ppt \u5f62\u5f0f\u3067\u51fa\u529b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-62\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#ggsave_%E3%81%AE%E7%94%BB%E5%83%8F%E3%83%87%E3%83%BC%E3%82%BF%E3%82%B5%E3%82%A4%E3%82%BA%E3%82%92%E5%B0%8F%E3%81%95%E3%81%8F%E3%81%99%E3%82%8B\" >ggsave() \u306e\u753b\u50cf\u30c7\u30fc\u30bf\u30b5\u30a4\u30ba\u3092\u5c0f\u3055\u304f\u3059\u308b<\/a><\/li><\/ul><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-63\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#ggsave_%E3%81%A7%E4%BF%9D%E5%AD%98%E3%81%97%E3%81%9F%E5%9B%B3%E3%81%AE%E8%83%8C%E6%99%AF%E3%81%8C%E9%80%8F%E6%98%8E%E3%81%AB%E3%81%AA%E3%81%A3%E3%81%A6%E3%81%97%E3%81%BE%E3%81%86%E5%A0%B4%E5%90%88%E3%81%AE%E5%AF%BE%E5%87%A6%E6%B3%95\" >ggsave() \u3067\u4fdd\u5b58\u3057\u305f\u56f3\u306e\u80cc\u666f\u304c\u900f\u660e\u306b\u306a\u3063\u3066\u3057\u307e\u3046\u5834\u5408\u306e\u5bfe\u51e6\u6cd5<\/a><ul class='ez-toc-list-level-3' ><li class='ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-64\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E3%83%97%E3%83%AD%E3%82%B8%E3%82%A7%E3%82%AF%E3%83%88%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%82%92%E7%AB%8B%E3%81%A1%E4%B8%8A%E3%81%92%E3%81%9F%E5%BE%8C%E3%81%AB%E5%BF%85%E8%A6%81%E3%81%AA%E3%83%95%E3%82%A9%E3%83%AB%E3%83%80%E3%82%92%E4%BD%9C%E6%88%90%E3%81%99%E3%82%8B\" >\u30d7\u30ed\u30b8\u30a7\u30af\u30c8\u30d5\u30a1\u30a4\u30eb\u3092\u7acb\u3061\u4e0a\u3052\u305f\u5f8c\u306b\u5fc5\u8981\u306a\u30d5\u30a9\u30eb\u30c0\u3092\u4f5c\u6210\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-65\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#Rmarkdown_%E3%81%AE%E3%83%87%E3%83%95%E3%82%A9%E3%83%AB%E3%83%88%E3%83%91%E3%82%B9%E3%82%92%E3%83%97%E3%83%AD%E3%82%B8%E3%82%A7%E3%82%AF%E3%83%88%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%81%8B%E3%82%89%E3%81%AE%E7%9B%B8%E5%AF%BE%E3%83%91%E3%82%B9%E3%81%AB%E5%A4%89%E6%9B%B4%E3%81%99%E3%82%8B\" >Rmarkdown \u306e\u30c7\u30d5\u30a9\u30eb\u30c8\u30d1\u30b9\u3092\u30d7\u30ed\u30b8\u30a7\u30af\u30c8\u30d5\u30a1\u30a4\u30eb\u304b\u3089\u306e\u76f8\u5bfe\u30d1\u30b9\u306b\u5909\u66f4\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-66\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#Rmarkdown_%E3%81%A7%E3%82%88%E3%81%8F%E8%A1%8C%E3%81%86%E5%88%9D%E6%9C%9F%E8%A8%AD%E5%AE%9A\" >Rmarkdown \u3067\u3088\u304f\u884c\u3046\u521d\u671f\u8a2d\u5b9a<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-67\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#Rmarkdown%E3%81%A7%E6%96%87%E4%B8%AD%E3%81%A8%E6%96%87%E6%9C%AB%E3%81%AE%E5%BC%95%E7%94%A8%E6%96%87%E7%8C%AE%E3%82%92%E3%83%8F%E3%82%A4%E3%83%91%E3%83%BC%E3%83%AA%E3%83%B3%E3%82%AF%E3%81%A7%E9%96%A2%E9%80%A3%E4%BB%98%E3%81%91%E3%82%8B\" >Rmarkdown\u3067\u6587\u4e2d\u3068\u6587\u672b\u306e\u5f15\u7528\u6587\u732e\u3092\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u3067\u95a2\u9023\u4ed8\u3051\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-68\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#%E5%85%A5%E5%8A%9B%E9%80%94%E4%B8%AD%E3%81%AE%E6%97%A5%E6%9C%AC%E8%AA%9E%E3%82%82%E8%A6%8B%E3%81%88%E3%82%8B%E3%82%88%E3%81%86%E3%81%AB%E3%81%99%E3%82%8B\" >\u5165\u529b\u9014\u4e2d\u306e\u65e5\u672c\u8a9e\u3082\u898b\u3048\u308b\u3088\u3046\u306b\u3059\u308b<\/a><\/li><\/ul><\/li><\/ul><\/nav><\/div>\n<h2 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E3%83%87%E3%83%BC%E3%82%BF%E3%83%A9%E3%83%B3%E3%82%B0%E3%83%AA%E3%83%B3%E3%82%B0\"><\/span>\u30c7\u30fc\u30bf\u30e9\u30f3\u30b0\u30ea\u30f3\u30b0<span class=\"ez-toc-section-end\"><\/span><\/h2>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E3%83%95%E3%82%A9%E3%83%AB%E3%83%80%E5%86%85%E3%81%AEcsv%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%82%92%E8%AA%AD%E3%81%BF%E8%BE%BC%E3%82%93%E3%81%A7%E4%B8%80%E6%B0%97%E3%81%AB%E7%B5%90%E5%90%88%E3%81%99%E3%82%8B\"><\/span>\u30d5\u30a9\u30eb\u30c0\u5185\u306e.csv\u30d5\u30a1\u30a4\u30eb\u3092\u8aad\u307f\u8fbc\u3093\u3067\u4e00\u6c17\u306b\u7d50\u5408\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-1\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">csv_list &lt;- fs::dir_ls(path = <span class=\"hljs-string\">\"..\/data\/\"<\/span>, \n                    glob = <span class=\"hljs-string\">\"*.csv\"<\/span>, <span class=\"hljs-comment\"># .csv\u3092\u691c\u7d22<\/span>\n                    recurse = <span class=\"hljs-keyword\">TRUE<\/span> <span class=\"hljs-comment\"># \u30b5\u30d6\u30c7\u30a3\u30ec\u30af\u30c8\u30ea\u3082\u691c\u7d22\u3057\u305f\u3044\u5834\u5408\u306fTRUE<\/span>\n                    )\n\ndat &lt;- map(csv_list, ~ readr::read_csv(.x)) |&gt; bind_rows()<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-1\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">readr 2.0.0 \u306e\u8aac\u660e <a href=\"https:\/\/t.co\/4KEXiHSNsZ\">https:\/\/t.co\/4KEXiHSNsZ<\/a> \u306b\u3042\u308b\u3088\u3046\u306b\u3001list.files() \u3067\u306f\u306a\u304f fs::dir_ls() \u3067\u3082OK\u3002\u3053\u306e\u5834\u5408\u3001str_c()\u3067path\u3092\u4ed8\u3051\u308b\u5fc5\u8981\u306f\u306a\u3044\u3002<br>csv_list &lt;- fs::dir_ls(path = &quot;..\/data\/&quot;, <br>                    glob = &quot;*.csv&quot;,<br>                    recurse = TRUE<br>                    ) <a href=\"https:\/\/t.co\/jdn8fFAR29\">https:\/\/t.co\/jdn8fFAR29<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1418344886915321861?ref_src=twsrc%5Etfw\">July 22, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E6%BC%A2%E6%95%B0%E5%AD%97%E3%82%92%E3%82%A2%E3%83%A9%E3%83%93%E3%82%A2%E6%95%B0%E5%AD%97%E3%81%AB%E5%A4%89%E6%8F%9B%E3%81%99%E3%82%8B\"><\/span>\u6f22\u6570\u5b57\u3092\u30a2\u30e9\u30d3\u30a2\u6570\u5b57\u306b\u5909\u63db\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-2\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(zipangu)\ndat$x &lt;- dat$x %&gt;% kansuji2arabic()<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-2\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E5%85%A8%E8%A7%92%E3%82%92%E5%8D%8A%E8%A7%92%E3%81%AB%E3%81%99%E3%82%8B\"><\/span>\u5168\u89d2\u3092\u534a\u89d2\u306b\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-3\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(stringi)\ndat$x &lt;- dat$x %&gt;% stri_trans_nfkc()<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-3\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">\u6f22\u6570\u5b57\u3092\u30a2\u30e9\u30d3\u30a2\u6570\u5b57\u306b\u5909\u63db \u2192 zipangu::kansuji2arabic() <a href=\"https:\/\/t.co\/Dv0IMMqVdh\">https:\/\/t.co\/Dv0IMMqVdh<\/a> \u5168\u89d2\u82f1\u6570\u5b57\u3092\u534a\u89d2\u306b\u5909\u63db \u2192 stringi::stri_trans_nfkc() <a href=\"https:\/\/t.co\/rn0kVzPBN5\">https:\/\/t.co\/rn0kVzPBN5<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1309777668858998785?ref_src=twsrc%5Etfw\">September 26, 2020<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E6%95%B0%E5%AD%97%E3%82%92%E6%8C%87%E5%AE%9A%E3%81%97%E3%81%9F%E6%A1%81%E6%95%B0%E3%81%A7%E3%83%91%E3%83%87%E3%82%A3%E3%83%B3%E3%82%B0%E3%81%99%E3%82%8B9_%E2%86%92_09\"><\/span>\u6570\u5b57\u3092\u6307\u5b9a\u3057\u305f\u6841\u6570\u3067\u30d1\u30c7\u30a3\u30f3\u30b0\u3059\u308b(9 \u2192 09)<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\"><span><code class=\"hljs\">dat %&gt;% mutate(x_pad = str_pad(x, 2, pad=0))<\/code><\/span><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">{string} \u306e str_pad() \u304c\u4e00\u756a\u899a\u3048\u3084\u3059\u305d\u3046\u3002\u4f8b\uff1astr_pad(9, 2, pad=0) \u2192 &quot;09&quot; \u300cR \u3067 9 \u3092 &quot;09&quot; \u307f\u305f\u3044\u306b\u30d1\u30c7\u30a3\u30f3\u30b0\u3059\u308b\u300d<a href=\"https:\/\/t.co\/WoFSLh8564\">https:\/\/t.co\/WoFSLh8564<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1328668759700107265?ref_src=twsrc%5Etfw\">November 17, 2020<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E6%95%B0%E5%AD%97%E5%88%97%E3%81%AENA%E3%82%920%E3%81%AB%E7%BD%AE%E6%8F%9B%E3%81%99%E3%82%8B\"><\/span>\u6570\u5b57\u5217\u306eNA\u30920\u306b\u7f6e\u63db\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-4\" data-shcb-language-name=\"CSS\" data-shcb-language-slug=\"css\"><span><code class=\"hljs language-css\"><span class=\"hljs-selector-tag\">dat<\/span> &lt;<span class=\"hljs-selector-tag\">-<\/span> <span class=\"hljs-selector-tag\">dat<\/span> %&gt;% \n  <span class=\"hljs-selector-tag\">mutate_if<\/span>(<span class=\"hljs-selector-tag\">is<\/span><span class=\"hljs-selector-class\">.numeric<\/span>, ~ <span class=\"hljs-selector-tag\">replace_na<\/span>(<span class=\"hljs-selector-class\">.x<\/span>, 0))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-4\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">CSS<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">css<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-5\" data-shcb-language-name=\"CSS\" data-shcb-language-slug=\"css\"><span><code class=\"hljs language-css\"><span class=\"hljs-selector-tag\">dat<\/span> &lt;<span class=\"hljs-selector-tag\">-<\/span> <span class=\"hljs-selector-tag\">dat<\/span> %&gt;%\n  <span class=\"hljs-selector-tag\">mutate<\/span>(<span class=\"hljs-selector-tag\">across<\/span>(<span class=\"hljs-selector-tag\">where<\/span>(<span class=\"hljs-selector-tag\">is<\/span><span class=\"hljs-selector-class\">.numeric<\/span>), ~ <span class=\"hljs-selector-tag\">replace_na<\/span>(<span class=\"hljs-selector-class\">.x<\/span>, 0))) <\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-5\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">CSS<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">css<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>mutate(across())\u306e\u5834\u5408\u306f\u3001across()\u306e\u4e2d\u306b\u95a2\u6570\u3082\u5165\u308c\u308b\u3053\u3068\u306b\u6ce8\u610f\u3002<\/p>\n\n\n\n<p>mutate(<span style=\"color:#bd466f\" class=\"has-inline-color\"><strong>across(where(is.numeric))<\/strong><\/span>, ~ replace_na(.x, 0))\u3068\u3059\u308b\u3068\u3001<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-6\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\"><span class=\"hljs-built_in\">Error<\/span>: Problem <span class=\"hljs-keyword\">with<\/span> <span class=\"hljs-string\">`mutate()`<\/span> input <span class=\"hljs-string\">`..2`<\/span>. x Input <span class=\"hljs-string\">`..2`<\/span> must be a vector, not a <span class=\"hljs-string\">`formula`<\/span> object. \u2139 Input <span class=\"hljs-string\">`..2`<\/span> is <span class=\"hljs-string\">`~replace_na(.x, 0)`<\/span>.<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-6\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>\u3068\u3044\u3046\u30a8\u30e9\u30fc\u306b\u306a\u308b\u3002<\/p>\n\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">mutate_if(is.numeric, ~ replace_na(.x, 0)) \u3068\u3001mutate(across(where(is.numeric), ~ replace_na(.x, 0))) \u306f\u540c\u3058\u5217\u64cd\u4f5c\u3002across()\u3092\u4f7f\u3046\u5834\u5408\u306f\u3001across()\u306e\u4e2d\u306b\u95a2\u6570( ~ &#8230; )\u3082\u5165\u308c\u308b\u3053\u3068\u306b\u6ce8\u610f\u3002 <a href=\"https:\/\/t.co\/CbrTiS5ijR\">https:\/\/t.co\/CbrTiS5ijR<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1345662038933086209?ref_src=twsrc%5Etfw\">January 3, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"NA%E4%BB%A5%E5%A4%96%E3%81%AE%E8%A1%8C%E3%82%92%E9%81%B8%E6%8A%9E\"><\/span>NA\u4ee5\u5916\u306e\u884c\u3092\u9078\u629e<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-7\" data-shcb-language-name=\"CSS\" data-shcb-language-slug=\"css\"><span><code class=\"hljs language-css\"><span class=\"hljs-selector-tag\">dat<\/span> %&gt;% <span class=\"hljs-selector-tag\">filter<\/span>(!(<span class=\"hljs-selector-tag\">is<\/span><span class=\"hljs-selector-class\">.na<\/span>(<span class=\"hljs-selector-tag\">x<\/span>)))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-7\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">CSS<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">css<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"dplyr_if_else_%E3%81%A7_0_%E3%82%92_NA_%E3%81%AB%E7%BD%AE%E6%8F%9B\"><\/span>dplyr::if_else \u3067 0 \u3092 NA \u306b\u7f6e\u63db<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\"><span><code class=\"hljs\">dat %&gt;% mutate(x = if_else(x == 0, NA_real_, x))<\/code><\/span><\/pre>\n\n\n<p>dplyr::if_else \u306f\u30c7\u30fc\u30bf\u578b \u3092\u63c3\u3048\u308b\u5fc5\u8981\u304c\u3042\u308b\u3053\u3068\u306b\u6ce8\u610f\u3002NA\u3068\u3059\u308b\u3068\u3001<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-8\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\"><span class=\"hljs-string\">`false`<\/span> must be a logical vector, not a double vector.<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-8\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>\u3068\u3044\u3063\u305f\u30a8\u30e9\u30fc\u304c\u8fd4\u3063\u3066\u304f\u308b\u3002double\u578b\u306e NA_real_ \u3092\u4f7f\u7528\u3059\u308b\u3002<\/p>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"NA%E3%81%AE%E3%81%82%E3%82%8B%E5%88%97%E3%82%92%E3%81%B5%E3%81%8F%E3%82%81%E3%81%9F%E3%83%87%E3%83%BC%E3%82%BF%E3%81%A7%E6%96%87%E5%AD%97%E7%B5%90%E5%90%88%EF%BC%88str_c%EF%BC%89%E3%81%99%E3%82%8B\"><\/span>NA\u306e\u3042\u308b\u5217\u3092\u3075\u304f\u3081\u305f\u30c7\u30fc\u30bf\u3067\u6587\u5b57\u7d50\u5408\uff08str_c()\uff09\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>NA\u306e\u3042\u308b\u5217\u3092\u542b\u3081\u3066str_c()\u3057\u305f\u3044\u5834\u5408\u306f\u3001\u8a72\u5f53\u5217\uff08\u4f8b\u3067\u306fY\u5217\uff09\u3092str_replace_na()\u3067\u56f2\u3080\u3002NA\u306f&#8221;NA&#8221;\u306e\u3088\u3046\u306b\u751f\u6210\u3055\u308c\u308b\u305f\u3081\u3001\u305d\u306e\u5f8c\u3001sep \u3067\u6307\u5b9a\u3057\u305f &#8220;:&#8221; \u3068\u3042\u308f\u305b\u3066\u751f\u6210\u3055\u308c\u305f&#8221;:NA&#8221;\u3092\u6587\u5b57\u7f6e\u63db\u3059\u308b\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-9\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">dat &lt;- dat %&gt;%\n  mutate( Z = str_c(X,str_replace_na(Y),sep = <span class=\"hljs-string\">\":\"<\/span>)) %&gt;% \n  mutate(across(Z, ~ gsub(<span class=\"hljs-string\">\":NA\"<\/span>,<span class=\"hljs-string\">\"\"<\/span>,.x))) <\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-9\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">NA\u306e\u3042\u308b\u5217\u3092\u542b\u3081\u3066str_c()\u3057\u305f\u3044\u5834\u5408\u306f\u3001\u8a72\u5f53\u5217\uff08\u4f8b\u3067\u306fY\u5217\uff09\u3092str_replace_na()\u3067\u56f2\u3080\u3002\u305d\u306e\u5f8c\u3001\u751f\u6210\u3055\u308c\u305f&quot;:NA&quot;\u3092\u6587\u5b57\u7f6e\u63db\u3059\u308c\u3070OK\u3002\u4f8b\uff1adat &lt;- dat %&gt;% mutate( Z = str_c(X,str_replace_na(Y),sep = &quot;:&quot;)) %&gt;% mutate(across(Z, ~ gsub(&quot;:NA&quot;,&quot;&quot;,.x))) <a href=\"https:\/\/t.co\/fmvi6j15mA\">https:\/\/t.co\/fmvi6j15mA<\/a> <a href=\"https:\/\/t.co\/Xzt9037mfx\">pic.twitter.com\/Xzt9037mfx<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1355783207132618757?ref_src=twsrc%5Etfw\">January 31, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E3%83%87%E3%83%BC%E3%82%BF%E5%9E%8B%E3%81%AE%E4%B8%80%E6%8B%AC%E5%A4%89%E6%8F%9B\"><\/span>\u30c7\u30fc\u30bf\u578b\u306e\u4e00\u62ec\u5909\u63db<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-10\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">factor_list &lt;- c(<span class=\"hljs-string\">\"x\"<\/span>,<span class=\"hljs-string\">\"y\"<\/span>,<span class=\"hljs-string\">\"z\"<\/span>)\ndat &lt;- dat %&gt;% mutate_at(vars(all_of(factor_list)),<span class=\"hljs-keyword\">as<\/span>.factor)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-10\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>across()\u3092\u4f7f\u3046\u3068\u4e0b\u8a18\u306e\u901a\u308a<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-11\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">factor_list &lt;- c(<span class=\"hljs-string\">\"x\"<\/span>,<span class=\"hljs-string\">\"y\"<\/span>,<span class=\"hljs-string\">\"z\"<\/span>)\ndat &lt;- dat %&gt;% mutate(across(all_of(factor_list),<span class=\"hljs-keyword\">as<\/span>.factor))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-11\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>\u3082\u3057\u304f\u306f\u660e\u793a\u7684\u306b ~ \u3068 .x \u3067\u95a2\u6570\u3092\u5b9a\u7fa9\u3059\u308b<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-12\" data-shcb-language-name=\"CSS\" data-shcb-language-slug=\"css\"><span><code class=\"hljs language-css\"><span class=\"hljs-selector-tag\">dat<\/span> &lt;<span class=\"hljs-selector-tag\">-<\/span> <span class=\"hljs-selector-tag\">dat<\/span> %&gt;% <span class=\"hljs-selector-tag\">mutate<\/span>(<span class=\"hljs-selector-tag\">across<\/span>(<span class=\"hljs-selector-tag\">all_of<\/span>(<span class=\"hljs-selector-tag\">factor_list<\/span>), ~ <span class=\"hljs-selector-tag\">as<\/span><span class=\"hljs-selector-class\">.factor<\/span>(<span class=\"hljs-selector-class\">.x<\/span>)))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-12\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">CSS<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">css<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E5%88%97%E5%90%8D%E3%81%AE%E4%B8%80%E6%8B%AC%E5%A4%89%E6%9B%B4\"><\/span>\u5217\u540d\u306e\u4e00\u62ec\u5909\u66f4<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-13\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">name_vector &lt;- c(<span class=\"hljs-string\">\"apple(\u5909\u66f4\u524d)\"<\/span>=<span class=\"hljs-string\">\"1(\u5909\u66f4\u5f8c)\"<\/span>, \n                 <span class=\"hljs-string\">\"banana\"<\/span>=<span class=\"hljs-string\">\"2\"<\/span>,\n                 <span class=\"hljs-string\">\"orange\"<\/span>=<span class=\"hljs-string\">\"3\"<\/span>)\n\ndat %&gt;% \n  mutate(across(label, ~ str_replace_all(.x, name_vector)))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-13\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E8%A6%81%E7%B4%A0%E5%90%8D%E3%81%AE%E5%A4%89%E6%9B%B4\"><\/span>\u8981\u7d20\u540d\u306e\u5909\u66f4<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-14\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(forcats)\nfct_list &lt;- c(<span class=\"hljs-string\">\"\u5168\u304f\u305d\u3046\u601d\u3046(\u5909\u66f4\u5f8c)\"<\/span> = <span class=\"hljs-string\">\"1(\u5909\u66f4\u524d)\"<\/span>,<span class=\"hljs-string\">\"\u5c11\u3057\u305d\u3046\u601d\u3046\"<\/span> = <span class=\"hljs-string\">\"2\"<\/span>,\n              <span class=\"hljs-string\">\"\u3042\u307e\u308a\u305d\u3046\u601d\u308f\u306a\u3044\"<\/span> = <span class=\"hljs-string\">\"3\"<\/span>, <span class=\"hljs-string\">\"\u5168\u304f\u305d\u3046\u601d\u308f\u306a\u3044\"<\/span> = <span class=\"hljs-string\">\"4\"<\/span>)\ndat &lt;- dat %&gt;% mutate(x = fct_recode(x, !!!fct_list))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-14\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>\u4e0b\u8a18\u306e\u65b9\u6cd5\u3067\u3082\u8981\u7d20\u540d\u3092\u5909\u66f4\u3059\u308b\u3053\u3068\u304c\u3067\u304d\u308b\u304c\u3001\u9806\u756a\u3092\u5909\u66f4\u3059\u308b\u8a33\u3067\u306f\u306a\u3044\u306e\u3067\u6ce8\u610f\u3002\u4e0a\u8a18\u306e\u65b9\u6cd5\u3067\u660e\u793a\u7684\u306b\u6570\u5b57\u3068\u5bfe\u5fdc\u3055\u305b\u305f\u307b\u3046\u304c\u30df\u30b9\u306f\u5c11\u306a\u3044\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-15\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">levels(dat$x) &lt;- c(<span class=\"hljs-string\">\"\u5168\u304f\u305d\u3046\u601d\u3046\"<\/span>,<span class=\"hljs-string\">\"\u5c11\u3057\u305d\u3046\u601d\u3046\"<\/span>,<span class=\"hljs-string\">\"\u3042\u307e\u308a\u305d\u3046\u601d\u308f\u306a\u3044\"<\/span>,<span class=\"hljs-string\">\"\u305d\u3046\u601d\u308f\u306a\u3044\"<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-15\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">&quot;{forcats} \u8981\u7d20\u540d\u3092\u5909\u66f4\u3059\u308b\u305f\u3081\u306b\u30d9\u30af\u30c8\u30eb\u3092\u6e21\u3059\u5834\u5408\u306f\u300c!!!\u300d\u3092\u4f7f\u7528\u3059\u308b&quot; <br>x &lt;- factor(c(&quot;apple&quot;, &quot;bear&quot;, &quot;banana&quot;, &quot;dear&quot;))<br>levels &lt;- c(fruit = &quot;apple&quot;, fruit = &quot;banana&quot;)<br>fct_recode(x, !!!levels)<a href=\"https:\/\/t.co\/aiW1P81SY8\">https:\/\/t.co\/aiW1P81SY8<\/a> <a href=\"https:\/\/t.co\/4PJqyBjSpr\">pic.twitter.com\/4PJqyBjSpr<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1343204591500894208?ref_src=twsrc%5Etfw\">December 27, 2020<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E8%A6%81%E7%B4%A0%E5%90%8D%E3%82%92%E3%81%BE%E3%81%A8%E3%82%81%E3%81%A6%E5%86%8D%E3%82%B0%E3%83%AB%E3%83%BC%E3%83%97%E3%81%99%E3%82%8B\"><\/span>\u8981\u7d20\u540d\u3092\u307e\u3068\u3081\u3066\u518d\u30b0\u30eb\u30fc\u30d7\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-16\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">dat &lt;- dat %&gt;%  mutate(\n  x2 = fct_recode(x,\n    <span class=\"hljs-string\">\"fruits\"<\/span> = <span class=\"hljs-string\">\"apple\"<\/span>,\n    <span class=\"hljs-string\">\"fruits\"<\/span> = <span class=\"hljs-string\">\"banana\"<\/span>,\n    <span class=\"hljs-string\">\"fruits\"<\/span> = <span class=\"hljs-string\">\"orange\"<\/span>,\n    <span class=\"hljs-string\">\"vehicle\"<\/span> = <span class=\"hljs-string\">\"car\"<\/span>,\n    <span class=\"hljs-string\">\"vehicle\"<\/span> = <span class=\"hljs-string\">\"bike\"<\/span>))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-16\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E8%A6%81%E7%B4%A0%E5%90%8D%E3%81%AE%E9%A0%86%E5%BA%8F%E3%81%AE%E5%A4%89%E6%9B%B4\"><\/span>\u8981\u7d20\u540d\u306e\u9806\u5e8f\u306e\u5909\u66f4<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-17\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">fct_levels &lt;- c(<span class=\"hljs-string\">\"a\"<\/span>,<span class=\"hljs-string\">\"b\"<\/span>,<span class=\"hljs-string\">\"c\"<\/span>)\ndat$x &lt;- dat$x %&gt;% factor(levels = fct_levels) <\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-17\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>mutate() \u3067\u3082 across \u3092\u4f7f\u3063\u3066\u4ee5\u4e0b\u306e\u3088\u3046\u306b\u66f8\u304f\u3053\u3068\u304c\u3067\u304d\u308b<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-18\" data-shcb-language-name=\"HTML, XML\" data-shcb-language-slug=\"xml\"><span><code class=\"hljs language-xml\">dat <span class=\"hljs-tag\">&lt;<span class=\"hljs-name\">-<\/span> <span class=\"hljs-attr\">dat<\/span> %&gt;<\/span>% mutate(across(x, ~ factor(.x, levels = fct_levels)))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-18\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">HTML, XML<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">xml<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>{forcats} \u306e fct_relevel() \u3092\u4f7f\u3046\u3068\u4ee5\u4e0b\u306e\u901a\u308a\u3002\u305f\u3060\u3057\u3001\u3053\u3061\u3089\u306f\u3001\u5b58\u5728\u3057\u306a\u3044\u5024\u3092\u6307\u5b9a\u3059\u308b\u3068\u8b66\u544a\u304c\u51fa\u308b\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-19\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(forcats)\nfct_levels &lt;- c(<span class=\"hljs-string\">\"a\"<\/span>,<span class=\"hljs-string\">\"b\"<\/span>,<span class=\"hljs-string\">\"c\"<\/span>)\ndat &lt;- dat %&gt;% mutate(across(x, ~ fct_relevel(.x, levels = fct_levels)))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-19\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>\u9806\u5e8f\u3092\u53cd\u8ee2\u3059\u308b\u306e\u3067\u3042\u308c\u3070\u3001 {forcats} \u306efct_rev() \u304c\u6709\u7528\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-20\" data-shcb-language-name=\"CSS\" data-shcb-language-slug=\"css\"><span><code class=\"hljs language-css\"><span class=\"hljs-selector-tag\">pacman<\/span><span class=\"hljs-selector-pseudo\">::p_load(forcats)<\/span>\n<span class=\"hljs-selector-tag\">dat<\/span> &lt;<span class=\"hljs-selector-tag\">-<\/span> <span class=\"hljs-selector-tag\">dat<\/span> %&gt;% <span class=\"hljs-selector-tag\">mutate<\/span>(<span class=\"hljs-selector-tag\">across<\/span>(<span class=\"hljs-selector-tag\">x<\/span>, ~ <span class=\"hljs-selector-tag\">fct_rev<\/span>(<span class=\"hljs-selector-class\">.x<\/span>)))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-20\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">CSS<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">css<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"dplyr_rename_%E3%81%A7_%E6%96%87%E5%AD%97%E3%83%99%E3%82%AF%E3%83%88%E3%83%AB%E3%82%92%E4%BD%BF%E3%81%A3%E3%81%A6%E4%B8%80%E6%8B%AC%E5%A4%89%E6%9B%B4\"><\/span>dplyr::rename \u3067 \u6587\u5b57\u30d9\u30af\u30c8\u30eb\u3092\u4f7f\u3063\u3066\u4e00\u62ec\u5909\u66f4<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>\u5217\u540d\u3092\u4e00\u62ec\u3067\u5909\u66f4\u3057\u305f\u3044\u5834\u5408\u306f rename(!!! named_vector) \u304c\u4fbf\u5229\u3002\u3082\u3057\u304f\u306f dput() \u3092\u6d3b\u7528\u3059\u308b\uff08\u5f8c\u8ff0\uff09\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-21\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">named_vector &lt;- c(<span class=\"hljs-string\">\"id\"<\/span> = <span class=\"hljs-string\">\"x\"<\/span>,\n                  <span class=\"hljs-string\">\"fruits\"<\/span> = <span class=\"hljs-string\">\"y\"<\/span>)\n\ndat &lt;- dat %&gt;% rename(!!! named_vector)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-21\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">\u6587\u5b57\u30d9\u30af\u30c8\u30eb\u3092\u4f5c\u3063\u3066\u304b\u3089 dplyr::rename \u3092\u4e00\u62ec\u3067\u3057\u305f\u3044\u5834\u5408\u306f\u3001dat %&gt;% rename(!!! named_vector) \u3082\u3057\u304f\u306f\u3001dat %&gt;% rename_mp(named_vector) \u3092\u4f7f\u3046\u3002<a href=\"https:\/\/t.co\/iys69m6XT8\">https:\/\/t.co\/iys69m6XT8<\/a> <a href=\"https:\/\/t.co\/2AB1AOL2hm\">pic.twitter.com\/2AB1AOL2hm<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1361790661612085248?ref_src=twsrc%5Etfw\">February 16, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">namelist \u306f\u3001 setNames() \u3092\u4f7f\u3063\u3066<br>namelist &lt;- dat2$post %&gt;% setNames(dat2$pre)<br>\u3068\u3057\u3066\u3082OK<br>\u3082\u3057\u304f\u306f\u3001\u30d1\u30bf\u30fc\u30f3\u30d9\u30af\u30c8\u30eb\u3092\u4f5c\u6210\u3059\u308b\u65b9\u6cd5\u3082\u3042\u308a<br>\u53c2\u8003\uff1a<a href=\"https:\/\/t.co\/mHq6e0ZioJ\">https:\/\/t.co\/mHq6e0ZioJ<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1420003225709670404?ref_src=twsrc%5Etfw\">July 27, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E3%83%99%E3%82%AF%E3%83%88%E3%83%AB%E3%81%A7%E5%88%97%E5%90%8D%E3%82%92%E5%8F%96%E5%BE%97\"><\/span>\u30d9\u30af\u30c8\u30eb\u3067\u5217\u540d\u3092\u53d6\u5f97<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>\u4f8b\u3048\u3070\u5217\u540d\u3092\u4e00\u62ec\u3067\u5909\u66f4\u3057\u305f\u3044\u5834\u5408\u306f\u3001<\/p>\n\n\n<pre class=\"wp-block-code\"><span><code class=\"hljs\">dat %&gt;% names() %&gt;% dput()<\/code><\/span><\/pre>\n\n\n<p>\u3068\u3059\u308b\u3068\u3001<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-22\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">c(<span class=\"hljs-string\">\"ID\"<\/span>, <span class=\"hljs-string\">\"\u679c\u7269\"<\/span>, <span class=\"hljs-string\">\"\u500b\u6570\"<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-22\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>\u3068\u3044\u3063\u305f\u3088\u3046\u306a\u6587\u5b57\u30d9\u30af\u30c8\u30eb\u304c\u53d6\u5f97\u3067\u304d\u308b\u305f\u3081\u3001\u30b3\u30d4\u30fc\u3057\u3066\u66f8\u304d\u63db\u3048\u308b\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-23\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\"><span class=\"hljs-comment\"># c(\"ID\", \"\u679c\u7269\", \"\u500b\u6570\") \u30b3\u30d4\u30da\u3057\u305f\u5f8c\u306b\u66f8\u304d\u63db\u3048\u3066 setNames()\u3092\u5229\u7528\u3057\u3066\u4e00\u62ec\u3067\u5217\u540d\u3092\u5909\u66f4<\/span>\n\ndat  &lt;- dat %&gt;% setNames(c(<span class=\"hljs-string\">\"ID\"<\/span>, <span class=\"hljs-string\">\"fruits\"<\/span>, <span class=\"hljs-string\">\"n\"<\/span>))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-23\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">\u5217\u540d\u306e\u78ba\u8a8d\u306f\u4eca\u307e\u3067 colnames(x) \u3092\u4f7f\u3063\u3066\u305f\u3051\u3069\u3001dput(names(x)) \u3067 c() \u3067\u53d6\u5f97\u3057\u3066\u304a\u3044\u305f\u65b9\u304c\u3001\u305d\u306e\u5f8c setNames() \u3067\u5217\u540d\u5909\u66f4\u3059\u308b\u3068\u304d\u306a\u3069\u306b\u305d\u306e\u307e\u307e\u30b3\u30d4\u30da\u3057\u3066\u4f7f\u3048\u308b\u304b\u3089\u4fbf\u5229 <a href=\"https:\/\/t.co\/xUywNUbda2\">pic.twitter.com\/xUywNUbda2<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1307094344361545732?ref_src=twsrc%5Etfw\">September 18, 2020<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E3%83%99%E3%82%AF%E3%83%88%E3%83%AB%E5%86%85%E3%81%AE%E7%89%B9%E5%AE%9A%E3%81%AE%E5%80%A4X%E3%81%AE%E5%80%8B%E6%95%B0%E3%82%92%E5%8F%96%E5%BE%97\"><\/span>\u30d9\u30af\u30c8\u30eb\u5185\u306e\u7279\u5b9a\u306e\u5024(X)\u306e\u500b\u6570\u3092\u53d6\u5f97<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-24\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">sum(dat$x == X)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-24\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E6%96%87%E5%AD%97%E5%88%97%E3%82%92%E5%88%A5%E3%81%AB%E6%8C%87%E5%AE%9A%E3%81%97%E3%81%A6%E9%96%A2%E6%95%B0%E3%81%AB%E4%BD%BF%E7%94%A8%E3%81%99%E3%82%8B\"><\/span>\u6587\u5b57\u5217\u3092\u5225\u306b\u6307\u5b9a\u3057\u3066\u95a2\u6570\u306b\u4f7f\u7528\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-25\" data-shcb-language-name=\"CSS\" data-shcb-language-slug=\"css\"><span><code class=\"hljs language-css\"><span class=\"hljs-selector-tag\">cat<\/span> &lt;<span class=\"hljs-selector-tag\">-<\/span> \"<span class=\"hljs-selector-tag\">x<\/span>\"\n<span class=\"hljs-selector-tag\">dat<\/span> %&gt;% <span class=\"hljs-selector-tag\">filter<\/span>(!<span class=\"hljs-selector-tag\">is<\/span><span class=\"hljs-selector-class\">.na<\/span>(<span class=\"hljs-selector-class\">.data<\/span><span class=\"hljs-selector-attr\">&#91;&#91;cat]<\/span>]))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-25\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">CSS<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">css<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>is.na(cat)\u3068\u3059\u308b\u3068\u30a8\u30e9\u30fc\u306b\u306a\u308b\u3002\u3053\u306e\u3068\u304d\u306f .data[[ \u5217\u540d ]] \u3092\u4f7f\u7528\u3059\u308b\u3002<\/p>\n\n\n\n<p>ggplot \u306eaes()\u3067\u3082\u540c\u69d8\u306e\u624b\u6cd5\u3092\u4f7f\u3046\u3053\u3068\u304c\u3067\u304d\u308b\uff08aes_string()\u3092\u4f7f\u3046\u65b9\u6cd5\u3082\u3042\u308b\uff09\u3002<\/p>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"dplyr_filter_%E3%81%A7%E5%88%97%E6%8C%87%E5%AE%9A%E3%82%92%E6%96%87%E5%AD%97%E5%88%97%E3%81%A7%E3%81%AF%E3%81%AA%E3%81%8F%E5%88%97%E7%95%AA%E5%8F%B7%E3%81%A7%E6%8C%87%E5%AE%9A%E3%81%99%E3%82%8B\"><\/span>dplyr::filter \u3067\u5217\u6307\u5b9a\u3092\u6587\u5b57\u5217\u3067\u306f\u306a\u304f\u5217\u756a\u53f7\u3067\u6307\u5b9a\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-26\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">df %&gt;% dplyr::filter(.&#91;<span class=\"hljs-number\">1<\/span>] == <span class=\"hljs-number\">1<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-26\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>\u305f\u3060\u3057\u3001\u5f8c\u8ff0\u306e\u7406\u7531\u3067\u3001.[[\u5217\u756a\u53f7]] \u3068 [[ \u3067\u9589\u3058\u308b\u307b\u3046\u304c\u6df7\u4e71\u304c\u5c11\u306a\u304f\u3066\u826f\u3044\u3068\u601d\u308f\u308c\u308b\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-27\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">df %&gt;% dplyr::filter(.&#91;&#91;<span class=\"hljs-number\">1<\/span>]] == <span class=\"hljs-number\">1<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-27\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">filter_\u3082\u4f7f\u308f\u305a .[\u5217\u756a\u53f7]\u3067\u6307\u5b9a\u53ef\u80fd\uff08\u4f8b\uff1adf %&gt;% dplyr::filter(.[1] == 1) \u3001\u30b3\u30e1\u30f3\u30c8\u6b04\u53c2\u7167\uff09\u300cfilter\u3067\u6307\u5b9a\u3059\u308b\u5217\u540d\u3092\u6587\u5b57\u5217\u3067\u3044\u3061\u3044\u3061\u66f8\u304b\u305a\u306b\u3001\u5217\u756a\u53f7\u3067\u6307\u5b9a\u300d<a href=\"https:\/\/t.co\/JvjIMvSNpD\">https:\/\/t.co\/JvjIMvSNpD<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1355659216346730497?ref_src=twsrc%5Etfw\">January 30, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\" id=\"block-e4b02801-35e2-4560-bd49-2ab3f713761b\"><span class=\"ez-toc-section\" id=\"dplyr_filter_%E3%81%A7_%E6%96%87%E5%AD%97%E3%81%AE%E9%83%A8%E5%88%86%E4%B8%80%E8%87%B4_%E3%82%92%E4%BD%BF%E3%81%86%EF%BC%88_%E5%88%97%E7%95%AA%E5%8F%B7%E3%81%A7%E6%8C%87%E5%AE%9A%EF%BC%89\"><\/span>dplyr::filter \u3067 \u6587\u5b57\u306e\u90e8\u5206\u4e00\u81f4 \u3092\u4f7f\u3046\uff08 + \u5217\u756a\u53f7\u3067\u6307\u5b9a\uff09<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-28\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">dat %&gt;% filter(str_detect(.&#91;&#91;<span class=\"hljs-number\">1<\/span>]], <span class=\"hljs-string\">\"\u6587\u5b57\"<\/span>))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-28\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>\u3082\u3057\u304f\u306f<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-29\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">dat %&gt;% filter(grep(<span class=\"hljs-string\">\"\u6587\u5b57\"<\/span>, .&#91;&#91;<span class=\"hljs-number\">1<\/span>]]))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-29\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>.[\u5217\u756a\u53f7] \u3067\u306f\u3060\u3081\u3067 .[[\u5217\u756a\u53f7]] \u3068\u3059\u308b\u3068\u52d5\u4f5c\u3059\u308b\u3002\u305d\u306e\u305f\u3081\u3001\u6700\u521d\u304b\u3089 [[ \u3067\u4f7f\u3046\u307b\u3046\u304c\u30a8\u30e9\u30fc\u304c\u5c11\u306a\u3044\u3002<\/p>\n\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">filter\u3067\u90e8\u5206\u4e00\u81f4\uff08grepl\u3001str_detect\uff09\u3092\u4f7f\u3044\u305f\u3044\u5834\u5408\u306f\u3001.[\u5217\u756a\u53f7] \u3067\u306f\u52d5\u4f5c\u305b\u305a .[[\u5217\u756a\u53f7]] \u3068\u3059\u308b\u3068\u5927\u4e08\u592b\u3002\u524d\u306e\u30c4\u30a4\u30fc\u30c8\u3067\u3082 .[[\u5217\u756a\u53f7]] \u3067\u3082\u52d5\u4f5c\u3059\u308b\u305f\u3081\u3001\u6700\u521d\u304b\u3089 [[ \u3067\u4f7f\u3046\u307b\u3046\u304c\u30a8\u30e9\u30fc\u304c\u5c11\u306a\u3044\u3002\u4f8b\uff1adat %&gt;% filter(str_detect(.[[1]], &quot;\u90e1$&quot;)) <a href=\"https:\/\/t.co\/UkwZg0zkbM\">https:\/\/t.co\/UkwZg0zkbM<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1355671093088976897?ref_src=twsrc%5Etfw\">January 31, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E6%95%B0%E5%AD%97%E3%81%A8%E6%96%87%E5%AD%97%E3%81%8C%E7%B5%90%E5%90%88%E3%81%97%E3%81%9F%E5%88%97%E3%82%92%E5%88%86%E9%9B%A2%E3%81%99%E3%82%8B\"><\/span>\u6570\u5b57\u3068\u6587\u5b57\u304c\u7d50\u5408\u3057\u305f\u5217\u3092\u5206\u96e2\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>\u4f8b\u300c0100\u672d\u5e4c\u5e02\u4fdd\u5065\u6240\u300d\u3068\u3044\u3063\u305f\u30c7\u30fc\u30bf\u306e\u5834\u5408<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-30\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">dat &lt;- dat %&gt;% \n  mutate(code = str_extract(code_area,<span class=\"hljs-string\">\"^(\\\\d)+\"<\/span>)) %&gt;%\n  mutate(area = str_extract(code_area, <span class=\"hljs-string\">\"(\\\\D)+$\"<\/span>))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-30\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<ul class=\"wp-block-list\">\n<li>\\\\d \uff1a\u6570\u5b57<\/li>\n\n\n\n<li>\\\\D\uff1a\u6570\u5b57\u4ee5\u5916<\/li>\n\n\n\n<li>+ \u6587\u5b57\u306e\u9023\u7d9a<\/li>\n\n\n\n<li>^\uff1a\u6587\u982d<\/li>\n\n\n\n<li>$\uff1a\u6587\u672b<\/li>\n<\/ul>\n\n\n\n<p>\u3068\u3044\u3046\u6b63\u898f\u8868\u73fe\u3002\uff08\u53c2\u8003\uff1a<a href=\"https:\/\/murashun.jp\/article\/programming\/regular-expression.html\" target=\"_blank\" rel=\"noreferrer noopener\">\u57fa\u672c\u7684\u306a\u6b63\u898f\u8868\u73fe\u4e00\u89a7<\/a> \uff09<\/p>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"2%E3%81%A4%E3%81%AE_Date%E5%9E%8B_%E3%81%AE%E6%97%A5%E4%BB%98%E3%83%87%E3%83%BC%E3%82%BF%E3%81%8B%E3%82%89%E5%B9%B4%E9%BD%A2%E3%82%92%E8%A8%88%E7%AE%97\"><\/span>2\u3064\u306e Date\u578b \u306e\u65e5\u4ed8\u30c7\u30fc\u30bf\u304b\u3089\u5e74\u9f62\u3092\u8a08\u7b97<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-31\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(lubridate)\ndat &lt;- dat %&gt;% mutate_at(vars(d_birth, d_x), <span class=\"hljs-keyword\">as<\/span>.Date) \ndat &lt;- dat %&gt;% mutate( age = <span class=\"hljs-keyword\">as<\/span>.duration(d_x - d_birth)) \ndat &lt;- dat %&gt;% mutate( age = <span class=\"hljs-keyword\">as<\/span>.double(str_extract(age, <span class=\"hljs-string\">\"(?&lt;=~).+(?=\\s)\"<\/span>))) <\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-31\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>(?&lt;=~).+(?=\\s) \u306f\u300c~\u3068\u30b9\u30da\u30fc\u30b9\u306e\u9593\u306e\u6587\u5b57\u300d\u3068\u3044\u3046\u6b63\u898f\u8868\u73fe<\/p>\n\n\n\n<ul class=\"wp-block-list\">\n<li>?&lt;=~ : \u76f4\u524d\u306b ~ \u304c\u3042\u308b<\/li>\n\n\n\n<li>.+ \uff1a\u3059\u3079\u3066\u306e\u6587\u5b57\u306e\u9023\u7d9a<\/li>\n\n\n\n<li>?=\\s \uff1a\u76f4\u5f8c\u306b \u30b9\u30da\u30fc\u30b9(\\s) \u304c\u3042\u308b<\/li>\n<\/ul>\n\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">&quot;\u691c\u7d22\u30ef\u30fc\u30c9\u306e\u524d\u5f8c\u306b\u3082\u6761\u4ef6\u3092\u3064\u3051\u308b\u3068\u304d\u306b\u4f7f\u3046\u3002\u57fa\u672c\u7cfb\u304c(?=regex)\u3067\u3001\u5426\u5b9a\u306a\u3089 ! \u306b\u3057\u3066\u3001\u76f4\u524d\u306a\u3089 &lt; \u3092\u8ffd\u52a0\u3059\u308b&quot; <a href=\"https:\/\/t.co\/KikmyRHxOd\">https:\/\/t.co\/KikmyRHxOd<\/a> &quot;\u6570\u5b57\u306b\u30de\u30c3\u30c1\u3059\u308b\u6b63\u898f\u8868\u73fe\u3092\u66f8\u3053\u3046\u3068\u3057\u3066 d \u3068\u3059\u308b\u3068\u6012\u3089\u308c\u308b\u3002 \u30d0\u30c3\u30af\u30b9\u30e9\u30c3\u30b7\u30e5\u305d\u306e\u3082\u306e\u3092\u8868\u3059\u306b\u306f\u4e8c\u91cd\u306b\u3057\u3066\u304a\u304f\u5fc5\u8981\u304c\u3042\u308b&quot; <a href=\"https:\/\/t.co\/LGfdNfHFH0\">https:\/\/t.co\/LGfdNfHFH0<\/a> <a href=\"https:\/\/t.co\/qhnXyoR3NG\">pic.twitter.com\/qhnXyoR3NG<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1332167047694880769?ref_src=twsrc%5Etfw\">November 27, 2020<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E6%97%A5%E4%BB%98%E3%83%87%E3%83%BC%E3%82%BF%E3%81%8B%E3%82%89%E7%89%B9%E5%AE%9A%E3%81%AE%E6%9C%9F%E9%96%93%E3%81%AE%E3%83%87%E3%83%BC%E3%82%BF%E3%82%92%E6%8A%9C%E3%81%8D%E5%87%BA%E3%81%99\"><\/span>\u65e5\u4ed8\u30c7\u30fc\u30bf\u304b\u3089\u7279\u5b9a\u306e\u671f\u9593\u306e\u30c7\u30fc\u30bf\u3092\u629c\u304d\u51fa\u3059<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>\u65e5\u4ed8\u306e\u5217\uff08date\uff09\u304b\u30892020\u5e741\u67081\u65e5\u304b\u30892020\u5e7412\u670831\u65e5\u307e\u3067\u306e\u30c7\u30fc\u30bf\u3092\u629c\u304d\u51fa\u3057\u305f\u3044\u5834\u5408<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-32\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">dat %&gt;% \n  filter(date &gt;= <span class=\"hljs-keyword\">as<\/span>.Date(<span class=\"hljs-string\">\"2020-01-01\"<\/span>) &amp; date &lt;= <span class=\"hljs-keyword\">as<\/span>.Date(<span class=\"hljs-string\">\"2020-12-31\"<\/span>))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-32\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"lubridate_asduration_%E3%81%A7%E8%A8%88%E7%AE%97%E3%81%97%E3%81%9F%E5%80%A4%E3%82%92%E6%97%A5%E6%95%B0%E5%8D%98%E4%BD%8D%E3%81%AB%E8%A8%88%E7%AE%97%E3%81%99%E3%82%8B\"><\/span>{lubridate} as.duration() \u3067\u8a08\u7b97\u3057\u305f\u5024\u3092\u65e5\u6570\u5358\u4f4d\u306b\u8a08\u7b97\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-33\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(lubridate)\ndat &lt;- dat %&gt;%\n    mutate(day = <span class=\"hljs-keyword\">as<\/span>.duration(x_2 - x_1 + ddays(<span class=\"hljs-number\">1<\/span>))\/dseconds(<span class=\"hljs-number\">86400<\/span>))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-33\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"list_%E5%9E%8B%E3%81%AE%E3%83%87%E3%83%BC%E3%82%BF%E3%82%92_dataframe_%E3%81%AB%E5%B1%95%E9%96%8B%E3%81%99%E3%82%8B\"><\/span>list \u578b\u306e\u30c7\u30fc\u30bf\u3092 data.frame \u306b\u5c55\u958b\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-34\" data-shcb-language-name=\"HTML, XML\" data-shcb-language-slug=\"xml\"><span><code class=\"hljs language-xml\">dat_list <span class=\"hljs-tag\">&lt;<span class=\"hljs-name\">-<\/span> <span class=\"hljs-attr\">dat_list<\/span> %&gt;<\/span>% reduce(rbind)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-34\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">HTML, XML<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">xml<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E9%87%8D%E8%A4%87%E8%A1%8C%E3%81%AE%E5%89%8A%E9%99%A4\"><\/span>\u91cd\u8907\u884c\u306e\u524a\u9664<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-35\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">dat %&gt;% distinct(x, y, .keep_all = <span class=\"hljs-keyword\">TRUE<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-35\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">\u3010\u30e1\u30e2\u3011\u201dR\u8a00\u8a9edplyr::distinct\u3067\u7c21\u5358\u306b\u91cd\u8907\u884c\u3092\u524a\u9664\u3067\u304d\u308b\u3002\u30ad\u30fc\u9805\u76ee\u4ee5\u5916\u306e\u9805\u76ee\u3082\u7c21\u5358\u306b\u62bd\u51fa\u3002\u201d <a href=\"https:\/\/t.co\/gKnQw2hbkm\">https:\/\/t.co\/gKnQw2hbkm<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1241791917731360768?ref_src=twsrc%5Etfw\">March 22, 2020<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E9%87%8D%E8%A4%87%E8%A1%8C%E3%81%AE%E7%A2%BA%E8%AA%8D\"><\/span>\u91cd\u8907\u884c\u306e\u78ba\u8a8d<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>\u91cd\u8907\u306e\u6570\u3082\u77e5\u308a\u305f\u3044\u5834\u5408\u306f table()\u3092\u4f7f\u7528\u3059\u308b\u3002<\/p>\n\n\n<pre class=\"wp-block-code\"><span><code class=\"hljs\">dat %&gt;% \n    pull(col_name) %&gt;% \n    table() %&gt;% \n    data.frame() %&gt;% \n    filter(Freq &gt;= 2) %&gt;% \n    arrange(desc(Freq))<\/code><\/span><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">\u5217\u306e\u4e2d\u8eab\u3092\u91cd\u8907\u305b\u305a\u306b\u53d6\u5f97\u3057\u305f\u3044\u5834\u5408\u306f dat %&gt;% pull(x) %&gt;% unique() \u3067\u3082\u3044\u3044\u3051\u3069\u3001\u91cd\u8907\u6570\u3082\u77e5\u308a\u305f\u3044\u5834\u5408\u306f table()\u3002\u4f8b\u3048\u3070\u30012\u56de\u4ee5\u4e0a\u91cd\u8907\u3057\u3066\u3044\u308b\u5024\u3092\u77e5\u308a\u305f\u3044\u5834\u5408\u306f dat %&gt;% pull(adress) %&gt;% table() %&gt;% data.frame() %&gt;% filter(Freq &gt;= 2) <a href=\"https:\/\/t.co\/5dhZND5M7M\">https:\/\/t.co\/5dhZND5M7M<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1371444726272991233?ref_src=twsrc%5Etfw\">March 15, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E7%89%B9%E5%AE%9A%E3%81%AE%E5%88%97%E3%81%AE_NA_%E3%82%92%E7%BD%AE%E3%81%8D%E6%8F%9B%E3%81%88%E3%82%8B\"><\/span>\u7279\u5b9a\u306e\u5217\u306e NA \u3092\u7f6e\u304d\u63db\u3048\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-36\" data-shcb-language-name=\"HTML, XML\" data-shcb-language-slug=\"xml\"><span><code class=\"hljs language-xml\">dat <span class=\"hljs-tag\">&lt;<span class=\"hljs-name\">-<\/span> <span class=\"hljs-attr\">dat<\/span> %&gt;<\/span>%\n   replace_na(list(x = 0,\n                   y = 0,\n                   z = 0))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-36\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">HTML, XML<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">xml<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E8%A1%8C%E5%88%97_%E3%81%AE_%E4%B8%8A%E4%B8%89%E8%A7%92_%E3%82%92_%E4%B8%8B%E4%B8%89%E8%A7%92_%E3%81%AB%E3%82%B3%E3%83%94%E3%83%BC\"><\/span>\u884c\u5217 \u306e \u4e0a\u4e09\u89d2 \u3092 \u4e0b\u4e09\u89d2 \u306b\u30b3\u30d4\u30fc<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-37\" data-shcb-language-name=\"HTML, XML\" data-shcb-language-slug=\"xml\"><span><code class=\"hljs language-xml\">M <span class=\"hljs-tag\">&lt;<span class=\"hljs-name\">-<\/span> <span class=\"hljs-attr\">dat<\/span>\n<span class=\"hljs-attr\">for<\/span>(<span class=\"hljs-attr\">i<\/span> <span class=\"hljs-attr\">in<\/span> <span class=\"hljs-attr\">1:nrow<\/span>(<span class=\"hljs-attr\">M<\/span>)) {<span class=\"hljs-attr\">for<\/span>(<span class=\"hljs-attr\">j<\/span> <span class=\"hljs-attr\">in<\/span> <span class=\"hljs-attr\">1:i<\/span>) {<span class=\"hljs-attr\">M<\/span>&#91;<span class=\"hljs-attr\">j<\/span>,<span class=\"hljs-attr\">i<\/span>]=<span class=\"hljs-string\">M&#91;i,j]}}<\/span><\/span><\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-37\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">HTML, XML<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">xml<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>\u4f8b\u3048\u3070\u3001{polycor} \u306e hetcor() \u3067\u9806\u5e8f\u76f8\u95a2\u4fc2\u6570\uff08\u30dd\u30ea\u30b3\u30ea\u30c3\u30af\u76f8\u95a2\u4fc2\u6570\u3084\u30dd\u30ea\u30b7\u30ea\u30a2\u30eb\u76f8\u95a2\u4fc2\u6570\uff09\u3092\u6c42\u3081\u305f\u3068\u304d\u306f\u3001\u7b97\u51fa\u3055\u308c\u305f\u5024\u304c\u4e0b\u4e09\u89d2\u306e\u307f\u306e\u305f\u3081\u3001{corrplot} \u306a\u3069\u3067\u76f8\u95a2\u884c\u5217\u3092\u4f5c\u6210\u3057\u305f\u3044\u5834\u5408\u306f\u4e0b\u8a18\u306e\u3088\u3046\u306b\u5bfe\u5fdc\u3059\u308b\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-38\" data-shcb-language-name=\"HTML, XML\" data-shcb-language-slug=\"xml\"><span><code class=\"hljs language-xml\">pacman::p_load(polycor)\nans <span class=\"hljs-tag\">&lt;<span class=\"hljs-name\">-<\/span> <span class=\"hljs-attr\">dat<\/span> %&gt;<\/span>% hetcor()\nM <span class=\"hljs-tag\">&lt;<span class=\"hljs-name\">-<\/span> <span class=\"hljs-attr\">ans<\/span>$<span class=\"hljs-attr\">tests<\/span>\n<span class=\"hljs-attr\">for<\/span>(<span class=\"hljs-attr\">i<\/span> <span class=\"hljs-attr\">in<\/span> <span class=\"hljs-attr\">1:nrow<\/span>(<span class=\"hljs-attr\">M<\/span>)) {<span class=\"hljs-attr\">for<\/span>(<span class=\"hljs-attr\">j<\/span> <span class=\"hljs-attr\">in<\/span> <span class=\"hljs-attr\">1:i<\/span>) {<span class=\"hljs-attr\">M<\/span>&#91;<span class=\"hljs-attr\">j<\/span>,<span class=\"hljs-attr\">i<\/span>]=<span class=\"hljs-string\">M&#91;i,j]<\/span> }}<\/span><\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-38\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">HTML, XML<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">xml<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">\u300c\u884c\u5217 (M) \u306e\u4e0a\u4e09\u89d2 uppertriangle \u3092\u4e0b\u4e09\u89d2 lowertriangle \u306b\u30b3\u30d4\u30fc\u300dfor(i in 1:nrow(M)) {for(j in 1:i) {M[i,j]=M[j,i] }} \u9006\u306b\u3057\u305f\u3044\u5834\u5408\u306f\u3001 M[j,i] = M[i,j] \u306e\u3088\u3046\u306b i \u3068 j \u3092\u5165\u308c\u66ff\u3048\u308b <a href=\"https:\/\/t.co\/cNuO3HrEPe\">https:\/\/t.co\/cNuO3HrEPe<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1344961634964443137?ref_src=twsrc%5Etfw\">January 1, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"mutate_%E3%81%A7%E8%A4%87%E6%95%B0%E5%88%97%E3%82%92%E9%81%B8%E6%8A%9E%E3%81%97%E3%81%A6%E5%90%88%E8%A8%88%E3%81%97%E3%81%9F%E3%81%84%E5%A0%B4%E5%90%88\"><\/span>mutate() \u3067\u8907\u6570\u5217\u3092\u9078\u629e\u3057\u3066\u5408\u8a08\u3057\u305f\u3044\u5834\u5408<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>rowSums\u3084reduce\u3092\u6d3b\u7528\u3059\u308b\u3002<\/p>\n\n\n<pre class=\"wp-block-code\"><span><code class=\"hljs\">dat %&gt;%\n  mutate(sum = rowSums(across(c(\u25cf, \u25cf))))<\/code><\/span><\/pre>\n\n\n<p>\u3082\u3057\u304f\u306f<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-39\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">dat %&gt;%\n  mutate(sum = reduce(across(c(\u25cf, \u25cf)), <span class=\"hljs-string\">`+`<\/span>))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-39\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">\u5099\u5fd8\u9332\u3002\u3068\u308a\u3042\u3048\u305a\u899a\u3048\u3066\u304a\u304f\u306a\u3089\u3001<br>\u2460 rowSums<br>dat %&gt;%<br>  mutate(sum = rowSums(across(c(\u25cf, \u25cf))))<br><br>\u2461 reduce\uff08\u3082\u3057\u304f\u306fbase::Reduce\uff09<br>dat %&gt;%<br>  mutate(sum = reduce(across(c(\u25cf, \u25cf)), `+`))<br><br>\u4ed6\u306b\u3082\u8272\u3005\u3042\u308a\u307e\u3059\u3002\u30c4\u30ea\u30fc\u3092\u53c2\u7167\u3057\u3066\u304f\u3060\u3055\u3044\uff08\u7686\u69d8\u6539\u3081\u3066\u3042\u308a\u304c\u3068\u3046\u3054\u3056\u3044\u307e\u3057\u305f\uff09\u3002 <a href=\"https:\/\/t.co\/NeaFfUFZmZ\">https:\/\/t.co\/NeaFfUFZmZ<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1505814222055170050?ref_src=twsrc%5Etfw\">March 21, 2022<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"wide_%E3%83%87%E3%83%BC%E3%82%BF%E3%81%AE%E3%81%BE%E3%81%BE%E3%80%81%E5%88%97%E6%AF%8E%E3%81%AB%E4%B8%80%E6%8B%AC%E3%81%97%E3%81%A6%E8%A8%88%E7%AE%97%E3%81%97%E3%81%9F%E3%81%84%E5%A0%B4%E5%90%88\"><\/span>wide \u30c7\u30fc\u30bf\u306e\u307e\u307e\u3001\u5217\u6bce\u306b\u4e00\u62ec\u3057\u3066\u8a08\u7b97\u3057\u305f\u3044\u5834\u5408 <span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>dat |&gt; group_by(group) |&gt; summarise(across(where(is.double), ~ first(.x) &#8211; last(.x)))<\/p>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E3%82%B5%E3%83%96%E3%83%87%E3%82%A3%E3%83%AC%E3%82%AF%E3%83%88%E3%83%AA%E5%86%85%E3%81%AE%E3%83%87%E3%83%BC%E3%82%BF%E3%82%82%E5%8F%96%E5%BE%97%E3%81%99%E3%82%8B\"><\/span>\u30b5\u30d6\u30c7\u30a3\u30ec\u30af\u30c8\u30ea\u5185\u306e\u30c7\u30fc\u30bf\u3082\u53d6\u5f97\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>\u8907\u6570\u306e\u30b5\u30d6\u30c7\u30a3\u30ec\u30af\u30c8\u30ea\u5185\u306e\u30c7\u30fc\u30bf\u306e\u30d1\u30b9\u3082\u53d6\u5f97\u3057\u305f\u3044\u5834\u5408\u306f\u3001 list.files() \u306e\u4e2d\u306b recursive=TRUE \u3092\u5165\u529b\u3059\u308b\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-40\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">read_xlsx_list &lt;- <span class=\"hljs-keyword\">list<\/span>.files(\n  <span class=\"hljs-string\">\"..\/materials\/folder\"<\/span>,          <span class=\"hljs-comment\"># \u691c\u7d22\u3059\u308b\u30d5\u30a9\u30eb\u30c0\u30d1\u30b9\u3092\u6307\u5b9a<\/span>\n  <span class=\"hljs-string\">\"*.xlsx\"<\/span>,                       <span class=\"hljs-comment\"># .xlsx \u30d5\u30a1\u30a4\u30eb\u3092\u62bd\u51fa<\/span>\n  recursive=<span class=\"hljs-keyword\">TRUE<\/span>) %&gt;%             <span class=\"hljs-comment\"># \u30b5\u30d6\u30d5\u30a9\u30eb\u30c0\u5185\u3082\u691c\u7d22\u3067\u304d\u308b\u3088\u3046\u306b\u306a\u308b<\/span>\n  str_c(<span class=\"hljs-string\">\"..\/materials\/folder\/\"<\/span>,.) <span class=\"hljs-comment\"># \u30d1\u30b9\u3092\u7d50\u5408\u3057\u3066\u304a\u3051\u3070\u5f8c\u3067read_excel()\u3057\u3084\u3059\u3044<\/span><\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-40\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">\u8907\u6570\u306e\u30b5\u30d6\u30c7\u30a3\u30ec\u30af\u30c8\u30ea\u5185\u306e\u30c7\u30fc\u30bf\u306e\u30d1\u30b9\u3082\u53d6\u5f97\u3057\u305f\u3044\u5834\u5408\u306f\u3001 list.files() \u306e\u4e2d\u306b recursive=TRUE \u3092\u5165\u529b\u3059\u308b\u3002 \u4f8b\uff1a list.files(&quot;test\/folder&quot;, &quot;*.csv&quot;, recursive=T) \u3067\u3001test\u30c7\u30a3\u30ec\u30af\u30c8\u30ea\u306b\u3042\u308b\u8907\u6570\u306e\u30b5\u30d6\u30c7\u30a3\u30ec\u30af\u30c8\u30ea\u5185\u306e .csv \u3082\u3059\u3079\u3066\u53d6\u5f97\u3067\u304d\u308b\u3002 \u53c2\u8003\uff1a <a href=\"https:\/\/t.co\/JyZzuTItz2\">https:\/\/t.co\/JyZzuTItz2<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1410571194537889792?ref_src=twsrc%5Etfw\">July 1, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h2 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E5%8F%AF%E8%A6%96%E5%8C%96\"><\/span>\u53ef\u8996\u5316<span class=\"ez-toc-section-end\"><\/span><\/h2>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"ggplot2_theme_set_%E3%81%AE%E6%B4%BB%E7%94%A8\"><\/span>{ggplot2} theme_set() \u306e\u6d3b\u7528<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>\u30d5\u30a1\u30a4\u30eb\u306e\u6700\u521d\u3067\u5b9a\u7fa9\u3059\u308c\u3070\u4ee5\u5f8c\u306eggplot\u3067\u53cd\u6620\u3055\u308c\u307e\u3059<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-41\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">theme_set(\n  theme_classic() + \n    theme(\n      strip.background = element_blank(),\n      text = element_text(size = <span class=\"hljs-number\">10<\/span>),\n      axis.text.x = element_text(angle = <span class=\"hljs-number\">0<\/span>, vjust = <span class=\"hljs-number\">1<\/span>, hjust = <span class=\"hljs-number\">1<\/span>),\n      axis.ticks.length.x = unit(<span class=\"hljs-number\">0.1<\/span>, <span class=\"hljs-string\">\"cm\"<\/span>),\n      legend.position = <span class=\"hljs-string\">'none'<\/span>)\n)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-41\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">\u6700\u8fd1\u306e ggplot \u306e theme \u306f\u3001theme_set() \u3092\u4f7f\u3063\u3066\u3001\u3053\u306e\u3042\u305f\u308a\u3067\u5fae\u8abf\u6574\uff08\u30d5\u30a1\u30a4\u30eb\u306e\u6700\u521d\u3067\u5b9a\u7fa9\u3059\u308c\u3070\u4ee5\u5f8c\u306eggplot\u3067\u53cd\u6620\u3055\u308c\u308b\uff09\u3002 <a href=\"https:\/\/t.co\/PFMSra2hau\">pic.twitter.com\/PFMSra2hau<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1441974156090695683?ref_src=twsrc%5Etfw\">September 26, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<p>\u6700\u8fd1\u306ftheme_set()\u3082\u542b\u3081\u3066\u4ee5\u4e0b\u3092\u30c7\u30d5\u30a9\u30eb\u30c8\u3067.md\u30d5\u30a1\u30a4\u30eb\u306b\u8a2d\u5b9a\u3057\u3066\u3044\u307e\u3059<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-42\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">---\ntitle: <span class=\"hljs-string\">\"yyyymmdd_xxxxx\"<\/span>\noutput: html_document\ndate: <span class=\"hljs-string\">\"2024-xx-xx\"<\/span>\nauthor: <span class=\"hljs-string\">\"xxxxxx\"<\/span>\noutput: \n  html_document:\n    theme: cerulean\n    toc: yes\n    toc_depth: <span class=\"hljs-number\">3<\/span>\n    toc_float: yes\n    df_print: <span class=\"hljs-string\">\"kable\"<\/span>\n  powerpoint_presentation:\n    reference_doc: template.pptx\n---\n\n```{r setup, <span class=\"hljs-keyword\">include<\/span>=<span class=\"hljs-keyword\">FALSE<\/span>}\nknitr::opts_chunk$set(<span class=\"hljs-keyword\">echo<\/span> = <span class=\"hljs-keyword\">FALSE<\/span>)\nknitr::opts_chunk$set(<span class=\"hljs-keyword\">eval<\/span> = <span class=\"hljs-keyword\">TRUE<\/span>)\nknitr::opts_chunk$set(tidy = <span class=\"hljs-keyword\">FALSE<\/span>)\nknitr::opts_chunk$set(warning = <span class=\"hljs-keyword\">FALSE<\/span>)\nknitr::opts_chunk$set(error = <span class=\"hljs-keyword\">FALSE<\/span>)\nknitr::opts_chunk$set(message = <span class=\"hljs-keyword\">FALSE<\/span>)\nknitr::opts_chunk$set(dpi = <span class=\"hljs-number\">300<\/span>,  fig.width = <span class=\"hljs-number\">10<\/span>, fig.height = <span class=\"hljs-number\">10<\/span>*<span class=\"hljs-number\">0.618<\/span>)\n```\n\n```{r}\ntheme_set(\n  theme_classic() + \n    theme(\n      strip.background = element_blank(),\n      text = element_text(size = <span class=\"hljs-number\">10<\/span>, family = <span class=\"hljs-string\">\"HiraginoSans-W3\"<\/span>),\n      axis.text.x = element_text(angle = <span class=\"hljs-number\">0<\/span>, vjust = <span class=\"hljs-number\">1<\/span>, hjust = <span class=\"hljs-number\">1<\/span>),\n      axis.ticks.length.x = unit(<span class=\"hljs-number\">0.1<\/span>, <span class=\"hljs-string\">\"cm\"<\/span>),\n      legend.position = <span class=\"hljs-string\">'none'<\/span>)\n)\n```\n\n```{r}\npacman::p_load(tidyverse)\n```<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-42\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"ggplot2_%E3%81%AE_aes_%E3%81%AB_%E6%96%87%E5%AD%97%E5%88%97%E3%81%A7%E3%82%AB%E3%83%A9%E3%83%A0%E5%90%8D%E3%82%92%E6%B8%A1%E3%81%99\"><\/span>{ggplot2} \u306e aes() \u306b \u6587\u5b57\u5217\u3067\u30ab\u30e9\u30e0\u540d\u3092\u6e21\u3059<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\"><span><code class=\"hljs\">dat %&gt;% ggplot(aes_string(x=x, y=y))<\/code><\/span><\/pre>\n\n\n<p>aes() \u3067\u306f\u306a\u304f aes_string() \u3092\u4f7f\u7528\u3059\u308b\u3002\u3082\u3057\u304f\u306f\u4e0b\u8a18\u306e\u65b9\u6cd5\u3067\u3082\u826f\u3044\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-43\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">dat %&gt;% ggplot(aes(x=.data&#91;&#91;<span class=\"hljs-string\">\"x\"<\/span>]], y=.data&#91;&#91;<span class=\"hljs-string\">\"y\"<\/span>]]))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-43\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>.data[[&#8220;x&#8221;]] \u3092\u899a\u3048\u3066\u304a\u304f\u3068\u3001\u95a2\u6570\u4f5c\u6210\u306e\u969b\u306b\u3046\u307e\u304f\u5f15\u6570\u3092\u6e21\u305b\u306a\u3044\u3068\u304d\u306b\u5f79\u306b\u7acb\u3064\u3053\u3068\u304c\u3042\u308b\u3002\uff08is.na(), arrange(), pull() \u306a\u3069\uff09<\/p>\n\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">\u3082\u3057\u304f\u306f aes(x=.data[[&quot;x&quot;]], y=.data[[&quot;y&quot;]]) \u3067\u3082OK \u2192 &quot;\u6587\u5b57\u5217\u3068\u3057\u3066\u30ab\u30e9\u30e0\u540d\u3092\u6e21\u3057\u3066\u3082\u30a8\u30e9\u30fc\u306b\u306a\u308b\u3002\u901a\u5e38\u306f\u3001 aes(x=x, y=y) \u3067\u3042\u308b\u3068\u3053\u308d\u3092\u3001ggplot2::aes_string \u3067 wrap \u3057\u3066\u3042\u3052\u308b\u3053\u3068\u3067\u3001\u5f15\u6570\u3068\u3057\u3066\u4e0e\u3048\u305f\u30ab\u30e9\u30e0\u540d\u3092\u3088\u3057\u306a\u306b\u3084\u3063\u3066\u304f\u308c\u308b\u3002&quot; <a href=\"https:\/\/t.co\/lRR7MD92hU\">https:\/\/t.co\/lRR7MD92hU<\/a> <a href=\"https:\/\/t.co\/VSYfx6mVz4\">pic.twitter.com\/VSYfx6mVz4<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1346353959313711104?ref_src=twsrc%5Etfw\">January 5, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"ggplot2_%E3%81%AE_x_%E8%BB%B8%E3%81%AE%E3%83%A9%E3%83%99%E3%83%AB%E3%82%92%E5%B0%91%E3%81%97%E3%81%A0%E3%81%91%E5%82%BE%E3%81%91%E3%82%8B\"><\/span>{ggplot2} \u306e x \u8ef8\u306e\u30e9\u30d9\u30eb\u3092\u5c11\u3057\u3060\u3051\u50be\u3051\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\"><span><code class=\"hljs\">dat %&gt;% ggplot(aes(x)) +\n    geom_count() +\n    theme(axis.text.x = element_text(angle=30, hjust=1))<\/code><\/span><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"ggplot2_%E5%87%A1%E4%BE%8B%E3%81%AE%E4%BD%8D%E7%BD%AE%E8%AA%BF%E6%95%B4%EF%BC%9Abottom%E3%81%AB%E7%BD%AE%E3%81%84%E3%81%A6%E5%8F%B3%E5%AF%84%E3%81%9B\"><\/span>{ggplot2} \u51e1\u4f8b\u306e\u4f4d\u7f6e\u8abf\u6574\uff1abottom\u306b\u7f6e\u3044\u3066\u53f3\u5bc4\u305b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-44\" data-shcb-language-name=\"HTML, XML\" data-shcb-language-slug=\"xml\"><span><code class=\"hljs language-xml\">g <span class=\"hljs-tag\">&lt;<span class=\"hljs-name\">-<\/span> <span class=\"hljs-attr\">ggplot<\/span>() + <span class=\"hljs-attr\">...<\/span>\n\n<span class=\"hljs-attr\">g<\/span> + <span class=\"hljs-attr\">theme<\/span>(<span class=\"hljs-attr\">legend.position<\/span> = <span class=\"hljs-string\">\"bottom\"<\/span>,\n          <span class=\"hljs-attr\">legend.justification<\/span> = <span class=\"hljs-string\">c(<\/span>\"<span class=\"hljs-attr\">right<\/span>\"))<\/span><\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-44\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">HTML, XML<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">xml<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">&quot;(ggplot2\u306e)\u51e1\u4f8b\u306f\u3069\u3053\u306b\u3067\u3082\u914d\u7f6e\u3067\u304d\u307e\u3059\u3002legend.position \u30aa\u30d7\u30b7\u30e7\u30f3\u3092\u4f7f\u3044\u3001\u4e0a\u3001\u53f3\u3001\u4e0b\u3001\u5de6\u306e\u3044\u305a\u308c\u304b\u3092\u6307\u5b9a\u3057\u307e\u3059\u3002(bottom\u306b\u7f6e\u3044\u3066\u3001\u53f3\u5bc4\u305b\u306b\u3057\u305f\u3044\u5834\u5408\u306ftheme(legend.position = &quot;bottom&quot;, legend.justification = c(&quot;right&quot;))&quot; <a href=\"https:\/\/t.co\/IK9tus45Ml\">https:\/\/t.co\/IK9tus45Ml<\/a> <a href=\"https:\/\/t.co\/lzLaH6QPsl\">pic.twitter.com\/lzLaH6QPsl<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1359824505389023238?ref_src=twsrc%5Etfw\">February 11, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"ggforcegeom_sina_%E3%81%A7_geom_jitter%E3%81%AE%E5%B9%85%E3%82%92%E5%AF%86%E5%BA%A6%E5%88%86%E5%B8%83%E3%81%A7%E5%88%B6%E5%BE%A1%E3%81%99%E3%82%8B\"><\/span>{ggforce}geom_sina \u3067 geom_jitter()\u306e\u5e45\u3092\u5bc6\u5ea6\u5206\u5e03\u3067\u5236\u5fa1\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>violin plot() \u3082\u898b\u3084\u3059\u3044\u3067\u3059\u304c\u3001geom_sina()\u3092\u4f7f\u3046\u3068\u3001\u30c9\u30c3\u30c8\u306e\u307e\u307e violin plot() \u306e\u3088\u3046\u306b\u56f3\u793a\u3067\u304d\u308b\u305f\u3081\u3001\u8996\u899a\u7684\u306b\u5206\u304b\u308a\u3084\u3059\u3044\u56f3\u3092\u63cf\u304f\u3053\u3068\u304c\u3067\u304d\u307e\u3059\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-45\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(ggforce)\n\ndat %&gt;% ggplot(aes(X,Y)) +\n  geom_sina(aes(coular = Z))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-45\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">\u500b\u4eba\u7684\u306b\u306f\u3001geom_jitter()\u3088\u308a\u3082Violin plot\u306e\u3088\u3046\u306b\u81a8\u3089\u3093\u3067\u304f\u308c\u308bggforce::geom_sina()\u306e\u65b9\u304c\u597d\u307f\u3002\u300cSina plot\u306f\u3001jitter plot\u306e\u62e1\u5f35\u3067\u3001\u5e45\u306f\u5404\u30c7\u30fc\u30bf\u306e\u5bc6\u5ea6\u5206\u5e03\u306b\u3088\u3063\u3066\u5236\u5fa1\u3055\u308c\u307e\u3059\u300d <a href=\"https:\/\/t.co\/4PghYE0ZHV\">https:\/\/t.co\/4PghYE0ZHV<\/a> \u300cgeom_sina()\u3092\u4f7f\u3063\u3066\u7bb1\u3072\u3052\u56f3\u3068\u30c9\u30c3\u30c8\u3092\u91cd\u306d\u3066\u8868\u793a\u300d <a href=\"https:\/\/t.co\/wJU6YyXRg1\">https:\/\/t.co\/wJU6YyXRg1<\/a> <a href=\"https:\/\/t.co\/X3piiPdAZY\">pic.twitter.com\/X3piiPdAZY<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1354109690498572288?ref_src=twsrc%5Etfw\">January 26, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"100%E7%A9%8D%E3%81%BF%E4%B8%8A%E3%81%92%E6%A3%92%E3%82%B0%E3%83%A9%E3%83%95%E3%81%AE%E3%83%A9%E3%83%99%E3%83%AB%E4%BD%8D%E7%BD%AE%E8%AA%BF%E6%95%B4\"><\/span>100%\u7a4d\u307f\u4e0a\u3052\u68d2\u30b0\u30e9\u30d5\u306e\u30e9\u30d9\u30eb\u4f4d\u7f6e\u8abf\u6574<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-46\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">ddat %&gt;% \n  group_by(x,y) %&gt;% \n  summarize(count=n()) %&gt;% \n  arrange(x,desc(y)) %&gt;% \n  ddply(x,transform,label_y=cumsum(count)) %&gt;% \n  ggplot(aes(x = x, y = count, fill = y)) +\n  geom_col()+\n  geom_text ( aes ( y = label_y ,\n                    label = count ), colour = <span class=\"hljs-string\">\"black\"<\/span>, vjust = <span class=\"hljs-string\">\"inward\"<\/span>) +\n  scale_fill_brewer(palette = <span class=\"hljs-string\">\"Blues\"<\/span>,\n                    name=<span class=\"hljs-string\">\"Y\"<\/span>,\n                    breaks=c(<span class=\"hljs-string\">\"a\"<\/span>, <span class=\"hljs-string\">\"b\"<\/span>, <span class=\"hljs-string\">\"c\"<\/span>),\n                    labels=c(<span class=\"hljs-string\">\"A\"<\/span>, <span class=\"hljs-string\">\"B\"<\/span>, <span class=\"hljs-string\">\"C\"<\/span>) ) +\n  scale_x_continuous(breaks=c(<span class=\"hljs-number\">1<\/span>,<span class=\"hljs-number\">2<\/span>,<span class=\"hljs-number\">3<\/span>)) +\n  xlab(<span class=\"hljs-string\">\"X\"<\/span>)+\n  ylab(<span class=\"hljs-string\">\"Count\"<\/span>)+\n  theme_minimal() <\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-46\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">100%\u7a4d\u307f\u4e0a\u3052\u68d2\u30b0\u30e9\u30d5\u306e\u5834\u5408\u306f\u3001\u3053\u306e\u8a18\u4e8b\u306e\u8a18\u8f09\u65b9\u6cd5\u306b\u52a0\u3048\u3066\u3001 geom_text() \u5185\u306b vjust = &quot;inward&quot; \u3092\u5165\u308c\u3066\u304a\u304f\u3068\u3001\u6570\u5b57\u304c\u67a0\u5916\u306b\u3067\u306a\u3044\u306e\u3067\u5b89\u5fc3<a href=\"https:\/\/t.co\/LR4eUYLQWO\">https:\/\/t.co\/LR4eUYLQWO<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1310908696763928577?ref_src=twsrc%5Etfw\">September 29, 2020<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E3%80%8CColorbrewer%E3%80%8D%E3%81%A7%E9%85%8D%E8%89%B2%E3%81%AE%E6%B1%BA%E5%AE%9A\"><\/span>\u300cColorbrewer\u300d\u3067\u914d\u8272\u306e\u6c7a\u5b9a<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">\u56f3\u3084\u30b0\u30e9\u30d5\u306e\u8272\u4f7f\u3044\u3092\u8003\u3048\u308b\u3068\u304d\u306b\u4fbf\u5229\u3002\u3010\u30e1\u30e2\u3011\u300cColorbrewer: Color Advice for Maps \u300d <a href=\"https:\/\/t.co\/gWM9gHkQf4\">https:\/\/t.co\/gWM9gHkQf4<\/a> <a href=\"https:\/\/t.co\/OHk0S3lVlc\">pic.twitter.com\/OHk0S3lVlc<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1173420435511209984?ref_src=twsrc%5Etfw\">September 16, 2019<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E3%80%8CColor_Palette_Cinema%E3%80%8D%E3%81%A7%E9%85%8D%E8%89%B2%E3%81%AE%E6%B1%BA%E5%AE%9A\"><\/span>\u300cColor Palette Cinema\u300d\u3067\u914d\u8272\u306e\u6c7a\u5b9a<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">&quot;Color Palette Cinema&quot; \u3068\u3044\u3046\u4fbf\u5229\u306a\u691c\u7d22\u8a9e\u3092\u767a\u898b\u3002\u914d\u8272\u306b\u56f0\u3063\u305f\u3068\u304d\u306b\u4f7f\u3063\u3066\u307f\u308b\uff08\u9006\u306b\u591a\u304f\u3066\u56f0\u308b\u304b\u3082\uff09\u3002\u500b\u4eba\u7684\u306b\u306f\u66f4\u306b&quot;Wes&quot;\u3092\u691c\u7d22\u8a9e\u306b\u8ffd\u52a0\uff08Wes anderson\u306eWes\uff09\u3002 <a href=\"https:\/\/t.co\/5lrGJDSA8r\">https:\/\/t.co\/5lrGJDSA8r<\/a> <a href=\"https:\/\/t.co\/kNRgrfZPuL\">pic.twitter.com\/kNRgrfZPuL<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1335460426235174912?ref_src=twsrc%5Etfw\">December 6, 2020<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E9%85%8D%E8%89%B2%E3%83%90%E3%83%AA%E3%82%A2%E3%83%95%E3%83%AA%E3%83%BC%EF%BC%88safe_color%EF%BC%89\"><\/span>\u914d\u8272\u30d0\u30ea\u30a2\u30d5\u30ea\u30fc\uff08safe color\uff09<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-47\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">palette(<span class=\"hljs-string\">\"Okabe-Ito\"<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-47\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\"><a href=\"https:\/\/twitter.com\/hashtag\/RJpUsers?src=hash&amp;ref_src=twsrc%5Etfw\">#RJpUsers<\/a> &quot;R-4.0.0\u4ee5\u964d\u3067\u306f\uff0cpalette(&quot;Okabe-Ito&quot;)\u3068\u3084\u308b\u3068\u666e\u901a\u306e\u8272\u756a\u53f7\u304csafe colors\u306b\u306a\u308b&quot;\u3001\u3068\u306e\u3053\u3068\u3002\u53c2\u8003\uff1a\u2460\u300cA New palette() for R<br>\u300d<a href=\"https:\/\/t.co\/Ti2plswp55\">https:\/\/t.co\/Ti2plswp55<\/a> \u2461&quot;\u30ab\u30e9\u30fc\u30e6\u30cb\u30d0\u30fc\u30b5\u30eb\u30c7\u30b6\u30a4\u30f3\uff08CUD\uff09\u306e\u63a8\u5968\u4e8b\u9805(\u5ca1\u90e8\u30fb\u4f0a\u85e4\u30012002, <a href=\"https:\/\/t.co\/DSDvIQJhkH\">https:\/\/t.co\/DSDvIQJhkH<\/a> ) &quot; <a href=\"https:\/\/t.co\/LPC5fe4ueS\">https:\/\/t.co\/LPC5fe4ueS<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1340178111648784397?ref_src=twsrc%5Etfw\">December 19, 2020<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h2 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E5%88%86%E6%9E%90\"><\/span>\u5206\u6790<span class=\"ez-toc-section-end\"><\/span><\/h2>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"tidydata_%E3%81%8B%E3%82%89_Steel-Dwass_%E3%81%AE%E5%A4%9A%E9%87%8D%E6%AF%94%E8%BC%83\"><\/span>tidydata \u304b\u3089 Steel-Dwass \u306e\u591a\u91cd\u6bd4\u8f03<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>\u30ce\u30f3\u30d1\u30e9\u30e1\u30c8\u30ea\u30c3\u30af\u306e\u591a\u91cd\u6bd4\u8f03\u6cd5\u3067\u3042\u308b\u30b9\u30c6\u30a3\u30fc\u30eb\u30fb\u30c9\u30a5\u30ef\u30b9(Steel-Dwass)\u306b\u306f\u3001<a href=\"http:\/\/aoki2.si.gunma-u.ac.jp\/R\/Steel-Dwass.html\" target=\"_blank\" rel=\"noreferrer noopener\">\u7fa4\u99ac\u5927\u5b66 \u9752\u6728\u5148\u751f \u306e\u8a18\u4e8b<\/a> \u304c\u53c2\u8003\u306b\u306a\u308a\u307e\u3059\u304c\u3001tidydata \u304b\u3089\u305d\u306e\u307e\u307e Steel-Dwass \u3092\u884c\u3048\u308b\u3088\u3046\u306b\u95a2\u6570\u3092\u81ea\u4f5c\u3057\u3066\u307f\u307e\u3057\u305f\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-48\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(tidyverse)\n\nsource(<span class=\"hljs-string\">\"http:\/\/aoki2.si.gunma-u.ac.jp\/R\/src\/Steel-Dwass.R\"<\/span>, encoding=<span class=\"hljs-string\">\"euc-jp\"<\/span>)\n\nsteel_dwass &lt;- <span class=\"hljs-function\"><span class=\"hljs-keyword\">function<\/span><span class=\"hljs-params\">(df, data, group)<\/span><\/span>{\n  data_vector &lt;- df %&gt;% pull(data)\n  group_vector &lt;- df %&gt;% pull(group)\n  result &lt;- Steel.Dwass(data_vector, group_vector)\n  result_tibble &lt;- result %&gt;% as_tibble()\n  result_tibble &lt;- cbind(steel_dwass = rownames(result),result_tibble)\n  result_tibble &lt;- result_tibble %&gt;%\n    mutate(star = if_else( p &lt; <span class=\"hljs-number\">0.001<\/span>, <span class=\"hljs-string\">\"**\"<\/span>, if_else(p &lt; <span class=\"hljs-number\">0.05<\/span>, <span class=\"hljs-string\">\"*\"<\/span>, <span class=\"hljs-string\">\"NS\"<\/span>))) %&gt;%\n    mutate(note = if_else(p &lt; <span class=\"hljs-number\">0.001<\/span>, <span class=\"hljs-string\">\"p\uff1c0.001\"<\/span>, if_else(p &lt; <span class=\"hljs-number\">0.05<\/span>, <span class=\"hljs-string\">\"p\uff1c0.05\"<\/span>, <span class=\"hljs-string\">\"NS\"<\/span>))) %&gt;% \n    mutate(across(p, ~ round(.x, digits = <span class=\"hljs-number\">3<\/span>))) \n  result_tibble\n}<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-48\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>data\u5217\u3001group\u5217\u306e\u9806\u306b\u6307\u5b9a\u3057\u3066\u304f\u3060\u3055\u3044\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-49\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">dat %&gt;% steel_dwass(<span class=\"hljs-string\">\"data\"<\/span>, <span class=\"hljs-string\">\"group\"<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-49\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"rstan_%E5%AE%9F%E8%A1%8C%E9%80%9F%E5%BA%A6%E3%81%AE%E9%AB%98%E9%80%9F%E5%8C%96\"><\/span>{rstan} \u5b9f\u884c\u901f\u5ea6\u306e\u9ad8\u901f\u5316<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-50\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">rstan_options(auto_write = <span class=\"hljs-keyword\">TRUE<\/span>)\noptions(mc.cores = parallel::detectCores())<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-50\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">&quot;\u300crstan_options(auto_write = TRUE)\u300d\u3068\u6307\u5b9a\u3057\u305f\u3046\u3048\u3067MCMC\u3092\u5b9f\u884c\u3059\u308b\u3068\u3001\u62e1\u5f35\u5b50\u304c\u300c.rds\u300d\u3067\u3042\u308bRDS\u30d5\u30a1\u30a4\u30eb\u304c\u4f5c\u6210\u3055\u308c\u307e\u3059\u3002C++\u30b3\u30fc\u30c9\u3092\u2026\u518d\u5ea6\u306e\u30b3\u30f3\u30d1\u30a4\u30eb\u3092\u3057\u306a\u304f\u3066\u3082\u6e08\u3080\u3088\u3046\u306bRDS\u30d5\u30a1\u30a4\u30eb\u3092\u4fdd\u5b58\u3057\u3066\u304a\u304d\u307e\u3059\u30022\u56de\u76ee\u4ee5\u964d\u306f\u30b3\u30f3\u30d1\u30a4\u30eb\u304c\u4e0d\u8981\u306a\u306e\u3067\u3001\u5b9f\u884c\u304c\u65e9\u304f\u306a\u308a\u307e\u3059&quot; <a href=\"https:\/\/t.co\/2zJnZabvI8\">https:\/\/t.co\/2zJnZabvI8<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1348091719447834624?ref_src=twsrc%5Etfw\">January 10, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">&quot;\u300crstan_options(auto_write = TRUE)\u300d\u3068\u6307\u5b9a\u3057\u305f\u4e0a\u3067MCMC\u3092\u5b9f\u884c\u3059\u308b\u3068\u20262\u56de\u76ee\u4ee5\u964d\u306f\uff08C++\u306e\uff09\u30b3\u30f3\u30d1\u30a4\u30eb\u304c\u4e0d\u8981\u306a\u306e\u3067\u3001\u5b9f\u884c\u901f\u5ea6\u304c\u65e9\u304f\u306a\u308a\u307e\u3059\u3002\u300coptions(mc.cores = parallel::detectCores())\u300d\u3092\u6307\u5b9a\u3059\u308b\u3068\u3001\u8a08\u7b97\u3092\u4e26\u5217\u5316\u3059\u308b\u306e\u3067\u5b9f\u884c\u901f\u5ea6\u304c\u4e0a\u304c\u308a\u307e\u3059\u3002&quot; <a href=\"https:\/\/t.co\/2zJnZabvI8\">https:\/\/t.co\/2zJnZabvI8<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1348092376447741955?ref_src=twsrc%5Etfw\">January 10, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"gtsummary_%E5%80%8B%E4%BA%BA%E7%9A%84%E9%9B%9B%E5%BD%A2_%E5%AF%BE%E5%BF%9C%E3%81%82%E3%82%8B%E6%A4%9C%E5%AE%9A\"><\/span>{gtsummary} \u500b\u4eba\u7684\u96db\u5f62 (\u5bfe\u5fdc\u3042\u308b\u691c\u5b9a)<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-51\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">dat |&gt; \n  tbl_summary(\n    by = case_control, <span class=\"hljs-comment\"># \u6bd4\u8f03\u3057\u305f\u3044\u3082\u306e<\/span>\n    <span class=\"hljs-keyword\">include<\/span> = -ID, <span class=\"hljs-comment\"># \u7701\u304d\u305f\u3044\u3082\u306e\u3002\u3067\u3082\u5bfe\u5fdc\u3042\u308b\u691c\u5b9a\u3067\u4f7f\u3044\u305f\u3044\u3002<\/span>\n        type = <span class=\"hljs-keyword\">list<\/span>(all_continuous() ~ <span class=\"hljs-string\">\"continuous2\"<\/span>,\n                    c(<span class=\"hljs-string\">\"count\"<\/span>) ~ <span class=\"hljs-string\">\"continuous2\"<\/span>), <span class=\"hljs-comment\"># \u5217\u540d\u3092\u660e\u793a\u3057\u3066\u3082OK<\/span>\n    statistic = all_continuous() ~ c(\n       <span class=\"hljs-string\">\"{mean} ({sd})\"<\/span>,\n       <span class=\"hljs-string\">\"{median} ({p25}, {p75})\"<\/span>,\n       <span class=\"hljs-string\">\"{min}, {max}\"<\/span>),\n     digits = <span class=\"hljs-keyword\">list<\/span>(where(is.numeric) ~ c(<span class=\"hljs-number\">1<\/span>,<span class=\"hljs-number\">1<\/span>,<span class=\"hljs-number\">1<\/span>,<span class=\"hljs-number\">1<\/span>,<span class=\"hljs-number\">1<\/span>)) <span class=\"hljs-comment\"># \u6709\u52b9\u6570\u5b57<\/span>\n  ) |&gt; \n  add_p(\n    <span class=\"hljs-comment\"># test = list(<\/span>\n    <span class=\"hljs-comment\"># all_continuous() ~ \"t.test\"), # t.test\u3092\u884c\u3044\u305f\u3044\u5834\u5408\u306f\u3053\u3061\u3089<\/span>\n    group = ID, <span class=\"hljs-comment\"># \u5bfe\u5fdc\u3042\u308b\u691c\u5b9a\u3092\u3059\u308b\u969b\u306fID\u3092\u660e\u793a<\/span>\n    test = <span class=\"hljs-keyword\">list<\/span>(\n    all_continuous() ~ <span class=\"hljs-string\">\"wilcox.test\"<\/span>,\n    all_categorical() ~ <span class=\"hljs-string\">\"mcnemar.test\"<\/span>),\n    pvalue_fun = <span class=\"hljs-function\"><span class=\"hljs-keyword\">function<\/span><span class=\"hljs-params\">(x)<\/span> <span class=\"hljs-title\">style_pvalue<\/span><span class=\"hljs-params\">(x, digits = <span class=\"hljs-number\">2<\/span>)<\/span>) |&gt; # \u6709\u52b9\u6570\u5b57\n  <span class=\"hljs-title\">bold_p<\/span><span class=\"hljs-params\">()<\/span> |&gt; \n  <span class=\"hljs-title\">bold_labels<\/span><span class=\"hljs-params\">()<\/span> |&gt; \n  <span class=\"hljs-title\">add_overall<\/span><span class=\"hljs-params\">()<\/span> <\/span><\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-51\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">\u5099\u5fd8\u9332 <a href=\"https:\/\/t.co\/JdebV0atoW\">pic.twitter.com\/JdebV0atoW<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1733640950558433642?ref_src=twsrc%5Etfw\">December 10, 2023<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"gtsummary_%E3%81%A7%E9%80%A3%E7%B6%9A%E5%80%A4%E3%80%81%E3%82%AB%E3%83%86%E3%82%B4%E3%83%AA%E5%80%A4%E3%82%92%E4%B8%80%E6%8B%AC%E3%81%A7%E6%8C%87%E5%AE%9A\"><\/span>{gtsummary} \u3067\u9023\u7d9a\u5024\u3001\u30ab\u30c6\u30b4\u30ea\u5024\u3092\u4e00\u62ec\u3067\u6307\u5b9a<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-52\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(gtsummary)\n\ntable_list &lt;- c(<span class=\"hljs-string\">\"x_1\"<\/span>, <span class=\"hljs-string\">\"x_2\"<\/span>, <span class=\"hljs-string\">\"y_1\"<\/span>, <span class=\"hljs-string\">\"y_2\"<\/span>, <span class=\"hljs-string\">\"z\"<\/span>)\ntable_label_list &lt;- c(<span class=\"hljs-string\">\"X1\"<\/span>, <span class=\"hljs-string\">\"X2\"<\/span>, <span class=\"hljs-string\">\"Y1\"<\/span>, <span class=\"hljs-string\">\"Y2\"<\/span>, <span class=\"hljs-string\">\"Z\"<\/span>)\ncnt_list &lt;- c(<span class=\"hljs-string\">\"x_1\"<\/span>, <span class=\"hljs-string\">\"x_2\"<\/span>)\nctg_list &lt;- c(<span class=\"hljs-string\">\"y_1\"<\/span>, <span class=\"hljs-string\">\"y_2\"<\/span>)\ndct_list &lt;- c(<span class=\"hljs-string\">\"z\"<\/span>)\n\ntable_one &lt;- dat %&gt;% \n   select(all_of(table_list)) %&gt;% \n   setNames(all_of(table_label_list)) %&gt;% \n   tbl_summary(\n       type = <span class=\"hljs-keyword\">list<\/span>(cnt_list ~ <span class=\"hljs-string\">\"continuous\"<\/span>,\n                   ctg_list ~ <span class=\"hljs-string\">\"categorical\"<\/span>,\n                   dct_list ~ <span class=\"hljs-string\">\"dichotomous\"<\/span>))<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-52\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"gtsummary_%E8%A4%87%E6%95%B0%E8%A1%8C%E3%81%A7%E9%80%A3%E7%B6%9A%E5%80%A4_%E3%81%AE_summary_%E3%82%92%E8%A8%98%E8%BC%89%E3%81%99%E3%82%8B\"><\/span>{gtsummary} \u8907\u6570\u884c\u3067\u9023\u7d9a\u5024 \u306e summary \u3092\u8a18\u8f09\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-53\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(gtsummary)\n\ntable_one &lt;- dat %&gt;%\n  select(<span class=\"hljs-string\">\"x\"<\/span>,<span class=\"hljs-string\">\"y\"<\/span>,<span class=\"hljs-string\">\"z\"<\/span>) %&gt;%\n   tbl_summary(\n     type = all_continuous() ~ <span class=\"hljs-string\">\"continuous2\"<\/span>,\n     statistic = all_continuous() ~ c(\n       <span class=\"hljs-string\">\"{N_nonmiss}\"<\/span>,\n       <span class=\"hljs-string\">\"{mean} ({sd})\"<\/span>,\n       <span class=\"hljs-string\">\"{median} ({p25}, {p75})\"<\/span>,\n       <span class=\"hljs-string\">\"{min}, {max}\"<\/span>),\n     digits = <span class=\"hljs-keyword\">list<\/span>(where(is.numeric) ~ c(<span class=\"hljs-number\">0<\/span>,<span class=\"hljs-number\">1<\/span>,<span class=\"hljs-number\">1<\/span>,<span class=\"hljs-number\">1<\/span>,<span class=\"hljs-number\">1<\/span>,<span class=\"hljs-number\">1<\/span>,<span class=\"hljs-number\">1<\/span>,<span class=\"hljs-number\">1<\/span>)),\n     missing = <span class=\"hljs-string\">\"no\"<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-53\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>type \u3092 &#8220;continuous2&#8221; \u3068\u3059\u308b\u3053\u3068\u306b\u6ce8\u610f\u3002\u6709\u52b9\u6570\u5b57\u306f\u51fa\u73fe\u9806\u306b c() \u306b\u307e\u3068\u3081\u308b\u3002\u3053\u306e\u5834\u5408\u306f N \u3092\u6574\u6570\u3001\u305d\u306e\u4ed6\u3092\u6709\u52b9\u6570\u5b57\u5c0f\u6570\u70b91\u6841\u3068\u3057\u305f\u3002<\/p>\n\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">{gtsummary} \u3067 \u8907\u6570\u884c\u3067\u9023\u7d9a\u5024\u306e summary \u3092\u8a18\u8f09\u3057\u305f\u3044\u5834\u5408\u306f\u3001tbl_summary() \u5185\u306b statistic = all_continuous() ~ c(&quot;{N_nonmiss}&quot;, &quot;{median} ({p25}, {p75})&quot;, &quot;{min}, {max}&quot;) \u3068\u3044\u3046\u3088\u3046\u306b\u300c , \u300d\u3067\u533a\u5207\u3063\u3066\u8a18\u8f09\u3002 <a href=\"https:\/\/t.co\/bgWKMDtNrp\">https:\/\/t.co\/bgWKMDtNrp<\/a> <a href=\"https:\/\/t.co\/SRbVAJLtbW\">pic.twitter.com\/SRbVAJLtbW<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1346587495903870977?ref_src=twsrc%5Etfw\">January 5, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"gtsummary_%E8%A1%8C%E5%88%97%E5%90%8D%E3%82%84%E6%B3%A8%E9%87%88%E3%82%92%E6%97%A5%E6%9C%AC%E8%AA%9E%E8%A1%A8%E8%A8%98%E3%81%AB%E3%81%99%E3%82%8B\"><\/span>{gtsummary} \u884c\u5217\u540d\u3084\u6ce8\u91c8\u3092\u65e5\u672c\u8a9e\u8868\u8a18\u306b\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-54\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">theme_gtsummary_language(<span class=\"hljs-string\">\"ja\"<\/span>)\n<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-54\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>\u3082\u3068\u306b\u623b\u3057\u305f\u3044\u5834\u5408\u306f\u3001\u4e0b\u8a18\u306e\u30b3\u30fc\u30c9\u3092\u5b9f\u884c\u3059\u308b\u3002<\/p>\n\n\n<pre class=\"wp-block-code\"><span><code class=\"hljs\">reset_gtsummary_theme()<\/code><\/span><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"gtsummary_snakecase_snake_case_%E3%81%AB%E3%81%97%E3%81%A6%E3%81%84%E3%82%8B%E5%A4%89%E6%95%B0%E5%90%8D%E3%82%92_camelCase_%E3%81%AB%E5%A4%89%E6%9B%B4%E3%81%97%E3%81%A6%E8%A1%A8%E7%A4%BA%E3%81%99%E3%82%8B\"><\/span>{gtsummary} {snakecase} <strong>snake_case<\/strong> \u306b\u3057\u3066\u3044\u308b\u5909\u6570\u540d\u3092 <strong>camelCase<\/strong> \u306b\u5909\u66f4\u3057\u3066\u8868\u793a\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-55\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(gtsummary, snakecase)\n\ntable_one &lt;- dat %&gt;% \n  select(<span class=\"hljs-string\">\"x\"<\/span>,<span class=\"hljs-string\">\"y\"<\/span>,<span class=\"hljs-string\">\"z\"<\/span>) %&gt;%\n  set_variable_labels(\n    .labels = to_title_case(names(.))) %&gt;% \n  tbl_summary()<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-55\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"gtsummary_%E3%81%A7%E4%BD%9C%E6%88%90%E3%81%97%E3%81%9F%E5%88%97%E3%81%AE%E9%A0%86%E5%BA%8F%E3%82%92%E9%A0%BB%E5%BA%A6%E9%A0%86%E3%81%AB%E4%B8%A6%E3%81%B3%E6%9B%BF%E3%81%88%E3%82%8B\"><\/span>{gtsummary} \u3067\u4f5c\u6210\u3057\u305f\u5217\u306e\u9806\u5e8f\u3092\u983b\u5ea6\u9806\u306b\u4e26\u3073\u66ff\u3048\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-56\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(gtsummary)\n\ntable_one &lt;- dat %&gt;% \n  select(<span class=\"hljs-string\">\"x\"<\/span>,<span class=\"hljs-string\">\"y\"<\/span>,<span class=\"hljs-string\">\"z\"<\/span>) %&gt;%\n  tbl_summary(\n     sort = all_categorical() ~ <span class=\"hljs-string\">\"frequency\"<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-56\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>\u7279\u5b9a\u306e\u5217\uff08A\u3068B\u5217\uff09\u306e\u307f\u306e\u5834\u5408\u306f\u3001<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-57\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">tbl_summary(sort = c(<span class=\"hljs-string\">\"A\"<\/span>,<span class=\"hljs-string\">\"B\"<\/span>) ~ <span class=\"hljs-string\">\"frequency\"<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-57\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>\u3068\u3059\u308b\u3002<\/p>\n\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">{gtsummary} \u306etbl_summary() \u3067\u3001\u5217\u306e\u9806\u5e8f\u3092\u983b\u5ea6\u9806\u306b\u4e26\u3073\u66ff\u3048\u305f\u3044\u5834\u5408\u306f\u3001tbl_summary(sort = &#8230;)\u3092\u8a2d\u5b9a\u3002\u4f8b\uff1atbl_summary(by = trt, sort = all_categorical() ~ &quot;frequency&quot;) \u7279\u5b9a\u306e\u5217\uff08A\u3068B\uff09\u306e\u307f\u306e\u5834\u5408\u306f  sort = c(&quot;A&quot;,&quot;B&quot;) ~ &quot;frequency&quot; \u3068\u3059\u308b\u3002<a href=\"https:\/\/t.co\/9ixslB8VCd\">https:\/\/t.co\/9ixslB8VCd<\/a> <a href=\"https:\/\/t.co\/NibVxkwF1H\">pic.twitter.com\/NibVxkwF1H<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1389121252317532161?ref_src=twsrc%5Etfw\">May 3, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"gtsummary_%E3%81%A7%E4%BD%9C%E6%88%90%E3%81%97%E3%81%9F_table_%E3%82%92%E7%B8%A6%E6%A8%AA%E5%A4%89%E6%8F%9B%E3%81%99%E3%82%8B\"><\/span>{gtsummary} \u3067\u4f5c\u6210\u3057\u305f table \u3092\u7e26\u6a2a\u5909\u63db\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-58\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(gtsummary)\ntable_one &lt;- dat %&gt;%\n    select(<span class=\"hljs-string\">\"x\"<\/span>,<span class=\"hljs-string\">\"y\"<\/span>,<span class=\"hljs-string\">\"z\"<\/span>) %&gt;%\n    tbl_summary() %&gt;%\n    bold_labels() %&gt;%\n    add_n() %&gt;%\n    as_tibble() %&gt;%\n    t() %&gt;%\n    <span class=\"hljs-keyword\">as<\/span>.data.frame()<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-58\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">&quot;{gtsummary}\u3053\u3053\u3067\u4e00\u3064\u30dd\u30a4\u30f3\u30c8\u306a\u306e\u306f\u3001\u3053\u306eTable\u3092\u306a\u3093\u3068tibble\u306b\u3059\u308b\u3053\u3068\u304c\u3067\u304d\u307e\u3059\u3002\u3064\u307e\u308a\u3001CSV\u30d5\u30a1\u30a4\u30eb\u3068\u3057\u3066\u66f8\u304d\u51fa\u3059\u3053\u3068\u304c\u3067\u304d\u308b\u307b\u304b\u3001Rmarkdown\u3068\u7d44\u307f\u5408\u308f\u305b\u308b\u3053\u3068\u3082\u53ef\u80fd\u3067\u3059\u3002&quot; <a href=\"https:\/\/t.co\/6mkBx74lJ1\">https:\/\/t.co\/6mkBx74lJ1<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1305617619584598018?ref_src=twsrc%5Etfw\">September 14, 2020<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"modelsummary_%E3%81%A7_star_%E3%82%92%E3%81%A4%E3%81%91%E3%81%9F%E3%81%84%E5%A0%B4%E5%90%88\"><\/span>{modelsummary} \u3067 star \u3092\u3064\u3051\u305f\u3044\u5834\u5408<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>help \u306b\u8a18\u8f09\u3055\u308c\u3066\u3044\u308b\u3001estimate = &#8220;{estimate} ({std.error})stars&#8221; \u3067\u306f\u306a\u304f\u3001&#8221;{estimate} ({std.error}){stars}&#8221; \u3068\u3059\u308b\u3068\u8868\u793a\u3055\u308c\u307e\u3059<\/p>\n\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">{modelsummary}\u3067 estimate \u3092\u30ab\u30b9\u30bf\u30de\u30a4\u30ba\u3057\u305f\u4e0a\u3067 stars \u3092\u4ed8\u3051\u305f\u3044\u5834\u5408\u306f\u3001help \u306b\u8a18\u8f09\u3055\u308c\u3066\u3044\u308b\u3001estimate = &quot;{estimate} ({std.error})stars&quot; \u3067\u306f\u306a\u304f\u3001&quot;{estimate} ({std.error}){stars}&quot; \u3068\u3059\u308b\u3068\u8868\u793a\u3055\u308c\u308b\u3002 <a href=\"https:\/\/t.co\/o46qp1hH8y\">https:\/\/t.co\/o46qp1hH8y<\/a> <a href=\"https:\/\/t.co\/0qnNNxqHHY\">pic.twitter.com\/0qnNNxqHHY<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1356730709193363456?ref_src=twsrc%5Etfw\">February 2, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"gtsummary_%E3%81%A72%E5%A4%89%E6%95%B0%E4%BB%A5%E4%B8%8A%E3%81%A7_by_%E3%81%97%E3%81%9F%E3%81%84\"><\/span>{gtsummary} \u30672\u5909\u6570\u4ee5\u4e0a\u3067 by = \u3057\u305f\u3044<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>\u305d\u3093\u306a\u3068\u304d\u306ftbl_strata()\u3092\u4f7f\u7528\u3057\u307e\u3059\u3002<\/p>\n\n\n<pre class=\"wp-block-code\"><span><code class=\"hljs\">d |&gt;\n  tbl_strata(\n    strata = group1, \n    ~.x %&gt;% \n      tbl_summary(by = group2))<\/code><\/span><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">&quot;tbl_strata()\u95a2\u6570\u306e\u4e2d\u3067tbl_summary()\u95a2\u6570\u3092\u4f7f\u7528\u3057\u3001strata\u5f15\u6570\u3092\u6307\u5b9a\u3057\u3066\u5c64\u5225\u8868\u3092\u4f5c\u6210\u3059\u308b\u3053\u3068\u304c\u3067\u304d\u307e\u3059\u3002<br># minimalist example<br>d %&gt;%<br>  tbl_strata(<br>    strata = grade, <br>    ~.x %&gt;% <br>      tbl_summary(by = trt))<br>&quot;<a href=\"https:\/\/t.co\/YU8a5XE8QC\">https:\/\/t.co\/YU8a5XE8QC<\/a> <a href=\"https:\/\/t.co\/WA1Z5tsCYA\">pic.twitter.com\/WA1Z5tsCYA<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1661946053619515394?ref_src=twsrc%5Etfw\">May 26, 2023<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"corrplot_%E7%9B%B8%E9%96%A2%E8%A1%8C%E5%88%97%E3%82%92%E3%82%AB%E3%82%B9%E3%82%BF%E3%83%9E%E3%82%A4%E3%82%BA\"><\/span>{corrplot} \u76f8\u95a2\u884c\u5217\u3092\u30ab\u30b9\u30bf\u30de\u30a4\u30ba<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-59\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(corrplot)\n\ncol_list &lt;- c(<span class=\"hljs-string\">\"x\"<\/span>,<span class=\"hljs-string\">\"y\"<\/span>,<span class=\"hljs-string\">\"z\"<\/span>)\nlabelname_list &lt;- c(<span class=\"hljs-string\">\"X\"<\/span>,<span class=\"hljs-string\">\"Y\"<\/span>,<span class=\"hljs-string\">\"Z\"<\/span>)\n\ndat_cor &lt;- dat %&gt;% \n   select(all_of(col_list)) %&gt;% \n   setNames(all_of(labelname_list)) %&gt;% \n   na.omit()\n\n p &lt;- dat_cor %&gt;% \n   cor.mtest(method = <span class=\"hljs-string\">\"spearman\"<\/span>)\n\n corrplot(cor(dat_cor, method = <span class=\"hljs-string\">\"spearman\"<\/span>),\n          method=<span class=\"hljs-string\">\"number\"<\/span>,\n          tl.col=<span class=\"hljs-string\">\"black\"<\/span>,\n          tl.cex=<span class=\"hljs-number\">1<\/span>,\n          tl.srt=<span class=\"hljs-number\">45<\/span>,\n          diag=<span class=\"hljs-keyword\">FALSE<\/span>)\n\n corrplot(cor(dat_cor, method = <span class=\"hljs-string\">\"spearman\"<\/span>),\n          p.mat = p$p,\n          sig.level=<span class=\"hljs-number\">0<\/span>,\n          insig = <span class=\"hljs-string\">\"p-value\"<\/span>,\n          method=<span class=\"hljs-string\">\"ellipse\"<\/span>,\n          type=<span class=\"hljs-string\">\"lower\"<\/span>,\n          tl.pos = <span class=\"hljs-string\">\"n\"<\/span>,\n          cl.pos=<span class=\"hljs-string\">\"n\"<\/span>,\n          add=<span class=\"hljs-keyword\">TRUE<\/span>,\n          diag=<span class=\"hljs-keyword\">FALSE<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-59\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">{corrplot} \u3067 add=TRUE \u3059\u308b\u5834\u5408\u306f\u3001\uff12\u3064\u306e corrplot() \u3092\u4e00\u6c17\u306b\u9078\u629e\u3057\u3066\u5b9f\u884c\u3059\u308b\u5fc5\u8981\u304c\u3042\u308b\u3002\u53c2\u8003\uff1a\u2460\u753b\u50cf <a href=\"https:\/\/t.co\/N3xiHN4UZU\">https:\/\/t.co\/N3xiHN4UZU<\/a> \u2461 p\u5024\u306f p &lt;- cor.mtest() \u3067\u6c42\u3081\u3066 p.mat = p$p \u3068\u3059\u308c\u3070OK <a href=\"https:\/\/t.co\/uwI2BIQ5o0\">https:\/\/t.co\/uwI2BIQ5o0<\/a> <a href=\"https:\/\/t.co\/zCeLbRZ5sZ\">pic.twitter.com\/zCeLbRZ5sZ<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1344955720769236993?ref_src=twsrc%5Etfw\">January 1, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"polycor_%E3%82%AB%E3%83%86%E3%82%B4%E3%83%AA%E3%82%AB%E3%83%AB%E5%A4%89%E6%95%B0%E3%81%A8%E3%82%AB%E3%83%86%E3%82%B4%E3%83%AA%E3%82%AB%E3%83%AB%E5%A4%89%E6%95%B0%E3%81%A7%E7%9B%B8%E9%96%A2%E8%A1%8C%E5%88%97%EF%BC%88%E3%83%9D%E3%83%AA%E3%82%B3%E3%83%AA%E3%83%83%E3%82%AF%E7%9B%B8%E9%96%A2%E8%A1%8C%E5%88%97%EF%BC%89\"><\/span>{polycor} \u30ab\u30c6\u30b4\u30ea\u30ab\u30eb\u5909\u6570\u3068\u30ab\u30c6\u30b4\u30ea\u30ab\u30eb\u5909\u6570\u3067\u76f8\u95a2\u884c\u5217\uff08\u30dd\u30ea\u30b3\u30ea\u30c3\u30af\u76f8\u95a2\u884c\u5217\uff09<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-60\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(polycor)\nans &lt;- dat %&gt;% hetcor()\nans$correlation\nM &lt;- ans$tests\n<span class=\"hljs-keyword\">for<\/span>(i in <span class=\"hljs-number\">1<\/span>:nrow(M)) {<span class=\"hljs-keyword\">for<\/span>(j in <span class=\"hljs-number\">1<\/span>:i) {M&#91;j,i]=M&#91;i,j] }}\np$p &lt;- M<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-60\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>\u306e\u3088\u3046\u306b\u884c\u3044\u3001\u4e0a\u8a18 {corrplot} \u3092\u4e00\u90e8\u66f8\u304d\u63db\u3048\u308b\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-61\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">corrplot(ans$correlation,\n         method=<span class=\"hljs-string\">\"number\"<\/span>,\n         tl.col=<span class=\"hljs-string\">\"black\"<\/span>,\n         tl.cex=<span class=\"hljs-number\">1<\/span>,\n         tl.srt=<span class=\"hljs-number\">45<\/span>,\n         diag=<span class=\"hljs-keyword\">FALSE<\/span>)\n\ncorrplot(ans$correlation,\n         p.mat = p$p,\n         sig.level=<span class=\"hljs-number\">0<\/span>,\n         insig = <span class=\"hljs-string\">\"p-value\"<\/span>,\n         method=<span class=\"hljs-string\">\"ellipse\"<\/span>,\n         type=<span class=\"hljs-string\">\"lower\"<\/span>,\n         tl.pos = <span class=\"hljs-string\">\"n\"<\/span>,\n         cl.pos=<span class=\"hljs-string\">\"n\"<\/span>,\n         add=<span class=\"hljs-keyword\">TRUE<\/span>,\n         diag=<span class=\"hljs-keyword\">FALSE<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-61\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">&quot;\u2460\u9023\u7d9a\u5909\u6570\u3068\u9023\u7d9a\u5909\u6570\u306e\u76f8\u95a2\u4fc2\u6570\u304c\u300c\u30d4\u30a2\u30bd\u30f3\u306e\u76f8\u95a2\u4fc2\u6570\u300d\u3067\u3042\u308b\u3001\u2461\uff1c\u9806\u5e8f\u5909\u6570\uff1e\u3068\uff1c\u9806\u5e8f\u5909\u6570\uff1e\u306e\u76f8\u95a2\u4fc2\u6570\u304c\u300c\u30dd\u30ea\u30b3\u30ea\u30c3\u30af\u76f8\u95a2\u4fc2\u6570\u300d\u3067\u3042\u308b\u3001\u2462\uff1c\u9806\u5e8f\u5909\u6570\uff1e\u3068\u9023\u7d9a\u5909\u6570\u306e\u76f8\u95a2\u4fc2\u6570\u304c\u300c\u30dd\u30ea\u30b7\u30ea\u30a2\u30eb\u76f8\u95a2\u4fc2\u6570\u300d\u3067\u3042\u308b&quot; <a href=\"https:\/\/t.co\/4pvPr5nThB\">https:\/\/t.co\/4pvPr5nThB<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1344910328082022401?ref_src=twsrc%5Etfw\">January 1, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"ggplot_%E8%A1%A8%E7%A4%BA%E7%AF%84%E5%9B%B2%E8%A8%AD%E5%AE%9A%E3%81%ABxlim_ylim_%E3%82%92%E4%BD%BF%E3%81%A3%E3%81%A6%E3%81%AF%E3%81%84%E3%81%91%E3%81%AA%E3%81%84%E7%90%86%E7%94%B1\"><\/span>{ggplot} \u8868\u793a\u7bc4\u56f2\u8a2d\u5b9a\u306bxlim , ylim \u3092\u4f7f\u3063\u3066\u306f\u3044\u3051\u306a\u3044\u7406\u7531<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">&quot; xlim , ylim \u306f\u7bc4\u56f2\u5916\u306e\u5024\u3092NA\uff08\u6b20\u640d\uff09\u306b\u3057\u307e\u3059\u3002\u4e00\u65b9\u3001coord_cartesian\u306f\u7bc4\u56f2\u5916\u306e\u5024\u306b\u5bfe\u3057\u4f55\u306e\u51e6\u7406\u3082\u3057\u307e\u305b\u3093\uff08\u30ba\u30fc\u30e0\u30a4\u30f3\u3059\u308b\u3060\u3051\uff09\u3002xlim, ylim\u3067\u306f\u3001\u7bc4\u56f2\u5916\u306e\u5024\u306f\u5b58\u5728\u3057\u306a\u3044\u3053\u3068\u306b\u306a\u308a\u307e\u3059\u3002\u305d\u306e\u305f\u3081\u3001original \u3068\u306f\u7570\u306a\u308b\u56de\u5e30\u76f4\u7dda\u306b\u306a\u3063\u3066\u3057\u307e\u3044\u307e\u3059\u3002&quot; <a href=\"https:\/\/t.co\/svqflhxgWs\">https:\/\/t.co\/svqflhxgWs<\/a> <a href=\"https:\/\/t.co\/TJ8HGeCtmv\">pic.twitter.com\/TJ8HGeCtmv<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1412161469861416964?ref_src=twsrc%5Etfw\">July 5, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<p>\u7bc4\u56f2\u3092\u6307\u5b9a\u3057\u305f\u3044\u5834\u5408\u306f\u3001 coord_cartesian(xlim = c(xmin,xmax)) \u3092\u4f7f\u7528\u3059\u308b\u3002<\/p>\n\n\n<pre class=\"wp-block-code\"><span><code class=\"hljs\">g + coord_cartesian(xlim = c(0, 1000))<\/code><\/span><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"ggstatsplot_%E3%81%A7%E4%BD%9C%E6%88%90%E3%81%97%E3%81%9F%E5%9B%B3%E3%81%AB_ggsignif_%E3%81%A7%E6%9C%89%E6%84%8F%E5%B7%AE%E3%81%AE%E3%83%90%E3%83%BC%E3%82%92%E4%BB%98%E3%81%91%E3%82%8B\"><\/span>{ggstatsplot} \u3067\u4f5c\u6210\u3057\u305f\u56f3\u306b {ggsignif} \u3067\u6709\u610f\u5dee\u306e\u30d0\u30fc\u3092\u4ed8\u3051\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-62\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(ggsignif, ggstatsplot, wesanderson)\nggstatsplot::ggbetweenstats(\n   data = dat,\n   x = x,\n   y = y,\n   pairwise.comparisons = <span class=\"hljs-keyword\">FALSE<\/span>,\n   k = <span class=\"hljs-number\">0<\/span>, \n   xlab = <span class=\"hljs-string\">\"x\"<\/span>,\n   ylab = <span class=\"hljs-string\">\"y\"<\/span>,\n   ggstatsplot.layer = <span class=\"hljs-keyword\">TRUE<\/span>, \n   package = <span class=\"hljs-string\">\"wesanderson\"<\/span>,\n   palette = <span class=\"hljs-string\">\"GrandBudapest1\"<\/span>\n ) +\n   geom_signif(comparisons = <span class=\"hljs-keyword\">list<\/span>(c(<span class=\"hljs-string\">\"a\"<\/span>, <span class=\"hljs-string\">\"b\"<\/span>)),\n               map_signif_level = c(<span class=\"hljs-string\">\"&lt;strong&gt;* p\uff1c0.001\"<\/span>=<span class=\"hljs-number\">0.001<\/span>, <span class=\"hljs-string\">\"&lt;\/strong&gt; p\uff1c0.01\"<\/span>=<span class=\"hljs-number\">0.01<\/span>, <span class=\"hljs-string\">\"* p\uff1c0.05\"<\/span>=<span class=\"hljs-number\">0.05<\/span>)) <\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-62\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">&quot;{ggstatsplot} \u306f\u3001\u60c5\u5831\u91cf\u306e\u591a\u3044\u30d7\u30ed\u30c3\u30c8\u81ea\u4f53\u306b\u542b\u307e\u308c\u308b\u7d71\u8a08\u7684\u691c\u5b9a\u306e\u8a73\u7d30\u3092\u542b\u3080\u30b0\u30e9\u30d5\u30a3\u30c3\u30af\u3092\u4f5c\u6210\u3059\u308b\u305f\u3081\u306eggplot2\u30d1\u30c3\u30b1\u30fc\u30b8\u306e\u62e1\u5f35\u6a5f\u80fd\u3067\u3059\u3002&quot; <a href=\"https:\/\/twitter.com\/hashtag\/Rstats?src=hash&amp;ref_src=twsrc%5Etfw\">#Rstats<\/a>  <a href=\"https:\/\/t.co\/ZzcZck1YNn\">https:\/\/t.co\/ZzcZck1YNn<\/a> <a href=\"https:\/\/t.co\/6h1mlCBggp\">pic.twitter.com\/6h1mlCBggp<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1332080363217317889?ref_src=twsrc%5Etfw\">November 26, 2020<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">{ggsignif} \u4eca\u306f map_signif_level = c(&quot;***&quot;=0.001, &quot;**&quot;=0.01, &quot;*&quot;=0.05) \u3067 * \u304c\u3064\u304f\u3088\u3046\u306b\u306a\u3063\u3066\u307e\u3059\u306d\u3002 <a href=\"https:\/\/t.co\/SFEzIDYlQ7\">https:\/\/t.co\/SFEzIDYlQ7<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1333813139972923393?ref_src=twsrc%5Etfw\">December 1, 2020<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h2 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E3%82%B3%E3%83%9F%E3%83%A5%E3%83%8B%E3%82%B1%E3%83%BC%E3%82%B7%E3%83%A7%E3%83%B3%E3%83%BB%E3%81%9D%E3%81%AE%E4%BB%96\"><\/span>\u30b3\u30df\u30e5\u30cb\u30b1\u30fc\u30b7\u30e7\u30f3\u30fb\u305d\u306e\u4ed6<span class=\"ez-toc-section-end\"><\/span><\/h2>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"library_%E3%81%AE%E3%81%8B%E3%82%8F%E3%82%8A%E3%81%AB_pacman_p_load%E3%82%92%E4%BD%BF%E3%81%86\"><\/span>library() \u306e\u304b\u308f\u308a\u306b pacman::p_load\u3092\u4f7f\u3046<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-63\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\"><span class=\"hljs-keyword\">if<\/span> (!<span class=\"hljs-keyword\">require<\/span>(<span class=\"hljs-string\">\"pacman\"<\/span>)) install.packages(<span class=\"hljs-string\">\"pacman\"<\/span>)\npacman::p_load(tidyverse, magrittr, package_n)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-63\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-wp-embed is-provider-shoei-05 wp-block-embed-shoei-05\"><div class=\"wp-block-embed__wrapper\">\nhttps:\/\/plaza.umin.ac.jp\/shoei05\/wp\/index.php\/2020\/10\/24\/145\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"tomwenseleersexport_eoffice_%E5%9B%B3%E8%A1%A8%E3%82%92_ppt_%E5%BD%A2%E5%BC%8F%E3%81%A7%E5%87%BA%E5%8A%9B\"><\/span>{tomwenseleers\/export} {eoffice} \u56f3\u8868\u3092 ppt \u5f62\u5f0f\u3067\u51fa\u529b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-64\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(officer,rvg,openxlsx,ggplot2,flextable,xtable,rgl,stargazer,tikzDevice,xml2,broom,devtools)\npacman::p_load_gh(<span class=\"hljs-string\">\"tomwenseleers\/export\"<\/span>)\ngraph2ppt(append=<span class=\"hljs-keyword\">TRUE<\/span>, upscale=<span class=\"hljs-keyword\">TRUE<\/span>) <\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-64\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>\u30a8\u30e9\u30fc\u304c\u51fa\u308b\u5834\u5408\u306f\u3001\u4e00\u5ea6<a href=\"https:\/\/github.com\/tomwenseleers\/export\" target=\"_blank\" rel=\"noreferrer noopener\">\u30ea\u30f3\u30af\u5148<\/a>\u306e\u30a4\u30f3\u30b9\u30c8\u30fc\u30eb\u65b9\u6cd5\u3092\u8a66\u3057\u3066\u304b\u3089 graph2ppt() \u3092\u5b9f\u884c\u3057\u3066\u307f\u3066\u304f\u3060\u3055\u3044\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-65\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">install.packages(<span class=\"hljs-string\">\"officer\"<\/span>)\ninstall.packages(<span class=\"hljs-string\">\"rvg\"<\/span>)\ninstall.packages(<span class=\"hljs-string\">\"openxlsx\"<\/span>)\ninstall.packages(<span class=\"hljs-string\">\"ggplot2\"<\/span>)\ninstall.packages(<span class=\"hljs-string\">\"flextable\"<\/span>)\ninstall.packages(<span class=\"hljs-string\">\"xtable\"<\/span>)\ninstall.packages(<span class=\"hljs-string\">\"rgl\"<\/span>)\ninstall.packages(<span class=\"hljs-string\">\"stargazer\"<\/span>)\ninstall.packages(<span class=\"hljs-string\">\"tikzDevice\"<\/span>)\ninstall.packages(<span class=\"hljs-string\">\"xml2\"<\/span>)\ninstall.packages(<span class=\"hljs-string\">\"broom\"<\/span>)\ninstall.packages(<span class=\"hljs-string\">\"devtools\"<\/span>)\ndevtools::install_github(<span class=\"hljs-string\">\"tomwenseleers\/export\"<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-65\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p>{export}\u3067\u3046\u307e\u304f\u884c\u304b\u306a\u3044\u5834\u5408\u306f\u3001{eoffice} \u3092\u4f7f\u3044\u307e\u3059\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-66\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">pacman::p_load(eoffice)\ntopptx(file=<span class=\"hljs-string\">\"filename.pptx\"<\/span>, left = <span class=\"hljs-number\">0<\/span>, top = <span class=\"hljs-number\">0<\/span>, width = <span class=\"hljs-number\">8<\/span>, height = <span class=\"hljs-number\">6<\/span>, append = <span class=\"hljs-keyword\">TRUE<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-66\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">R\u3067\u4f5c\u6210\u3057\u305f\u56f3\u8868\u3092ppt\u306b\u30a8\u30af\u30b9\u30dd\u30fc\u30c8\u3059\u308b\u3068\u304d\u306f\u3001{export}\u3067 graph2ppt(append=TRUE,upscale=TRUE) \u306a\u3069\u3068\u3059\u308b\u3068\u3001\u3061\u3087\u3046\u3069\u826f\u3044\u5177\u5408\u306b\u30d9\u30af\u30bf\u30fc\u5f62\u5f0f\u3067\u51fa\u529b\u3055\u308c\u308b\u306e\u3067\u4fbf\u5229\u3002\u73fe\u5728CRAN\u306b\u767b\u9332\u3055\u308c\u3066\u3044\u308b\u3082\u306e\u3060\u3068{eoffice}\u306b\u3082\u4f3c\u305f\u6a5f\u80fd\u304c\u3042\u308b\u69d8\u5b50\uff08<a href=\"https:\/\/t.co\/cYrY5G2JiZ\">https:\/\/t.co\/cYrY5G2JiZ<\/a> \uff09 <a href=\"https:\/\/t.co\/Xc9nVCLSQR\">https:\/\/t.co\/Xc9nVCLSQR<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1302489257047588866?ref_src=twsrc%5Etfw\">September 6, 2020<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"ggsave_%E3%81%AE%E7%94%BB%E5%83%8F%E3%83%87%E3%83%BC%E3%82%BF%E3%82%B5%E3%82%A4%E3%82%BA%E3%82%92%E5%B0%8F%E3%81%95%E3%81%8F%E3%81%99%E3%82%8B\"><\/span>ggsave() \u306e\u753b\u50cf\u30c7\u30fc\u30bf\u30b5\u30a4\u30ba\u3092\u5c0f\u3055\u304f\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-67\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">ggsave(<span class=\"hljs-string\">\"figure1.tiff\"<\/span>, \n    width = ..., \n    height = ..., \n    dpi=<span class=\"hljs-number\">300<\/span>, \n    compression = <span class=\"hljs-string\">\"lzw\"<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-67\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">R\u3067\u4f5c\u3063\u305f\u753b\u50cf\u306e\u30c7\u30fc\u30bf\u30b5\u30a4\u30ba\u304c\u5927\u304d\u304f\u3066\u56f0\u308b\u3068\u304d\u306f\u3001ggsave( &#8230; , compression = &quot;lzw&quot;) \u3067\u3001\u6570\u5341\u301c\u767eMB\u306e\u30c7\u30fc\u30bf\u3092\u3001\u6570\u767eB\u306b\u5727\u7e2e\u3067\u304d\u308b\u3002\u8ad6\u6587\u6295\u7a3f\u3067\u30b5\u30a4\u30ba\u306b\u5f15\u3063\u304b\u304b\u3063\u305f\u308a\u3001Gmail\u3067\u6dfb\u4ed8\u3059\u308b\u3068\u304d\u306b\u30b5\u30a4\u30ba\u304c\u5927\u304d\u3059\u304e\u3066GoogleDrive\u7d4c\u7531\u3067\u5171\u6709\u3059\u308b\u3053\u3068\u306b\u306a\u3063\u3066\u3044\u305f\u30d5\u30a1\u30a4\u30eb\u3082\u3001\u3053\u306e\u5727\u7e2e\u3067\u89e3\u6c7a\u3002 <a href=\"https:\/\/t.co\/zlRpmmhoXK\">https:\/\/t.co\/zlRpmmhoXK<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1389128875209236484?ref_src=twsrc%5Etfw\">May 3, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h2 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"ggsave_%E3%81%A7%E4%BF%9D%E5%AD%98%E3%81%97%E3%81%9F%E5%9B%B3%E3%81%AE%E8%83%8C%E6%99%AF%E3%81%8C%E9%80%8F%E6%98%8E%E3%81%AB%E3%81%AA%E3%81%A3%E3%81%A6%E3%81%97%E3%81%BE%E3%81%86%E5%A0%B4%E5%90%88%E3%81%AE%E5%AF%BE%E5%87%A6%E6%B3%95\"><\/span>ggsave() \u3067\u4fdd\u5b58\u3057\u305f\u56f3\u306e\u80cc\u666f\u304c\u900f\u660e\u306b\u306a\u3063\u3066\u3057\u307e\u3046\u5834\u5408\u306e\u5bfe\u51e6\u6cd5<span class=\"ez-toc-section-end\"><\/span><\/h2>\n\n\n\n<p>ggsave(&#8230;, bg = &#8220;<strong>white<\/strong>&#8220;) \u3068 bg \u3067\u80cc\u666f\u8272\u3092\u6307\u5b9a\u3067\u304d\u308b\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-68\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">ggsave(<span class=\"hljs-string\">\"figure.png\"<\/span>, g, bg = <span class=\"hljs-string\">\"white\"<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-68\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<p><br>\u9006\u306b\u80cc\u666f\u3092\u900f\u660e\u306b\u3057\u305f\u3044\u5834\u5408\u306f bg = &#8220;transparent&#8221; \u3068\u6307\u5b9a\u3059\u308b<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-69\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">ggsave(<span class=\"hljs-string\">\"figure.png\"<\/span>, g, bg = <span class=\"hljs-string\">\"transparent\"<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-69\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E3%83%97%E3%83%AD%E3%82%B8%E3%82%A7%E3%82%AF%E3%83%88%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%82%92%E7%AB%8B%E3%81%A1%E4%B8%8A%E3%81%92%E3%81%9F%E5%BE%8C%E3%81%AB%E5%BF%85%E8%A6%81%E3%81%AA%E3%83%95%E3%82%A9%E3%83%AB%E3%83%80%E3%82%92%E4%BD%9C%E6%88%90%E3%81%99%E3%82%8B\"><\/span>\u30d7\u30ed\u30b8\u30a7\u30af\u30c8\u30d5\u30a1\u30a4\u30eb\u3092\u7acb\u3061\u4e0a\u3052\u305f\u5f8c\u306b\u5fc5\u8981\u306a\u30d5\u30a9\u30eb\u30c0\u3092\u4f5c\u6210\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>Console \u306e\u96a3\u306e Terminal \u304b\u3089\u4e0b\u8a18\u3092\u5165\u529b<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-70\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">mkdir {data,thesis,analysis,<span class=\"hljs-function\"><span class=\"hljs-keyword\">function<\/span>,<span class=\"hljs-title\">materials<\/span>}<\/span><\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-70\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-wp-embed is-provider-shoei-05 wp-block-embed-shoei-05\"><div class=\"wp-block-embed__wrapper\">\nhttps:\/\/plaza.umin.ac.jp\/shoei05\/wp\/index.php\/2020\/10\/25\/165\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"Rmarkdown_%E3%81%AE%E3%83%87%E3%83%95%E3%82%A9%E3%83%AB%E3%83%88%E3%83%91%E3%82%B9%E3%82%92%E3%83%97%E3%83%AD%E3%82%B8%E3%82%A7%E3%82%AF%E3%83%88%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%81%8B%E3%82%89%E3%81%AE%E7%9B%B8%E5%AF%BE%E3%83%91%E3%82%B9%E3%81%AB%E5%A4%89%E6%9B%B4%E3%81%99%E3%82%8B\"><\/span>Rmarkdown \u306e\u30c7\u30d5\u30a9\u30eb\u30c8\u30d1\u30b9\u3092\u30d7\u30ed\u30b8\u30a7\u30af\u30c8\u30d5\u30a1\u30a4\u30eb\u304b\u3089\u306e\u76f8\u5bfe\u30d1\u30b9\u306b\u5909\u66f4\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-71\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">knitr::opts_knit$set(root.dir = rprojroot::find_rstudio_root_file())<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-71\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">&quot;\u30c7\u30d5\u30a9\u30eb\u30c8\u3067\u306f\u3001R\u30c1\u30e3\u30f3\u30af\uff08chunk\uff09\u306e\u4f5c\u696d\u30c7\u30a3\u30ec\u30af\u30c8\u30ea\u306f\u3001.Rmd\u30d5\u30a1\u30a4\u30eb\u306e\u3042\u308b\u30c7\u30a3\u30ec\u30af\u30c8\u30ea\u306b\u306a\u308a\u307e\u3059\u3002\u3064\u307e\u308a\u3001\u30c1\u30e3\u30f3\u30af\u5185\u3067\u5916\u90e8\u30d5\u30a1\u30a4\u30eb\u3092\u53c2\u7167\u3059\u308b\u5834\u5408\u3001\u3053\u308c\u3089\u306e\u30d1\u30b9\u304c.Rmd\u30d5\u30a1\u30a4\u30eb\u306e\u30c7\u30a3\u30ec\u30af\u30c8\u30ea\u306b\u5bfe\u3059\u308b\u76f8\u5bfe\u30d1\u30b9\u3067\u3042\u308b\u3053\u3068\u3092\u77e5\u308b\u5fc5\u8981\u304c\u3042\u308a\u307e\u3059\u3002&quot; <a href=\"https:\/\/t.co\/hYYWofTnlt\">https:\/\/t.co\/hYYWofTnlt<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1322810620618567682?ref_src=twsrc%5Etfw\">November 1, 2020<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<figure class=\"wp-block-embed is-type-wp-embed is-provider-shoei-05 wp-block-embed-shoei-05\"><div class=\"wp-block-embed__wrapper\">\nhttps:\/\/plaza.umin.ac.jp\/shoei05\/wp\/index.php\/2020\/11\/02\/239\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"Rmarkdown_%E3%81%A7%E3%82%88%E3%81%8F%E8%A1%8C%E3%81%86%E5%88%9D%E6%9C%9F%E8%A8%AD%E5%AE%9A\"><\/span>Rmarkdown \u3067\u3088\u304f\u884c\u3046\u521d\u671f\u8a2d\u5b9a<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>\u4e0a\u8a18\u306e\u30c7\u30d5\u30a9\u30eb\u30c8\u30d1\u30b9\u3068\u3042\u308f\u305b\u3066\u79c1\u81ea\u8eab\u304c\u3088\u304f\u884c\u3046\u521d\u671f\u8a2d\u5b9a\u4f8b\u3067\u3059\u3002\u51fa\u529b\u3059\u308b\u56f3\u8868\u306f \u30c7\u30d5\u30a9\u30eb\u30c8\u3067 300 dpi \u306b\u8a2d\u5b9a\u3057\u3066\u3044\u307e\u3059\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-72\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">---\ntitle: <span class=\"hljs-string\">\"\u2026\"<\/span>\n<span class=\"hljs-attr\">output<\/span>:\n  html_document:\n    theme: cerulean\n    <span class=\"hljs-attr\">toc<\/span>: yes\n    <span class=\"hljs-attr\">toc_depth<\/span>: <span class=\"hljs-number\">3<\/span>\n    <span class=\"hljs-attr\">toc_float<\/span>: yes\n    <span class=\"hljs-attr\">df_print<\/span>: <span class=\"hljs-string\">\"kable\"<\/span>\n---<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-72\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-73\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">{r setup, <span class=\"hljs-keyword\">include<\/span>=<span class=\"hljs-keyword\">FALSE<\/span>}\nknitr::opts_knit$set(root.dir = rprojroot::find_rstudio_root_file())\nknitr::opts_chunk$set(<span class=\"hljs-keyword\">echo<\/span> = <span class=\"hljs-keyword\">FALSE<\/span>)\nknitr::opts_chunk$set(<span class=\"hljs-keyword\">eval<\/span> = <span class=\"hljs-keyword\">TRUE<\/span>)\nknitr::opts_chunk$set(tidy = <span class=\"hljs-keyword\">FALSE<\/span>)\nknitr::opts_chunk$set(warning = <span class=\"hljs-keyword\">FALSE<\/span>)\nknitr::opts_chunk$set(error = <span class=\"hljs-keyword\">FALSE<\/span>)\nknitr::opts_chunk$set(message = <span class=\"hljs-keyword\">FALSE<\/span>)\nknitr::opts_chunk$set(dpi = <span class=\"hljs-number\">300<\/span>)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-73\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-74\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">{r}\n<span class=\"hljs-keyword\">if<\/span> (!<span class=\"hljs-keyword\">require<\/span>(<span class=\"hljs-string\">\"pacman\"<\/span>)) install.packages(<span class=\"hljs-string\">\"pacman\"<\/span>)\npacman::p_load(tidyverse,readxl,readr,magrittr,...)<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-74\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"Rmarkdown%E3%81%A7%E6%96%87%E4%B8%AD%E3%81%A8%E6%96%87%E6%9C%AB%E3%81%AE%E5%BC%95%E7%94%A8%E6%96%87%E7%8C%AE%E3%82%92%E3%83%8F%E3%82%A4%E3%83%91%E3%83%BC%E3%83%AA%E3%83%B3%E3%82%AF%E3%81%A7%E9%96%A2%E9%80%A3%E4%BB%98%E3%81%91%E3%82%8B\"><\/span>Rmarkdown\u3067\u6587\u4e2d\u3068\u6587\u672b\u306e\u5f15\u7528\u6587\u732e\u3092\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u3067\u95a2\u9023\u4ed8\u3051\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<p>\u30c7\u30d5\u30a9\u30eb\u30c8\u3060\u3068\u3001\u672c\u6587\u4e2d\u306e\u53c2\u8003\u6587\u732e\u306f\u3001<sup>1<\/sup> \u3068\u3044\u3063\u305f\u4e0a\u4ed8\u304d\u6570\u5b57\u306b\u306a\u308a\u3001\u6587\u672b\u306e\u30ea\u30b9\u30c8\u756a\u53f7\u3068\u5bfe\u5fdc\u3057\u3066\u3044\u308b\u304c\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u304c\u306a\u3044\u72b6\u614b\u3067\u3042\u308b\u3002yaml \u30d8\u30c3\u30c0 \u306b &#8220;link-citations: true&#8221; \u3068\u3044\u3046\u30aa\u30d7\u30b7\u30e7\u30f3\u3092\u6307\u5b9a\u3057\u3066 knit \u3059\u308c\u3070\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u3067\u95a2\u9023\u4ed8\u3051\u3059\u308b\u3053\u3068\u304c\u3067\u304d\u308b\u3002<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-75\" data-shcb-language-name=\"JavaScript\" data-shcb-language-slug=\"javascript\"><span><code class=\"hljs language-javascript\">link-citations: <span class=\"hljs-literal\">true<\/span><\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-75\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">JavaScript<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">javascript<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">R Markdown \u3067\u3001\u6587\u4e2d\u3068\u6587\u672b\u306e\u5f15\u7528\u6587\u732e\u3092\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u3067\u95a2\u9023\u4ed8\u3051\u308b\u306b\u306f\u3001yaml \u30d8\u30c3\u30c0 \u306b &quot;link-citations: true&quot; \u3068\u3044\u3046\u30aa\u30d7\u30b7\u30e7\u30f3\u3092\u6307\u5b9a\u3059\u308c\u3070OK\uff08pandoc v1.16\u4ee5\u964d\uff09\u3002 \u53c2\u8003\uff1a<a href=\"https:\/\/t.co\/wR0lrr5q65\">https:\/\/t.co\/wR0lrr5q65<\/a> <a href=\"https:\/\/t.co\/GJMeboIsI7\">pic.twitter.com\/GJMeboIsI7<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1356344123637186560?ref_src=twsrc%5Etfw\">February 1, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n\n\n\n<h3 class=\"wp-block-heading\"><span class=\"ez-toc-section\" id=\"%E5%85%A5%E5%8A%9B%E9%80%94%E4%B8%AD%E3%81%AE%E6%97%A5%E6%9C%AC%E8%AA%9E%E3%82%82%E8%A6%8B%E3%81%88%E3%82%8B%E3%82%88%E3%81%86%E3%81%AB%E3%81%99%E3%82%8B\"><\/span>\u5165\u529b\u9014\u4e2d\u306e\u65e5\u672c\u8a9e\u3082\u898b\u3048\u308b\u3088\u3046\u306b\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n\n\n\n<figure class=\"wp-block-embed is-type-rich is-provider-twitter wp-block-embed-twitter\"><div class=\"wp-block-embed__wrapper\">\n<blockquote class=\"twitter-tweet\" data-width=\"500\" data-dnt=\"true\"><p lang=\"ja\" dir=\"ltr\">Rstudio \u30a8\u30c7\u30a3\u30bf\u306e\u65e5\u672c\u8a9e\u5165\u529b\u306b\u95a2\u3057\u3066\u3001\u5165\u529b\u9014\u4e2d\u306e\u6587\u5b57\u3092\u8868\u793a\u3059\u308b\u305f\u3081\u306b\u7de8\u96c6\u3057\u305f\u3044\u30a8\u30c7\u30a3\u30bf\u30922\u3064\u76ee\u4ee5\u964d\u306b\u958b\u304f\u3068\u3044\u3046\u89e3\u6c7a\u65b9\u6cd5\u304c\u3042\u308a\u307e\u3059\u304c\u3001\u30dd\u30c3\u30d7\u30a2\u30a6\u30c8\u3059\u308b\u3068\u8868\u793a\u3055\u308c\u306a\u304f\u306a\u3063\u3066\u3044\u307e\u3057\u305f\u3002\u3053\u308c\u306b\u3064\u3044\u3066\u30dd\u30c3\u30d7\u30a2\u30a6\u30c8\u5f8c\u3082\u8868\u793a\u3059\u308b\u65b9\u6cd5\u3092\u898b\u3064\u3051\u305f\u306e\u3067\u8a18\u4e8b\u306b\u3057\u307e\u3057\u305f\u3002 <a href=\"https:\/\/t.co\/Pafi9AOGHm\">https:\/\/t.co\/Pafi9AOGHm<\/a> <a href=\"https:\/\/t.co\/TArUDiK0Jq\">pic.twitter.com\/TArUDiK0Jq<\/a><\/p>&mdash; Shoei (@shoei05) <a href=\"https:\/\/twitter.com\/shoei05\/status\/1345579657266036736?ref_src=twsrc%5Etfw\">January 3, 2021<\/a><\/blockquote><script async src=\"https:\/\/platform.twitter.com\/widgets.js\" charset=\"utf-8\"><\/script>\n<\/div><\/figure>\n","protected":false},"excerpt":{"rendered":"<p>\u30c7\u30fc\u30bf\u30e9\u30f3\u30b0\u30ea\u30f3\u30b0\u3084\u53ef\u8996\u5316\u3001\u5206\u6790\u3092\u3059\u308b\u305f\u3081\u306bR\u3092\u64cd\u4f5c\u3057\u3066\u3044\u308b\u3068\u3001\u4ee5\u524d\u66f8\u3044\u305f\u30b3\u30fc\u30c9\u3092\u5fd8\u308c\u3066\u3001\u8abf\u3079\u308b\u305f\u3073\u306b\u540c\u3058\u9801\u306b\u884c\u304d\u7740\u304f\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u3002\u4e00\u5b9a\u56de\u6570\u4ee5\u4e0a\u300c\u3042\u308c\u3001\u3069\u3046\u3060\u3063\u305f\u3051\u306a\uff1f\u300d\u3068\u601d\u3063\u3066\u8abf\u3079\u305f\u5c0f\u6280\u306b\u3064\u3044\u3066\u3001\u968f\u6642\u63b2\u8f09\u3057\u3066\u3044\u304d\u307e\u3059 [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":709,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"site-sidebar-layout":"no-sidebar","site-content-layout":"","ast-site-content-layout":"default","site-content-style":"default","site-sidebar-style":"default","ast-global-header-display":"","ast-banner-title-visibility":"","ast-main-header-display":"","ast-hfb-above-header-display":"","ast-hfb-below-header-display":"","ast-hfb-mobile-header-display":"","site-post-title":"","ast-breadcrumbs-content":"","ast-featured-img":"disabled","footer-sml-layout":"","theme-transparent-header-meta":"","adv-header-id-meta":"","stick-header-meta":"","header-above-stick-meta":"","header-main-stick-meta":"","header-below-stick-meta":"","astra-migrate-meta-layouts":"set","ast-page-background-enabled":"default","ast-page-background-meta":{"desktop":{"background-color":"var(--ast-global-color-4)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"ast-content-background-meta":{"desktop":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"footnotes":""},"categories":[4],"tags":[],"class_list":["post-370","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-rstudio"],"yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v25.8 - https:\/\/yoast.com\/wordpress\/plugins\/seo\/ -->\n<title>\u3088\u304f\u4f7f\u3046R\u5c0f\u6280\u96c6(\u968f\u6642\u66f4\u65b0) - shoei05<\/title>\n<meta name=\"description\" content=\"\u30c7\u30fc\u30bf\u30e9\u30f3\u30b0\u30ea\u30f3\u30b0\u3084\u53ef\u8996\u5316\u3001\u5206\u6790\u3092\u3059\u308b\u305f\u3081\u306bR\u3092\u64cd\u4f5c\u3057\u3066\u3044\u308b\u3068\u3001\u4ee5\u524d\u66f8\u3044\u305f\u30b3\u30fc\u30c9\u3092\u5fd8\u308c\u3066\u3001\u8abf\u3079\u308b\u305f\u3073\u306b\u540c\u3058\u9801\u306b\u884c\u304d\u7740\u304f\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u3002\u4e00\u5b9a\u56de\u6570\u4ee5\u4e0a\u300c\u3042\u308c\u3001\u3069\u3046\u3060\u3063\u305f\u3051\u306a\uff1f\u300d\u3068\u601d\u3063\u3066\u8abf\u3079\u305f\u5c0f\u6280\u306b\u3064\u3044\u3066\u3001\u968f\u6642\u63b2\u8f09\u3057\u3066\u3044\u304d\u307e\u3059\u3002\" \/>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/\" \/>\n<meta property=\"og:locale\" content=\"ja_JP\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"\u3088\u304f\u4f7f\u3046R\u5c0f\u6280\u96c6(\u968f\u6642\u66f4\u65b0) - shoei05\" \/>\n<meta property=\"og:description\" content=\"\u30c7\u30fc\u30bf\u30e9\u30f3\u30b0\u30ea\u30f3\u30b0\u3084\u53ef\u8996\u5316\u3001\u5206\u6790\u3092\u3059\u308b\u305f\u3081\u306bR\u3092\u64cd\u4f5c\u3057\u3066\u3044\u308b\u3068\u3001\u4ee5\u524d\u66f8\u3044\u305f\u30b3\u30fc\u30c9\u3092\u5fd8\u308c\u3066\u3001\u8abf\u3079\u308b\u305f\u3073\u306b\u540c\u3058\u9801\u306b\u884c\u304d\u7740\u304f\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u3002\u4e00\u5b9a\u56de\u6570\u4ee5\u4e0a\u300c\u3042\u308c\u3001\u3069\u3046\u3060\u3063\u305f\u3051\u306a\uff1f\u300d\u3068\u601d\u3063\u3066\u8abf\u3079\u305f\u5c0f\u6280\u306b\u3064\u3044\u3066\u3001\u968f\u6642\u63b2\u8f09\u3057\u3066\u3044\u304d\u307e\u3059\u3002\" \/>\n<meta property=\"og:url\" content=\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/\" \/>\n<meta property=\"og:site_name\" content=\"shoei05\" \/>\n<meta property=\"article:published_time\" content=\"2021-01-01T03:12:42+00:00\" \/>\n<meta property=\"article:modified_time\" content=\"2024-05-23T22:04:46+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1.png\" \/>\n\t<meta property=\"og:image:width\" content=\"2002\" \/>\n\t<meta property=\"og:image:height\" content=\"1052\" \/>\n\t<meta property=\"og:image:type\" content=\"image\/png\" \/>\n<meta name=\"author\" content=\"shoei05\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:creator\" content=\"@shoei05\" \/>\n<meta name=\"twitter:site\" content=\"@shoei05\" \/>\n<meta name=\"twitter:label1\" content=\"\u57f7\u7b46\u8005\" \/>\n\t<meta name=\"twitter:data1\" content=\"shoei05\" \/>\n\t<meta name=\"twitter:label2\" content=\"\u63a8\u5b9a\u8aad\u307f\u53d6\u308a\u6642\u9593\" \/>\n\t<meta name=\"twitter:data2\" content=\"36\u5206\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#article\",\"isPartOf\":{\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/\"},\"author\":{\"name\":\"shoei05\",\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/#\/schema\/person\/e4330f139f7be011f6d8e9c1221d539b\"},\"headline\":\"\u3088\u304f\u4f7f\u3046R\u5c0f\u6280\u96c6(\u968f\u6642\u66f4\u65b0)\",\"datePublished\":\"2021-01-01T03:12:42+00:00\",\"dateModified\":\"2024-05-23T22:04:46+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/\"},\"wordCount\":483,\"commentCount\":1,\"publisher\":{\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/#\/schema\/person\/e4330f139f7be011f6d8e9c1221d539b\"},\"image\":{\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#primaryimage\"},\"thumbnailUrl\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1.png\",\"articleSection\":[\"Rstudio\"],\"inLanguage\":\"ja\",\"potentialAction\":[{\"@type\":\"CommentAction\",\"name\":\"Comment\",\"target\":[\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#respond\"]}]},{\"@type\":\"WebPage\",\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/\",\"url\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/\",\"name\":\"\u3088\u304f\u4f7f\u3046R\u5c0f\u6280\u96c6(\u968f\u6642\u66f4\u65b0) - shoei05\",\"isPartOf\":{\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#primaryimage\"},\"image\":{\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#primaryimage\"},\"thumbnailUrl\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1.png\",\"datePublished\":\"2021-01-01T03:12:42+00:00\",\"dateModified\":\"2024-05-23T22:04:46+00:00\",\"description\":\"\u30c7\u30fc\u30bf\u30e9\u30f3\u30b0\u30ea\u30f3\u30b0\u3084\u53ef\u8996\u5316\u3001\u5206\u6790\u3092\u3059\u308b\u305f\u3081\u306bR\u3092\u64cd\u4f5c\u3057\u3066\u3044\u308b\u3068\u3001\u4ee5\u524d\u66f8\u3044\u305f\u30b3\u30fc\u30c9\u3092\u5fd8\u308c\u3066\u3001\u8abf\u3079\u308b\u305f\u3073\u306b\u540c\u3058\u9801\u306b\u884c\u304d\u7740\u304f\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u3002\u4e00\u5b9a\u56de\u6570\u4ee5\u4e0a\u300c\u3042\u308c\u3001\u3069\u3046\u3060\u3063\u305f\u3051\u306a\uff1f\u300d\u3068\u601d\u3063\u3066\u8abf\u3079\u305f\u5c0f\u6280\u306b\u3064\u3044\u3066\u3001\u968f\u6642\u63b2\u8f09\u3057\u3066\u3044\u304d\u307e\u3059\u3002\",\"breadcrumb\":{\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#breadcrumb\"},\"inLanguage\":\"ja\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/\"]}]},{\"@type\":\"ImageObject\",\"inLanguage\":\"ja\",\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#primaryimage\",\"url\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1.png\",\"contentUrl\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1.png\",\"width\":2002,\"height\":1052},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"\u30db\u30fc\u30e0\",\"item\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"\u3088\u304f\u4f7f\u3046R\u5c0f\u6280\u96c6(\u968f\u6642\u66f4\u65b0)\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/#website\",\"url\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/\",\"name\":\"shoei05\",\"description\":\"Next Process is Our Customer\",\"publisher\":{\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/#\/schema\/person\/e4330f139f7be011f6d8e9c1221d539b\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"ja\"},{\"@type\":[\"Person\",\"Organization\"],\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/#\/schema\/person\/e4330f139f7be011f6d8e9c1221d539b\",\"name\":\"shoei05\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"ja\",\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/#\/schema\/person\/image\/\",\"url\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/logo-1024x538.png\",\"contentUrl\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/logo-1024x538.png\",\"width\":1024,\"height\":538,\"caption\":\"shoei05\"},\"logo\":{\"@id\":\"https:\/\/plaza.umin.ac.jp\/shoei05\/#\/schema\/person\/image\/\"},\"description\":\"\u7cbe\u795e\u79d1\u30fb\u7de9\u548c\u30b1\u30a2\u30fb\u516c\u8846\u885b\u751f\u3092\u4e3b\u306a\u30c6\u30fc\u30de\u3068\u3057\u305f\u5b66\u8853\u7684\u5185\u5bb9\u3084\u3001R\u3092\u4f7f\u3063\u305f\u30c7\u30fc\u30bf\u30b5\u30a4\u30a8\u30f3\u30b9\u3092\u4e2d\u5fc3\u306b\u3001\u3053\u308c\u307e\u3067\u306e\u899a\u66f8\u30fb\u500b\u4eba\u30e1\u30e2\u306b\u6b8b\u3057\u3066\u3044\u305f\u5185\u5bb9\u3092\u3001\u5c11\u3057\u305a\u3064\u8a18\u4e8b\u306b\u3057\u3066\u3044\u304d\u307e\u3059\u3002\",\"sameAs\":[\"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\",\"https:\/\/x.com\/shoei05\"]}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"\u3088\u304f\u4f7f\u3046R\u5c0f\u6280\u96c6(\u968f\u6642\u66f4\u65b0) - shoei05","description":"\u30c7\u30fc\u30bf\u30e9\u30f3\u30b0\u30ea\u30f3\u30b0\u3084\u53ef\u8996\u5316\u3001\u5206\u6790\u3092\u3059\u308b\u305f\u3081\u306bR\u3092\u64cd\u4f5c\u3057\u3066\u3044\u308b\u3068\u3001\u4ee5\u524d\u66f8\u3044\u305f\u30b3\u30fc\u30c9\u3092\u5fd8\u308c\u3066\u3001\u8abf\u3079\u308b\u305f\u3073\u306b\u540c\u3058\u9801\u306b\u884c\u304d\u7740\u304f\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u3002\u4e00\u5b9a\u56de\u6570\u4ee5\u4e0a\u300c\u3042\u308c\u3001\u3069\u3046\u3060\u3063\u305f\u3051\u306a\uff1f\u300d\u3068\u601d\u3063\u3066\u8abf\u3079\u305f\u5c0f\u6280\u306b\u3064\u3044\u3066\u3001\u968f\u6642\u63b2\u8f09\u3057\u3066\u3044\u304d\u307e\u3059\u3002","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/","og_locale":"ja_JP","og_type":"article","og_title":"\u3088\u304f\u4f7f\u3046R\u5c0f\u6280\u96c6(\u968f\u6642\u66f4\u65b0) - shoei05","og_description":"\u30c7\u30fc\u30bf\u30e9\u30f3\u30b0\u30ea\u30f3\u30b0\u3084\u53ef\u8996\u5316\u3001\u5206\u6790\u3092\u3059\u308b\u305f\u3081\u306bR\u3092\u64cd\u4f5c\u3057\u3066\u3044\u308b\u3068\u3001\u4ee5\u524d\u66f8\u3044\u305f\u30b3\u30fc\u30c9\u3092\u5fd8\u308c\u3066\u3001\u8abf\u3079\u308b\u305f\u3073\u306b\u540c\u3058\u9801\u306b\u884c\u304d\u7740\u304f\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u3002\u4e00\u5b9a\u56de\u6570\u4ee5\u4e0a\u300c\u3042\u308c\u3001\u3069\u3046\u3060\u3063\u305f\u3051\u306a\uff1f\u300d\u3068\u601d\u3063\u3066\u8abf\u3079\u305f\u5c0f\u6280\u306b\u3064\u3044\u3066\u3001\u968f\u6642\u63b2\u8f09\u3057\u3066\u3044\u304d\u307e\u3059\u3002","og_url":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/","og_site_name":"shoei05","article_published_time":"2021-01-01T03:12:42+00:00","article_modified_time":"2024-05-23T22:04:46+00:00","og_image":[{"width":2002,"height":1052,"url":"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1.png","type":"image\/png"}],"author":"shoei05","twitter_card":"summary_large_image","twitter_creator":"@shoei05","twitter_site":"@shoei05","twitter_misc":{"\u57f7\u7b46\u8005":"shoei05","\u63a8\u5b9a\u8aad\u307f\u53d6\u308a\u6642\u9593":"36\u5206"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#article","isPartOf":{"@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/"},"author":{"name":"shoei05","@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/#\/schema\/person\/e4330f139f7be011f6d8e9c1221d539b"},"headline":"\u3088\u304f\u4f7f\u3046R\u5c0f\u6280\u96c6(\u968f\u6642\u66f4\u65b0)","datePublished":"2021-01-01T03:12:42+00:00","dateModified":"2024-05-23T22:04:46+00:00","mainEntityOfPage":{"@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/"},"wordCount":483,"commentCount":1,"publisher":{"@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/#\/schema\/person\/e4330f139f7be011f6d8e9c1221d539b"},"image":{"@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#primaryimage"},"thumbnailUrl":"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1.png","articleSection":["Rstudio"],"inLanguage":"ja","potentialAction":[{"@type":"CommentAction","name":"Comment","target":["https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#respond"]}]},{"@type":"WebPage","@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/","url":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/","name":"\u3088\u304f\u4f7f\u3046R\u5c0f\u6280\u96c6(\u968f\u6642\u66f4\u65b0) - shoei05","isPartOf":{"@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/#website"},"primaryImageOfPage":{"@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#primaryimage"},"image":{"@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#primaryimage"},"thumbnailUrl":"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1.png","datePublished":"2021-01-01T03:12:42+00:00","dateModified":"2024-05-23T22:04:46+00:00","description":"\u30c7\u30fc\u30bf\u30e9\u30f3\u30b0\u30ea\u30f3\u30b0\u3084\u53ef\u8996\u5316\u3001\u5206\u6790\u3092\u3059\u308b\u305f\u3081\u306bR\u3092\u64cd\u4f5c\u3057\u3066\u3044\u308b\u3068\u3001\u4ee5\u524d\u66f8\u3044\u305f\u30b3\u30fc\u30c9\u3092\u5fd8\u308c\u3066\u3001\u8abf\u3079\u308b\u305f\u3073\u306b\u540c\u3058\u9801\u306b\u884c\u304d\u7740\u304f\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u3002\u4e00\u5b9a\u56de\u6570\u4ee5\u4e0a\u300c\u3042\u308c\u3001\u3069\u3046\u3060\u3063\u305f\u3051\u306a\uff1f\u300d\u3068\u601d\u3063\u3066\u8abf\u3079\u305f\u5c0f\u6280\u306b\u3064\u3044\u3066\u3001\u968f\u6642\u63b2\u8f09\u3057\u3066\u3044\u304d\u307e\u3059\u3002","breadcrumb":{"@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#breadcrumb"},"inLanguage":"ja","potentialAction":[{"@type":"ReadAction","target":["https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/"]}]},{"@type":"ImageObject","inLanguage":"ja","@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#primaryimage","url":"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1.png","contentUrl":"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/twitter\u30a2\u30a4\u30ad\u30e3\u30c3\u30c1.png","width":2002,"height":1052},{"@type":"BreadcrumbList","@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/2021\/01\/01\/370\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"\u30db\u30fc\u30e0","item":"https:\/\/plaza.umin.ac.jp\/shoei05\/"},{"@type":"ListItem","position":2,"name":"\u3088\u304f\u4f7f\u3046R\u5c0f\u6280\u96c6(\u968f\u6642\u66f4\u65b0)"}]},{"@type":"WebSite","@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/#website","url":"https:\/\/plaza.umin.ac.jp\/shoei05\/","name":"shoei05","description":"Next Process is Our Customer","publisher":{"@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/#\/schema\/person\/e4330f139f7be011f6d8e9c1221d539b"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/plaza.umin.ac.jp\/shoei05\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"ja"},{"@type":["Person","Organization"],"@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/#\/schema\/person\/e4330f139f7be011f6d8e9c1221d539b","name":"shoei05","image":{"@type":"ImageObject","inLanguage":"ja","@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/#\/schema\/person\/image\/","url":"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/logo-1024x538.png","contentUrl":"https:\/\/plaza.umin.ac.jp\/shoei05\/wp\/wp-content\/uploads\/2021\/01\/logo-1024x538.png","width":1024,"height":538,"caption":"shoei05"},"logo":{"@id":"https:\/\/plaza.umin.ac.jp\/shoei05\/#\/schema\/person\/image\/"},"description":"\u7cbe\u795e\u79d1\u30fb\u7de9\u548c\u30b1\u30a2\u30fb\u516c\u8846\u885b\u751f\u3092\u4e3b\u306a\u30c6\u30fc\u30de\u3068\u3057\u305f\u5b66\u8853\u7684\u5185\u5bb9\u3084\u3001R\u3092\u4f7f\u3063\u305f\u30c7\u30fc\u30bf\u30b5\u30a4\u30a8\u30f3\u30b9\u3092\u4e2d\u5fc3\u306b\u3001\u3053\u308c\u307e\u3067\u306e\u899a\u66f8\u30fb\u500b\u4eba\u30e1\u30e2\u306b\u6b8b\u3057\u3066\u3044\u305f\u5185\u5bb9\u3092\u3001\u5c11\u3057\u305a\u3064\u8a18\u4e8b\u306b\u3057\u3066\u3044\u304d\u307e\u3059\u3002","sameAs":["https:\/\/plaza.umin.ac.jp\/shoei05\/wp","https:\/\/x.com\/shoei05"]}]}},"_links":{"self":[{"href":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/wp-json\/wp\/v2\/posts\/370","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/wp-json\/wp\/v2\/comments?post=370"}],"version-history":[{"count":4,"href":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/wp-json\/wp\/v2\/posts\/370\/revisions"}],"predecessor-version":[{"id":2501,"href":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/wp-json\/wp\/v2\/posts\/370\/revisions\/2501"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/wp-json\/wp\/v2\/media\/709"}],"wp:attachment":[{"href":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/wp-json\/wp\/v2\/media?parent=370"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/wp-json\/wp\/v2\/categories?post=370"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/plaza.umin.ac.jp\/shoei05\/index.php\/wp-json\/wp\/v2\/tags?post=370"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}