{"id":573,"date":"2018-06-19T06:47:14","date_gmt":"2018-06-18T21:47:14","guid":{"rendered":"https:\/\/best-biostatistics.com\/toukei-er\/entry\/how-to-create-roc-curve-by-r-1\/"},"modified":"2025-02-20T23:36:10","modified_gmt":"2025-02-20T14:36:10","slug":"how-to-create-roc-curve-by-r-1","status":"publish","type":"post","link":"https:\/\/best-biostatistics.com\/toukei-er\/entry\/how-to-create-roc-curve-by-r-1\/","title":{"rendered":"R \u3067 ROC \u66f2\u7dda\u3092\u66f8\u304f\u65b9\u6cd5"},"content":{"rendered":"\n<p>ROC \u66f2\u7dda\u3092 R \u3067\u66f8\u304f\u65b9\u6cd5\u3092\u308f\u304b\u308a\u3084\u3059\u304f\u89e3\u8aac<\/p>\n\n\n\n<!--more-->\n\n\n\n<h2 class=\"wp-block-heading\" id=\"ROC-\u66f2\u7dda\u3092-R-\u3067\u66f8\u304f\u65b9\u6cd5\u306e\u524d\u306b-ROC-\u66f2\u7dda\u3068\u306f\">ROC \u66f2\u7dda\u3068\u306f\uff1f<\/h2>\n\n\n\n<p>ROC\u66f2\u7dda\u306f\u3001\u75c5\u6c17\u306e\u8a3a\u65ad\u306e\u305f\u3081\u306e\u691c\u67fb\u3092\u5206\u6790\u3059\u308b\u305f\u3081\u306b\u4f7f\u308f\u308c\u308b\u3002<\/p>\n\n\n\n<p>\u771f\u5b9f\u306e\u5206\u985e\u3068\u3001\u771f\u5b9f\u306e\u5206\u985e\u3092\u898b\u5206\u3051\u308b\u691c\u67fb\u7d50\u679c\u3092\u4f7f\u3063\u3066\u3001\u3069\u306e\u30ec\u30d9\u30eb\u3088\u308a\u4e0a\u3060\u3068\u75c5\u6c17\u3068\u3059\u308b\u304b\uff1f\u3092\u6c7a\u3081\u308b\u5206\u6790\u30c4\u30fc\u30eb\u3002<\/p>\n\n\n\n<p>\u80c3\u304c\u3093\u3084\u5927\u8178\u304c\u3093\u3092\u898b\u3064\u3051\u308b\u306b\u306f\u3001\u5185\u8996\u93e1\u3092\u3057\u306a\u3044\u3068\u898b\u3064\u3051\u3089\u308c\u306a\u3044\u304c\u3001\u7c21\u5358\u306a\u8840\u6db2\u691c\u67fb\u3067\u898b\u3064\u3051\u305f\u3044\u3068\u3059\u308b\u3002<\/p>\n\n\n\n<p>\u8840\u6db2\u691c\u67fb\u306e\u5024\u304c\u3044\u304f\u3064\u306e\u3068\u304d\u306b\u3001\u304c\u3093\u3068\u304c\u3093\u3067\u306f\u306a\u3044\u304b\u3092\u4e00\u756a\u30af\u30ea\u30a2\u306b\u5206\u3051\u308b\u3053\u3068\u304c\u3067\u304d\u308b\u304b\uff1f<\/p>\n\n\n\n<p>\u3053\u3046\u3044\u3046\u554f\u984c\u306b\u7b54\u3048\u3089\u308c\u308b\u3002<\/p>\n\n\n\n<h2 class=\"wp-block-heading\" id=\"ROC-\u66f2\u7dda\u3092-R-\u3067\u66f8\u3044\u3066\u307f\u308b\u305f\u3081\u306e\u30b5\u30f3\u30d7\u30eb\u30c7\u30fc\u30bf\">ROC \u66f2\u7dda\u3092 R \u3067\u66f8\u3044\u3066\u307f\u308b\u305f\u3081\u306e\u30b5\u30f3\u30d7\u30eb\u30c7\u30fc\u30bf<\/h2>\n\n\n\n<p>\u30c7\u30fc\u30bf\u306f\u3001KTSND \u3068\u3044\u3046\u691c\u67fb\u306e\u70b9\u6570\uff08\u9023\u7d9a\u30c7\u30fc\u30bf\u3068\u3057\u3066\u6271\u3046\uff09\u3068\u3001SMK \u304c\u6b63\u89e3\u306e\u5206\u985e\uff08\u4e8c\u5024\u306e\u30ab\u30c6\u30b4\u30ea\u30ab\u30eb\u30c7\u30fc\u30bf\uff09\u3002<\/p>\n\n\n\n<p>KTSND \u306e\u30ab\u30c3\u30c8\u30aa\u30d5\u5024\u3068\u3057\u3066\u3044\u304f\u3064\u304c\u3082\u3063\u3068\u3082 SMK \u3092\u4e88\u6e2c\u3059\u308b\u304b\u3068\u3044\u3046\u5206\u6790\u306b\u306a\u308b\u3002<\/p>\n\n\n\n<pre class=\"wp-block-code\"><code><span class=\"synStatement\">&gt;<\/span> <span class=\"synIdentifier\">str<\/span><span class=\"synSpecial\">(<\/span>dat<span class=\"synSpecial\">)<\/span>\n<span class=\"synConstant\">'data.frame'<\/span><span class=\"synSpecial\">:<\/span>   <span class=\"synConstant\">484<\/span> obs. of  <span class=\"synConstant\">2<\/span> variables<span class=\"synSpecial\">:<\/span>\n<span class=\"synSpecial\">$<\/span> KTSND<span class=\"synSpecial\">:<\/span> int  <span class=\"synConstant\">15<\/span> <span class=\"synConstant\">13<\/span> <span class=\"synConstant\">16<\/span> <span class=\"synConstant\">4<\/span> <span class=\"synConstant\">18<\/span> <span class=\"synConstant\">29<\/span> <span class=\"synConstant\">15<\/span> <span class=\"synConstant\">15<\/span> <span class=\"synConstant\">11<\/span> <span class=\"synConstant\">6<\/span> ...\n<span class=\"synSpecial\">$<\/span> SMK  <span class=\"synSpecial\">:<\/span> int  <span class=\"synConstant\">1<\/span> <span class=\"synConstant\">1<\/span> <span class=\"synConstant\">1<\/span> <span class=\"synConstant\">1<\/span> <span class=\"synConstant\">1<\/span> <span class=\"synConstant\">1<\/span> <span class=\"synConstant\">1<\/span> <span class=\"synConstant\">1<\/span> <span class=\"synConstant\">1<\/span> <span class=\"synConstant\">0<\/span> ...\n<\/code><\/pre>\n\n\n\n<div id=\"biost-3223057943\" class=\"biost- biost-entity-placement\"><p style=\"text-align: center;\"><span style=\"font-size: 20px;\"><strong><a href=\"https:\/\/best-biostatistics.com\/kmhl\">\uff1e\uff1e\u3082\u3046\u7d71\u8a08\u3067\u60a9\u3080\u306e\u306f\u7d42\u308f\u308a\u306b\u3057\u307e\u305b\u3093\u304b\uff1f\u00a0<\/a><\/strong><\/span><\/p>\r\n<a href=\"https:\/\/best-biostatistics.com\/kmhl\"><img class=\"aligncenter wp-image-2794 size-full\" src=\"https:\/\/best-biostatistics.com\/wp\/wp-content\/uploads\/2023\/11\/bn_r_03.png\" alt=\"\" width=\"500\" height=\"327\" \/><\/a>\r\n<p style=\"text-align: center;\"><span style=\"color: #ff0000; font-size: 20px;\"><strong><span class=\"marker2\">\u21911\u4e07\u4eba\u4ee5\u4e0a\u306e\u533b\u7642\u5f93\u4e8b\u8005\u304c\u8cfc\u8aad\u4e2d<\/span><\/strong><\/span><\/p><\/div><h2 class=\"wp-block-heading\" id=\"ROC-\u66f2\u7dda\u3092-R-\u3067\u66f8\u304f\u305f\u3081\u306e\u30d1\u30c3\u30b1\u30fc\u30b8\u306e\u30a4\u30f3\u30b9\u30c8\u30fc\u30eb\">ROC \u66f2\u7dda\u3092 R \u3067\u66f8\u304f\u305f\u3081\u306e\u30d1\u30c3\u30b1\u30fc\u30b8\u306e\u30a4\u30f3\u30b9\u30c8\u30fc\u30eb<\/h2>\n\n\n\n<p>Epi \u3068\u3044\u3046\u30d1\u30c3\u30b1\u30fc\u30b8\u3092\u30a4\u30f3\u30b9\u30c8\u30fc\u30eb\u3059\u308b\u3002<\/p>\n\n\n\n<pre class=\"wp-block-code\"><code><span class=\"synIdentifier\">install.packages<\/span><span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"Epi\"<\/span><span class=\"synSpecial\">)<\/span>\n<\/code><\/pre>\n\n\n\n<p>\u305d\u306e\u3042\u3068\u547c\u3073\u51fa\u3057\u3066\u4f7f\u3048\u308b\u3088\u3046\u306b\u3059\u308b\u3002<\/p>\n\n\n\n<pre class=\"wp-block-code\"><code><span class=\"synPreProc\">library<\/span><span class=\"synSpecial\">(<\/span>Epi<span class=\"synSpecial\">)<\/span>\n<\/code><\/pre>\n\n\n\n<h2 class=\"wp-block-heading\" id=\"ROC-\u66f2\u7dda\u3092-R-\u3067\u66f8\u3044\u3066\u307f\u308b\">ROC \u66f2\u7dda\u3092 R \u3067\u66f8\u3044\u3066\u307f\u308b<\/h2>\n\n\n\n<p>\u30c7\u30fc\u30bf\u3092dat\u3068\u3044\u3046\u540d\u524d\u3067\u8aad\u307f\u8fbc\u3080\u3002<\/p>\n\n\n\n<pre class=\"wp-block-code\"><code>dat <span class=\"synStatement\">&lt;-<\/span> <span class=\"synIdentifier\">read.table<\/span><span class=\"synSpecial\">(<\/span><span class=\"synConstant\">\"ROC-curve-sample-data.txt\"<\/span><span class=\"synSpecial\">)<\/span>\n<\/code><\/pre>\n\n\n\n<p>plot=&#8221;ROC&#8221;\u3067ROC\u66f2\u7dda\u5206\u6790\u3092\u6307\u5b9a\u3002<\/p>\n\n\n\n<pre class=\"wp-block-code\"><code><span class=\"synIdentifier\">ROC<\/span><span class=\"synSpecial\">(<\/span>test<span class=\"synStatement\">=<\/span>dat<span class=\"synSpecial\">$<\/span>KTSND<span class=\"synSpecial\">,<\/span> stat<span class=\"synStatement\">=<\/span>dat<span class=\"synSpecial\">$<\/span>SMK<span class=\"synSpecial\">,<\/span> plot<span class=\"synStatement\">=<\/span><span class=\"synConstant\">\"ROC\"<\/span><span class=\"synSpecial\">)<\/span>\n<\/code><\/pre>\n\n\n\n<p>test= \u3067\u691c\u67fb\u5024\u3001stat= \u3067\u6b63\u89e3\u306e\u5206\u985e\u3092\u6307\u5b9a\u3059\u308b\u3002<\/p>\n\n\n\n<p>\u305d\u3046\u3059\u308b\u3068\u3001\u4ee5\u4e0b\u306e\u30b0\u30e9\u30d5\uff08\u9ed2\u3044\u592a\u3081\u306e\u5b9f\u7dda\uff09\u304c\u63cf\u3051\u308b\u3002<\/p>\n\n\n\n<p>\u30ac\u30bf\u30ac\u30bf\u3057\u3066\u3044\u3066\u3042\u307e\u308a\u306a\u3081\u3089\u304b\u3067\u306a\u3044\u304c\u3001\u4e00\u5fdc\u66f2\u7dda\u306b\u898b\u3048\u306a\u304f\u3082\u306a\u3044\u3002<\/p>\n\n\n\n<p>\u3053\u308c\u304c ROC \u66f2\u7dda\u3067\u3042\u308b\u3002<\/p>\n\n\n\n<figure class=\"wp-block-image size-full\"><img decoding=\"async\" width=\"587\" height=\"586\" src=\"https:\/\/best-biostatistics.com\/toukei-er\/wp-content\/uploads\/2018\/06\/20201013230012.png\" alt=\"\" class=\"wp-image-3093\" title=\"\" srcset=\"https:\/\/best-biostatistics.com\/toukei-er\/wp-content\/uploads\/2018\/06\/20201013230012.png 587w, https:\/\/best-biostatistics.com\/toukei-er\/wp-content\/uploads\/2018\/06\/20201013230012-300x300.png 300w, https:\/\/best-biostatistics.com\/toukei-er\/wp-content\/uploads\/2018\/06\/20201013230012-150x150.png 150w\" sizes=\"(max-width: 587px) 100vw, 587px\" \/><\/figure>\n\n\n\n<p><span itemscope=\"\" itemtype=\"http:\/\/schema.org\/Photograph\"><\/span><\/p>\n\n\n\n<p>KTSND\u304c11\u70b9\u306e\u3068\u304d\u304c\u3001\u4e00\u756a\u3046\u307e\u304f\u308f\u3051\u3066\u3044\u308b\u5206\u5c90\u70b9\u3067\u3042\u308b\u3068\u3001\u793a\u3057\u3066\u3044\u308b\u3002<\/p>\n\n\n\n<p>\u3053\u306e\u30ab\u30c3\u30c8\u30aa\u30d5\u5024\u3068\u3057\u305f\u3068\u304d\u306e\u4ee5\u4e0b\u306e 4 \u3064\u306e\u6307\u6a19\u304c\u8868\u793a\u3055\u308c\u3066\u3044\u308b\u3002<\/p>\n\n\n\n<ul class=\"wp-block-list\">\n<li>Sens \uff08\u611f\u5ea6\uff0971.8%<\/li>\n\n\n\n<li>Spec\uff08\u7279\u7570\u5ea6\uff0974.5%<\/li>\n\n\n\n<li>PV+\uff08\u967d\u6027\u53cd\u5fdc\u7684\u4e2d\u7387\uff0927.3%<\/li>\n\n\n\n<li>PV-\uff08\u9670\u6027\u53cd\u5fdc\u7684\u4e2d\u7387\uff0926.4%<\/li>\n<\/ul>\n\n\n\n<p>AUC\u306f0.798\u3067\u3001\u3053\u306e\u691c\u67fb\u81ea\u4f53\u6027\u80fd\u304c\u3044\u3044\u8a3c\u62e0\u3060\u3002<\/p>\n\n\n\n<p>AUC\u304c\u306a\u308b\u3079\u304f1\u306b\u8fd1\u3044\u307b\u3046\u304c\u3044\u3044\u3002<\/p>\n\n\n\n<p>\u6b63\u65b9\u5f62\u306e\u9762\u7a4d\u304c1\u3060\u3002<\/p>\n\n\n\n<p>\u53f3\u4e0b\u3092\u304b\u306a\u3081\u3068\u307f\u3066\u3001\u6247\u5f62\u304cAUC\u3067\u4eca\u56de\u306f\u7d040.8\u3060\u3002<\/p>\n\n\n\n<h2 class=\"wp-block-heading\" id=\"ROC-\u66f2\u7dda\u4ee5\u5916\u306b\u3082\u611f\u5ea6\u7279\u7570\u5ea6\u7684\u4e2d\u7387\u306e\u30b0\u30e9\u30d5\u3082\u66f8\u3051\u308b\">ROC \u66f2\u7dda\u4ee5\u5916\u306b\u3082\u611f\u5ea6\u30fb\u7279\u7570\u5ea6\u30fb\u7684\u4e2d\u7387\u306e\u30b0\u30e9\u30d5\u3082\u66f8\u3051\u308b<\/h2>\n\n\n\n<p>\u5148\u307b\u3069 plot=&#8221;ROC&#8221; \u3068\u6307\u5b9a\u3057\u305f\u3068\u3053\u308d\u3092 plot=&#8221;sp&#8221; \u3068\u3059\u308b\u3002<\/p>\n\n\n\n<p>plot=&#8221;sp&#8221;\u306f\u611f\u5ea6\u3001\u7279\u7570\u5ea6\u3001\u7684\u4e2d\u7387\u3092\u8868\u793a\u3059\u308b\u6307\u5b9a\u3002<\/p>\n\n\n\n<pre class=\"wp-block-code\"><code><span class=\"synIdentifier\">ROC<\/span><span class=\"synSpecial\">(<\/span>test<span class=\"synStatement\">=<\/span>dat<span class=\"synSpecial\">$<\/span>KTSND<span class=\"synSpecial\">,<\/span> stat<span class=\"synStatement\">=<\/span>dat<span class=\"synSpecial\">$<\/span>SMK<span class=\"synSpecial\">,<\/span> plot<span class=\"synStatement\">=<\/span><span class=\"synConstant\">\"sp\"<\/span><span class=\"synSpecial\">)<\/span>\n<\/code><\/pre>\n\n\n\n<p>Sensitivity\uff08\u611f\u5ea6\uff09\u3068Specificity\uff08\u7279\u7570\u5ea6\uff09\u304c\u4ea4\u308f\u308b\u3068\u3053\u308d\u304c11\u70b9\u3060\u3002<\/p>\n\n\n\n<p>\u967d\u6027\u53cd\u5fdc\u7684\u4e2d\u7387\u306f\u6700\u5927\u3067\u308249.8%\u307e\u3067\u3057\u304b\u5230\u9054\u3057\u306a\u3044\u3053\u3068\u304c\u308f\u304b\u308b\u3002<\/p>\n\n\n\n<figure class=\"wp-block-image size-full\"><img decoding=\"async\" width=\"587\" height=\"586\" src=\"https:\/\/best-biostatistics.com\/toukei-er\/wp-content\/uploads\/2018\/06\/20201013230052.png\" alt=\"\" class=\"wp-image-3095\" title=\"\" srcset=\"https:\/\/best-biostatistics.com\/toukei-er\/wp-content\/uploads\/2018\/06\/20201013230052.png 587w, https:\/\/best-biostatistics.com\/toukei-er\/wp-content\/uploads\/2018\/06\/20201013230052-300x300.png 300w, https:\/\/best-biostatistics.com\/toukei-er\/wp-content\/uploads\/2018\/06\/20201013230052-150x150.png 150w\" sizes=\"(max-width: 587px) 100vw, 587px\" \/><\/figure>\n\n\n\n<p><span itemscope=\"\" itemtype=\"http:\/\/schema.org\/Photograph\"><\/span><\/p>\n\n\n\n<h2 class=\"wp-block-heading\" id=\"\u307e\u3068\u3081\">\u307e\u3068\u3081<\/h2>\n\n\n\n<p>R\u3067\u3001ROC\u66f2\u7dda\u3092\u66f8\u304f\u306b\u306f\u3001Epi \u30d1\u30c3\u30b1\u30fc\u30b8\u306e ROC() \u95a2\u6570\u3092\u4f7f\u3046\u306e\u304c\u4fbf\u5229\u3060\u3002<\/p>\n\n\n\n<p>\u3068\u3066\u3082\u304d\u308c\u3044\u306a\u56f3\u304c\u7c21\u5358\u306b\u63cf\u3051\u308b\u3002<\/p>\n\n\n\n<h2 class=\"wp-block-heading\" id=\"\u53c2\u8003\u30ea\u30f3\u30af\">\u53c2\u8003\u30ea\u30f3\u30af<\/h2>\n\n\n\n<p><a href=\"http:\/\/cran.at.r-project.org\/web\/packages\/Epi\/index.html\">Epi: A package for statistical analysis in epidemiology<\/a><\/p>\n\n\n\n<h2 class=\"wp-block-heading\" id=\"\u53c2\u8003\u66f8\u7c4d\">\u53c2\u8003\u66f8\u7c4d<\/h2>\n\n\n\n<p><a href=\"https:\/\/amzn.to\/4k80MYT\">R\u306b\u3088\u308b\u4fdd\u5065\u533b\u7642\u30c7\u30fc\u30bf\u89e3\u6790\u6f14\u7fd2 (Computer in Education and Research)<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"<p>ROC \u66f2\u7dda\u3092 R \u3067\u66f8\u304f\u65b9\u6cd5\u3092\u308f\u304b\u308a\u3084\u3059\u304f\u89e3\u8aac<\/p>\n","protected":false},"author":2,"featured_media":3093,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"swell_btn_cv_data":"","_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":false,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2}},"categories":[5,10,37],"tags":[],"class_list":["post-573","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-r","category-roc","category-37"],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"https:\/\/best-biostatistics.com\/toukei-er\/wp-content\/uploads\/2018\/06\/20201013230012.png","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/posts\/573","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/comments?post=573"}],"version-history":[{"count":3,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/posts\/573\/revisions"}],"predecessor-version":[{"id":3531,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/posts\/573\/revisions\/3531"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/media\/3093"}],"wp:attachment":[{"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/media?parent=573"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/categories?post=573"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/tags?post=573"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}