{"id":980,"date":"2017-07-21T12:26:55","date_gmt":"2017-07-21T03:26:55","guid":{"rendered":"http:\/\/pandora.med.gunma-u.ac.jp\/protocols\/?p=977"},"modified":"2017-07-21T12:26:55","modified_gmt":"2017-07-21T03:26:55","slug":"macos%e7%89%88rstudio%e3%81%a7%e3%83%97%e3%83%ad%e3%83%83%e3%83%88%e3%81%ae%e6%97%a5%e6%9c%ac%e8%aa%9e%e3%81%8c%e6%96%87%e5%ad%97%e5%8c%96%e3%81%91%e3%81%99%e3%82%8b%e3%81%ae%e3%82%92%e7%9b%b4","status":"publish","type":"post","link":"https:\/\/anatomy.med.gunma-u.ac.jp\/protocols\/?p=980","title":{"rendered":"macOS\u7248RStudio\u3067\u30d7\u30ed\u30c3\u30c8\u306e\u65e5\u672c\u8a9e\u304c\u6587\u5b57\u5316\u3051\u3059\u308b\u306e\u3092\u76f4\u3059"},"content":{"rendered":"<p>2019-5-20 PDF\u66f8\u304d\u51fa\u3057\u3067\u30d5\u30a9\u30f3\u30c8\u304c\u5316\u3051\u308b\u539f\u56e0\u306b\u306a\u308b\u3053\u3068\u304c\u5206\u304b\u3063\u305f\u3002PNG\u306f\u5f71\u97ff\u3055\u308c\u306a\u3044\u3002<\/p>\n<p><del>macOS\u7248RStudio\u3067\u30d7\u30ed\u30c3\u30c8\u3092\u3064\u304f\u308b\u3068\u3001\u65e5\u672c\u8a9e\u304c\u6587\u5b57\u5316\u3051\u3059\u308b\uff08\u30d0\u30fc\u30b8\u30e7\u30f31.0.143\uff09\u3002\u3053\u308c\u3092\u76f4\u3059\u306b\u306f\u3001\u30c6\u30ad\u30b9\u30c8\u30a8\u30c7\u30a3\u30bf\u3067\u300c.Rprofile\u300d\u3068\u3044\u3046\u4e0d\u53ef\u8996\u30d5\u30a1\u30a4\u30eb\u3092\u30db\u30fc\u30e0\u30c7\u30a3\u30ec\u30af\u30c8\u30ea\uff08\u30e6\u30fc\u30b6\u306e\u30db\u30fc\u30e0\u306e\u76f4\u4e0b\uff09\u306b\u3064\u304f\u308a\u3001\u4ee5\u4e0b\u306e\u5185\u5bb9\u3092\u3044\u308c\u308b\u3002\uff08\u3082\u3057\u3059\u3067\u306b.Rprofile\u304c\u5b58\u5728\u3057\u3066\u3044\u305f\u3089\u8ffd\u8a18\u3059\u308b\uff09<\/del><\/p>\n<pre class=\"code lang-r\" data-lang=\"r\" data-unlink=\"\"><del>setHook<span class=\"synSpecial\">(<\/span>packageEvent<span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"grDevices\"<\/span><span class=\"synSpecial\">,<\/span> <span class=\"synConstant\">\"onLoad\"<\/span><span class=\"synSpecial\">),<\/span>\n        <span class=\"synType\">function<\/span><span class=\"synSpecial\">(<\/span>...<span class=\"synSpecial\">){<\/span>\n          <span class=\"synStatement\">if<\/span><span class=\"synSpecial\">(<\/span>.Platform<span class=\"synSpecial\">$<\/span>OS.type <span class=\"synStatement\">==<\/span> <span class=\"synConstant\">\"windows\"<\/span><span class=\"synSpecial\">)<\/span>\n            grDevices<span class=\"synSpecial\">::<\/span>windowsFonts<span class=\"synSpecial\">(<\/span>sans <span class=\"synStatement\">=<\/span><span class=\"synConstant\">\"MS Gothic\"<\/span><span class=\"synSpecial\">,<\/span>\n                                    serif<span class=\"synStatement\">=<\/span><span class=\"synConstant\">\"MS Mincho\"<\/span><span class=\"synSpecial\">,<\/span>\n                                    mono <span class=\"synStatement\">=<\/span><span class=\"synConstant\">\"FixedFont\"<\/span><span class=\"synSpecial\">)<\/span>\n          <span class=\"synStatement\">if<\/span><span class=\"synSpecial\">(<\/span>capabilities<span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"aqua\"<\/span><span class=\"synSpecial\">))<\/span>\n            grDevices<span class=\"synSpecial\">::<\/span>quartzFonts<span class=\"synSpecial\">(<\/span>\n                sans <span class=\"synStatement\">=<\/span>grDevices<span class=\"synSpecial\">::<\/span>quartzFont<span class=\"synSpecial\">(<\/span>\n                    c<span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"Hiragino Kaku Gothic Pro W3\"<\/span><span class=\"synSpecial\">,<\/span>\n                      <span class=\"synConstant\">\"Hiragino Kaku Gothic Pro W6\"<\/span><span class=\"synSpecial\">,<\/span>\n                      <span class=\"synConstant\">\"Hiragino Kaku Gothic Pro W3\"<\/span><span class=\"synSpecial\">,<\/span>\n                      <span class=\"synConstant\">\"Hiragino Kaku Gothic Pro W6\"<\/span><span class=\"synSpecial\">)),<\/span>\n                serif<span class=\"synStatement\">=<\/span>grDevices<span class=\"synSpecial\">::<\/span>quartzFont<span class=\"synSpecial\">(<\/span>\n                    c<span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"Hiragino Mincho Pro W3\"<\/span><span class=\"synSpecial\">,<\/span>\n                      <span class=\"synConstant\">\"Hiragino Mincho Pro W6\"<\/span><span class=\"synSpecial\">,<\/span>\n                      <span class=\"synConstant\">\"Hiragino Mincho Pro W3\"<\/span><span class=\"synSpecial\">,<\/span>\n                      <span class=\"synConstant\">\"Hiragino Mincho Pro W6\"<\/span><span class=\"synSpecial\">)))<\/span>\n          <span class=\"synStatement\">if<\/span><span class=\"synSpecial\">(<\/span>capabilities<span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"X11\"<\/span><span class=\"synSpecial\">))<\/span>\n            grDevices<span class=\"synSpecial\">::<\/span>X11.options<span class=\"synSpecial\">(<\/span>\n                fonts<span class=\"synStatement\">=<\/span>c<span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"-kochi-gothic-%s-%s-*-*-%d-*-*-*-*-*-*-*\"<\/span><span class=\"synSpecial\">,<\/span>\n                    <span class=\"synConstant\">\"-adobe-symbol-medium-r-*-*-%d-*-*-*-*-*-*-*\"<\/span><span class=\"synSpecial\">))<\/span>\n          grDevices<span class=\"synSpecial\">::<\/span>pdf.options<span class=\"synSpecial\">(<\/span>family<span class=\"synStatement\">=<\/span><span class=\"synConstant\">\"Japan1GothicBBB\"<\/span><span class=\"synSpecial\">)<\/span>\n          grDevices<span class=\"synSpecial\">::<\/span>ps.options<span class=\"synSpecial\">(<\/span>family<span class=\"synStatement\">=<\/span><span class=\"synConstant\">\"Japan1GothicBBB\"<\/span><span class=\"synSpecial\">)<\/span>\n        <span class=\"synSpecial\">}<\/span>\n        <span class=\"synSpecial\">)<\/span>\n<span class=\"synPreProc\">attach<\/span><span class=\"synSpecial\">(<\/span><span class=\"synConstant\">NULL<\/span><span class=\"synSpecial\">,<\/span> name <span class=\"synStatement\">=<\/span> <span class=\"synConstant\">\"JapanEnv\"<\/span><span class=\"synSpecial\">)<\/span>\nassign<span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"familyset_hook\"<\/span><span class=\"synSpecial\">,<\/span>\n       <span class=\"synType\">function<\/span><span class=\"synSpecial\">()<\/span> <span class=\"synSpecial\">{<\/span>\n         winfontdevs<span class=\"synStatement\">=<\/span>c<span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"windows\"<\/span><span class=\"synSpecial\">,<\/span><span class=\"synConstant\">\"win.metafile\"<\/span><span class=\"synSpecial\">,<\/span>\n             <span class=\"synConstant\">\"png\"<\/span><span class=\"synSpecial\">,<\/span><span class=\"synConstant\">\"bmp\"<\/span><span class=\"synSpecial\">,<\/span><span class=\"synConstant\">\"jpeg\"<\/span><span class=\"synSpecial\">,<\/span><span class=\"synConstant\">\"tiff\"<\/span><span class=\"synSpecial\">,<\/span><span class=\"synConstant\">\"RStudioGD\"<\/span><span class=\"synSpecial\">)<\/span>\n         macfontdevs<span class=\"synStatement\">=<\/span>c<span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"quartz\"<\/span><span class=\"synSpecial\">,<\/span><span class=\"synConstant\">\"quartz_off_screen\"<\/span><span class=\"synSpecial\">,<\/span><span class=\"synConstant\">\"RStudioGD\"<\/span><span class=\"synSpecial\">)<\/span>\n         devname<span class=\"synStatement\">=<\/span>strsplit<span class=\"synSpecial\">(<\/span>names<span class=\"synSpecial\">(<\/span>dev.cur<span class=\"synSpecial\">()),<\/span><span class=\"synConstant\">\":\"<\/span><span class=\"synSpecial\">)[[<\/span><span class=\"synConstant\">1L<\/span><span class=\"synSpecial\">]][<\/span><span class=\"synConstant\">1<\/span><span class=\"synSpecial\">]<\/span>\n         <span class=\"synStatement\">if<\/span> <span class=\"synSpecial\">((<\/span>.Platform<span class=\"synSpecial\">$<\/span>OS.type <span class=\"synStatement\">==<\/span> <span class=\"synConstant\">\"windows\"<\/span><span class=\"synSpecial\">)<\/span> <span class=\"synStatement\">&amp;&amp;<\/span>\n                 <span class=\"synSpecial\">(<\/span>devname <span class=\"synStatement\">%in%<\/span> winfontdevs<span class=\"synSpecial\">))<\/span>\n           par<span class=\"synSpecial\">(<\/span>family<span class=\"synStatement\">=<\/span><span class=\"synConstant\">\"sans\"<\/span><span class=\"synSpecial\">)<\/span>\n         <span class=\"synStatement\">if<\/span> <span class=\"synSpecial\">(<\/span>capabilities<span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"aqua\"<\/span><span class=\"synSpecial\">)<\/span> <span class=\"synStatement\">&amp;&amp;<\/span>\n                 devname <span class=\"synStatement\">%in%<\/span> macfontdevs<span class=\"synSpecial\">)<\/span>\n           par<span class=\"synSpecial\">(<\/span>family<span class=\"synStatement\">=<\/span><span class=\"synConstant\">\"sans\"<\/span><span class=\"synSpecial\">)<\/span>\n       <span class=\"synSpecial\">},<\/span>\n       pos<span class=\"synStatement\">=<\/span><span class=\"synConstant\">\"JapanEnv\"<\/span><span class=\"synSpecial\">)<\/span>\nsetHook<span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"plot.new\"<\/span><span class=\"synSpecial\">,<\/span> get<span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"familyset_hook\"<\/span><span class=\"synSpecial\">,<\/span> pos<span class=\"synStatement\">=<\/span><span class=\"synConstant\">\"JapanEnv\"<\/span><span class=\"synSpecial\">))<\/span>\nsetHook<span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"persp\"<\/span><span class=\"synSpecial\">,<\/span> get<span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"familyset_hook\"<\/span><span class=\"synSpecial\">,<\/span> pos<span class=\"synStatement\">=<\/span><span class=\"synConstant\">\"JapanEnv\"<\/span><span class=\"synSpecial\">))<\/span><\/del><\/pre>\n<p>\u53c2\u8003\uff1a<a href=\"http:\/\/cortyuming.hateblo.jp\/entry\/20140619\/p3\" target=\"_blank\" rel=\"noopener noreferrer\">RStudio for MacOSX \u3067\u30d7\u30ed\u30c3\u30c8\u304c\u6587\u5b57\u5316\u3051\u3059\u308b\u5834\u5408\u306e\u30e1\u30e2<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"<p>2019-5-20 PDF\u66f8\u304d\u51fa\u3057\u3067\u30d5\u30a9\u30f3\u30c8\u304c\u5316\u3051\u308b\u539f\u56e0\u306b\u306a\u308b\u3053\u3068\u304c\u5206\u304b\u3063\u305f\u3002PNG\u306f\u5f71\u97ff\u3055\u308c\u306a\u3044\u3002 macOS\u7248RStudio\u3067\u30d7\u30ed\u30c3\u30c8\u3092\u3064\u304f\u308b\u3068\u3001\u65e5\u672c\u8a9e\u304c\u6587\u5b57\u5316\u3051\u3059\u308b\uff08\u30d0\u30fc\u30b8\u30e7\u30f31.0.143\uff09\u3002\u3053\u308c\u3092\u76f4\u3059\u306b\u306f\u3001\u30c6\u30ad<\/p>\n","protected":false},"author":3,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"inline_featured_image":false,"_jetpack_newsletter_access":"","_jetpack_dont_email_post_to_subs":false,"_jetpack_newsletter_tier_id":0,"_jetpack_memberships_contains_paywalled_content":false,"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":true,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2},"jetpack_post_was_ever_published":false},"categories":[7],"tags":[],"class_list":["post-980","post","type-post","status-publish","format-standard","hentry","category-computer-internet"],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"jetpack_shortlink":"https:\/\/wp.me\/p4fFyn-fO","jetpack-related-posts":[],"_links":{"self":[{"href":"https:\/\/anatomy.med.gunma-u.ac.jp\/protocols\/index.php?rest_route=\/wp\/v2\/posts\/980","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/anatomy.med.gunma-u.ac.jp\/protocols\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/anatomy.med.gunma-u.ac.jp\/protocols\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/anatomy.med.gunma-u.ac.jp\/protocols\/index.php?rest_route=\/wp\/v2\/users\/3"}],"replies":[{"embeddable":true,"href":"https:\/\/anatomy.med.gunma-u.ac.jp\/protocols\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=980"}],"version-history":[{"count":0,"href":"https:\/\/anatomy.med.gunma-u.ac.jp\/protocols\/index.php?rest_route=\/wp\/v2\/posts\/980\/revisions"}],"wp:attachment":[{"href":"https:\/\/anatomy.med.gunma-u.ac.jp\/protocols\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=980"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/anatomy.med.gunma-u.ac.jp\/protocols\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=980"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/anatomy.med.gunma-u.ac.jp\/protocols\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=980"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}