{"id":3350,"date":"2024-03-03T11:17:17","date_gmt":"2024-03-03T02:17:17","guid":{"rendered":"https:\/\/plaza.umin.ac.jp\/~OIO\/?p=3350"},"modified":"2024-03-07T10:46:23","modified_gmt":"2024-03-07T01:46:23","slug":"r%e3%81%aedata-frame%e3%81%ab%e3%80%81%e6%9d%a1%e4%bb%b6%e3%81%ab%e3%82%88%e3%81%a3%e3%81%a6%e7%95%b0%e3%81%aa%e3%82%8b%e5%80%a4%e3%82%92%e3%81%a8%e3%82%8b%e3%82%ab%e3%83%a9%e3%83%a0%e3%81%ae%e8%bf%bd","status":"publish","type":"post","link":"https:\/\/plaza.umin.ac.jp\/~OIO\/?p=3350","title":{"rendered":"R\u306edata frame\u306b\u3001\u6761\u4ef6\u306b\u3088\u3063\u3066\u7570\u306a\u308b\u5024\u3092\u3068\u308b\u30ab\u30e9\u30e0\u306e\u8ffd\u52a0"},"content":{"rendered":"<p>\u4e0b\u56f3\u306e\u3088\u3046\u306adata frame (df.LineList)\u304c\u3042\u308a\u307e\u3059\u3002\u3010ir_AE\u3011\u3068\u3044\u3046\u30ab\u30e9\u30e0\u306f\u3001 -1 \u306e\u5834\u5408irAE\u30010\u306e\u5834\u5408\u975eirAE\u3068\u3044\u3046\u60c5\u5831\u3067\u3059\u3002<\/p>\n<p><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-1.png\" alt=\"\" width=\"1086\" height=\"420\" class=\"aligncenter size-full wp-image-3351\" srcset=\"https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-1.png 1086w, https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-1-300x116.png 300w, https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-1-700x271.png 700w, https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-1-150x58.png 150w, https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-1-768x297.png 768w, https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-1-500x193.png 500w, https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-1-800x309.png 800w\" sizes=\"auto, (max-width: 1086px) 100vw, 1086px\" \/><\/p>\n<p>\u3053\u306eir_AE\u30ab\u30e9\u30e0\u3092\u898b\u306a\u304c\u3089irAE\u304b\u3069\u3046\u304b\u306e\u60c5\u5831\u3092&#8221;IRAE&#8221;\u304b&#8221;nonIRAE&#8221;\u304b\u3068\u3044\u3046\u6587\u5b57\u5217\u3092\u6301\u3064\u30ab\u30e9\u30e0\u3010<span style=\"color: #ff0000;\">IFirAE<\/span>\u3011\u3078\u66f8\u304d\u8fbc\u307f\u305f\u3044\u3068\u3044\u3046\u5834\u5408\u306e\u30b9\u30af\u30ea\u30d7\u30c8\u3002dplyr\u30d1\u30c3\u30b1\u30fc\u30b8\u306emutate if_else \u3092\u4f7f\u3044\u307e\u3059\u3002<\/p>\n<pre class=\"EnlighterJSRAW\" data-enlighter-language=\"generic\">library(dplyr)\r\ndf.LineList &lt;- <span style=\"color: #0000ff;\">mutate<\/span>(df.LineList, <span style=\"color: #ff0000;\">IFirAE<\/span> = <span style=\"color: #0000ff;\">if_else<\/span>(ir_AE == -1, <span style=\"color: #0000ff;\">true<\/span> = \"IRAE\", <span style=\"color: #0000ff;\">false<\/span> = \"nonIRAE\"))<\/pre>\n<p>\u5b9f\u884c\u3059\u308b\u3068\u6b21\u306e\u3088\u3046\u306b\u306a\u308a\u307e\u3059\u3002\uff08\u53f3\u7aef\u306eIFirAE\u5217\u304c\u8ffd\u52a0\u3055\u308c\u3066\u3044\u308b\uff09<\/p>\n<p><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-2.png\" alt=\"\" width=\"1112\" height=\"431\" class=\"aligncenter size-full wp-image-3354\" srcset=\"https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-2.png 1112w, https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-2-300x116.png 300w, https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-2-700x271.png 700w, https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-2-150x58.png 150w, https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-2-768x298.png 768w, https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-2-500x194.png 500w, https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/66c19942ab4ba346fdb64ccc04cde373-2-800x310.png 800w\" sizes=\"auto, (max-width: 1112px) 100vw, 1112px\" \/><\/p>\n<p>&nbsp;<\/p>\n<p>\u4e00\u822c\u5316\u3057\u305f\u3089\u6b21\u306e\u3088\u3046\u306b\u306a\u308a\u307e\u3059\u3002\uff08<a href=\"https:\/\/cran.r-project.org\/web\/packages\/dplyr\/dplyr.pdf\">\u30de\u30cb\u30e5\u30a2\u30eb<\/a>\uff09<\/p>\n<pre class=\"EnlighterJSRAW\" data-enlighter-language=\"generic\">if_else(condition, true, false, missing = NULL, ..., ptype = NULL, size = NULL)\r\n<\/pre>\n<h4>condition<\/h4>\n<p>\u8ad6\u7406\u30d9\u30af\u30c8\u30eb<\/p>\n<h4>true, false<\/h4>\n<p>\u6761\u4ef6\u306e TRUE \u304a\u3088\u3073 FALSE \u5024\u306b\u4f7f\u7528\u3059\u308b\u30d9\u30af\u30c8\u30eb\u3002 true \u3068 false \u306e\u4e21\u65b9\u304c\u6761\u4ef6\u306e\u30b5\u30a4\u30ba\u306b\u30ea\u30b5\u30a4\u30af\u30eb\u3055\u308c\u307e\u3059\u3002 true\u3001false\u3001\u304a\u3088\u3073 missing (\u4f7f\u7528\u3055\u308c\u3066\u3044\u308b\u5834\u5408) \u306f\u3001\u5171\u901a\u306e\u578b\u306b\u30ad\u30e3\u30b9\u30c8\u3055\u308c\u307e\u3059\u3002<\/p>\n<h4>missing<\/h4>\n<p>NULL \u3067\u306a\u3044\u5834\u5408\u306f\u3001\u6761\u4ef6\u306e NA \u5024\u306e\u5024\u3068\u3057\u3066\u4f7f\u7528\u3055\u308c\u307e\u3059\u3002 true \u3068 false \u3068\u540c\u3058\u30b5\u30a4\u30ba\u3068\u578b\u306e\u898f\u5247\u306b\u5f93\u3044\u307e\u3059\u3002<\/p>\n<h4>&#8230;<\/h4>\n<p>\u3053\u308c\u3089\u306e\u30c9\u30c3\u30c8\u306f\u5c06\u6765\u306e\u62e1\u5f35\u7528\u3067\u3042\u308a\u3001\u7a7a\u306b\u3059\u308b\u5fc5\u8981\u304c\u3042\u308a\u307e\u3059\u3002<\/p>\n<h4>ptype<\/h4>\n<p>\u5fc5\u8981\u306a\u51fa\u529b\u30bf\u30a4\u30d7\u3092\u5ba3\u8a00\u3059\u308b\u30aa\u30d7\u30b7\u30e7\u30f3\u306e\u30d7\u30ed\u30c8\u30bf\u30a4\u30d7\u3002 \u6307\u5b9a\u3057\u305f\u5834\u5408\u3001\u3053\u308c\u306f true\u3001false\u3001\u304a\u3088\u3073 missing \u306e\u5171\u901a\u30bf\u30a4\u30d7\u3092\u30aa\u30fc\u30d0\u30fc\u30e9\u30a4\u30c9\u3057\u307e\u3059\u3002<\/p>\n<h4>size<\/h4>\n<p>\u5e0c\u671b\u306e\u51fa\u529b\u30b5\u30a4\u30ba\u3092\u5ba3\u8a00\u3059\u308b\u30aa\u30d7\u30b7\u30e7\u30f3\u306e\u30b5\u30a4\u30ba\u3002 \u6307\u5b9a\u3057\u305f\u5834\u5408\u3001\u3053\u308c\u306f\u6761\u4ef6\u306e\u30b5\u30a4\u30ba\u3092\u30aa\u30fc\u30d0\u30fc\u30e9\u30a4\u30c9\u3057\u307e\u3059\u3002<\/p>\n<h4>Value<\/h4>\n<p>\u6761\u4ef6\u3068\u540c\u3058\u30b5\u30a4\u30ba\u3001\u304a\u3088\u3073 true\u3001false\u3001\u304a\u3088\u3073 missing \u306e\u5171\u901a\u578b\u3068\u540c\u3058\u578b\u3092\u6301\u3064\u30d9\u30af\u30c8\u30eb\u3002<br \/>\n\u6761\u4ef6\u304c TRUE \u306e\u5834\u5408\u306f true \u306e\u4e00\u81f4\u5024\u3001FALSE \u306e\u5834\u5408\u306f false \u306e\u4e00\u81f4\u5024\u3001NA \u306e\u5834\u5408\u306f\u6b20\u843d\u5024\u306e\u4e00\u81f4\u5024 (\u6307\u5b9a\u3055\u308c\u3066\u3044\u308b\u5834\u5408)\u3001\u305d\u308c\u4ee5\u5916\u306e\u5834\u5408\u306f\u6b20\u843d\u5024\u304c\u4f7f\u7528\u3055\u308c\u307e\u3059\u3002<\/p>\n<h3>\u611f\u60f3<\/h3>\n<p>SQL\u306a\u3089\u30c1\u30e7\u30a4\u3068\u3067\u304d\u308b\u30c7\u30fc\u30bf\u306e\u6271\u3044\u3082R\u3060\u3068\u4e0d\u6163\u308c\u3067\u8abf\u3079\u306a\u304c\u3089\u306b\u306a\u308b\u306e\u304c\u3082\u3069\u304b\u3057\u3044\u3002\u3082\u3061\u308d\u3093SQL\u3068R\u3092\u884c\u3063\u305f\u308a\u6765\u305f\u308a\u3059\u308c\u3070\u3044\u3044\u306e\u3067\u3057\u3087\u3046\u304c\u3001\u30c1\u30e7\u30a4\u3068\u624b\u9593\u304c\u304b\u304b\u308b\u306e\u3068\u3001R\u306e\u30c7\u30fc\u30bf\u3092\u30c7\u30fc\u30bf\u30d9\u30fc\u30b9\u3078\u8aad\u307f\u8fbc\u307e\u305b\u3001\u305d\u308c\u3092SQL\u3067\u52a0\u5de5\u3057\u3066\u3001\u30c7\u30fc\u30bf\u30d9\u30fc\u30b9\u304b\u3089\u30c7\u30fc\u30bf\u3092\u5410\u304d\u51fa\u3057\u3066\u3001R\u3078\u8aad\u307f\u8fbc\u307e\u305b\u308b\u3068\u3044\u3046\u306e\u306f\u3001\u30b4\u30df\u304c\u5165\u308b\u5371\u967a\u6027\u3092\u306f\u3089\u3093\u3067\u3044\u308b\u306e\u3067\u3067\u304d\u308c\u3070\u907f\u3051\u305f\u3044\u4f5c\u696d\u306a\u306e\u3067\u3059\u3002<\/p>\n<pre class=\"EnlighterJSRAW\" data-enlighter-language=\"generic\">library(sqldf)\r\ndf_LineList &lt;- df.LineList\r\ndf.new &lt;- sqldf('SELECT *, <span style=\"color: #0000ff;\">case<\/span>\r\n                  <span style=\"color: #0000ff;\">when<\/span> ir_AE == -1 <span style=\"color: #0000ff;\">then<\/span> \"IRAE\" \r\n                  <span style=\"color: #0000ff;\">when<\/span> ir_AE == 0 <span style=\"color: #0000ff;\">then<\/span> \"nonIRAE\" \r\n                  <span style=\"color: #0000ff;\">else<\/span> \"\" \r\n                  <span style=\"color: #0000ff;\">end<\/span> <span style=\"color: #0000ff;\">as<\/span> IFirAE FROM df_LineList')\r\n<\/pre>\n<p>\uff08\u3067\u3082\u3001R\u306esqldf\u3067\u3084\u308d\u3046\u3068\u3059\u308b\u3068\u3001case\u6587\u306e\u6587\u6cd5\u304c\u79c1\u306e\u99b4\u67d3\u3093\u3067\u3044\u308b\u3084\u3064\u3068\u7d50\u69cb\u9055\u3046\uff01<\/p>\n","protected":false},"excerpt":{"rendered":"<p>\u4e0b\u56f3\u306e\u3088\u3046\u306adata frame (df.LineList)\u304c\u3042\u308a\u307e\u3059\u3002\u3010ir_AE\u3011\u3068\u3044\u3046\u30ab\u30e9\u30e0\u306f\u3001 -1 \u306e\u5834\u5408irAE\u30010\u306e\u5834\u5408\u975eirAE\u3068\u3044\u3046\u60c5\u5831\u3067\u3059\u3002 \u3053\u306eir_AE\u30ab\u30e9\u30e0\u3092\u898b\u306a\u304c\u3089irAE\u304b\u3069\u3046\u304b\u306e\u60c5\u5831\u3092&#038;#&#8230;<\/p>\n","protected":false},"author":1,"featured_media":3355,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_jetpack_memberships_contains_paid_content":false,"footnotes":""},"categories":[5],"tags":[],"class_list":["post-3350","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-miscellaneous"],"jetpack_featured_media_url":"https:\/\/plaza.umin.ac.jp\/~OIO\/wp-content\/uploads\/2024\/03\/Rplot.png","jetpack_shortlink":"https:\/\/wp.me\/p9b6zl-S2","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/plaza.umin.ac.jp\/~OIO\/index.php?rest_route=\/wp\/v2\/posts\/3350","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/plaza.umin.ac.jp\/~OIO\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/plaza.umin.ac.jp\/~OIO\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/plaza.umin.ac.jp\/~OIO\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/plaza.umin.ac.jp\/~OIO\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=3350"}],"version-history":[{"count":0,"href":"https:\/\/plaza.umin.ac.jp\/~OIO\/index.php?rest_route=\/wp\/v2\/posts\/3350\/revisions"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/plaza.umin.ac.jp\/~OIO\/index.php?rest_route=\/wp\/v2\/media\/3355"}],"wp:attachment":[{"href":"https:\/\/plaza.umin.ac.jp\/~OIO\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=3350"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/plaza.umin.ac.jp\/~OIO\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=3350"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/plaza.umin.ac.jp\/~OIO\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=3350"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}