{"id":570,"date":"2018-06-20T19:40:19","date_gmt":"2018-06-20T10:40:19","guid":{"rendered":"https:\/\/best-biostatistics.com\/toukei-er\/entry\/sample-size-determination-comparing-2-roc-curves-alternative\/"},"modified":"2025-02-20T23:40:04","modified_gmt":"2025-02-20T14:40:04","slug":"sample-size-determination-comparing-2-roc-curves-alternative","status":"publish","type":"post","link":"https:\/\/best-biostatistics.com\/toukei-er\/entry\/sample-size-determination-comparing-2-roc-curves-alternative\/","title":{"rendered":"R \u3067 ROC \u66f2\u7dda\u306e\u6bd4\u8f03\u306b\u5fc5\u8981\u306a\u30b5\u30f3\u30d7\u30eb\u6570\u3092\u5e73\u5747\u5024\u30fb\u6a19\u6e96\u504f\u5dee\u3092\u7528\u3044\u3066\u8a08\u7b97\u3059\u308b\u65b9\u6cd5"},"content":{"rendered":"\n<p>ROC \u66f2\u7dda\u306e\u6bd4\u8f03\u306b\u5fc5\u8981\u306a\u30b5\u30f3\u30d7\u30eb\u30b5\u30a4\u30ba\u306e\u8a08\u7b97\u65b9\u6cd5\u306e\u7d39\u4ecb<\/p>\n\n\n\n<p>\u691c\u67fb\u5024\u306e\u5e73\u5747\u5024\u3068\u6a19\u6e96\u504f\u5dee\u3092\u7528\u3044\u308b\u65b9\u6cd5<\/p>\n\n\n\n<!--more-->\n\n\n\n<h2 class=\"wp-block-heading\" id=\"ROC-\u66f2\u7dda\u306e\u6bd4\u8f03\u306b\u5fc5\u8981\u306a\u30b5\u30f3\u30d7\u30eb\u6570\u8a08\u7b97\u306e\u6e96\u5099\">ROC \u66f2\u7dda\u306e\u6bd4\u8f03\u306b\u5fc5\u8981\u306a\u30b5\u30f3\u30d7\u30eb\u6570\u8a08\u7b97\u306e\u6e96\u5099<\/h2>\n\n\n\n<p>R \u3067 ROC \u66f2\u7dda\u306e\u6bd4\u8f03\u306b\u5fc5\u8981\u306a\u30b5\u30f3\u30d7\u30eb\u30b5\u30a4\u30ba\u8a08\u7b97\u3092\u3059\u308b\u305f\u3081\u306e\u6e96\u5099\u3002<\/p>\n\n\n\n<p>\u307e\u305a\u3001pROC \u30d1\u30c3\u30b1\u30fc\u30b8\u3092\u30a4\u30f3\u30b9\u30c8\u30fc\u30eb\u3059\u308b\u3002<\/p>\n\n\n\n<p>\u30a4\u30f3\u30b9\u30c8\u30fc\u30eb\u306f\u3001\u4e00\u56de\u3060\u3051\u3067\u3088\u3044\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\">\"pROC\"<\/span><span class=\"synSpecial\">)<\/span>\n<\/code><\/pre>\n\n\n\n<p>pROC\u30d1\u30c3\u30b1\u30fc\u30b8\u3092\u547c\u3073\u51fa\u3059\u3002<\/p>\n\n\n\n<p>\u3053\u308c\u306f\u30bd\u30d5\u30c8\u30a6\u30a7\u30a2\u8d77\u52d5\u6642\u6bce\u56de\u3002<\/p>\n\n\n\n<pre class=\"wp-block-code\"><code><span class=\"synPreProc\">library<\/span><span class=\"synSpecial\">(<\/span>pROC<span class=\"synSpecial\">)<\/span>\n<\/code><\/pre>\n\n\n\n<p>\u3053\u308c\u3067\u6e96\u5099\u5b8c\u4e86\u3002<\/p>\n\n\n\n<h2 class=\"wp-block-heading\" id=\"ROC-\u66f2\u7dda\u306e\u6bd4\u8f03\u306b\u5fc5\u8981\u306a\u30b5\u30f3\u30d7\u30eb\u6570\u8a08\u7b97\u306e\u305f\u3081\u306e\u524d\u63d0\">ROC \u66f2\u7dda\u306e\u6bd4\u8f03\u306b\u5fc5\u8981\u306a\u30b5\u30f3\u30d7\u30eb\u6570\u8a08\u7b97\u306e\u305f\u3081\u306e\u524d\u63d0<\/h2>\n\n\n\n<p>\u5148\u884c\u7814\u7a76\u304b\u3089\u3001\u75be\u60a3\u3042\u308a\u30fb\u306a\u3057\u5225\u306e\u691c\u67fb\u5024 1 \u3068\u691c\u67fb\u5024 2 \u3001\u305d\u308c\u305e\u308c\u306e\u5e73\u5747\u3068\u6a19\u6e96\u504f\u5dee\u304c\u8aad\u307f\u53d6\u308c\u308b\u5834\u5408\u306e\u8a08\u7b97\u65b9\u6cd5\u3002<\/p>\n\n\n\n<ul class=\"wp-block-list\">\n<li>\u75be\u60a3\u306a\u3057\u306e\u3001\u691c\u67fb\u5024 1 \u306e\u5e73\u5747\u304c 7.54\u3001\u6a19\u6e96\u504f\u5dee\u304c 2.02<\/li>\n\n\n\n<li>\u75be\u60a3\u3042\u308a\u306e\u3001\u691c\u67fb\u5024 1 \u306e\u5e73\u5747\u304c 14.7\u3001\u6a19\u6e96\u504f\u5dee\u304c 3.94<\/li>\n\n\n\n<li>\u75be\u60a3\u306a\u3057\u306e\u3001\u691c\u67fb\u5024 2 \u306e\u5e73\u5747\u304c 1.36\u3001\u6a19\u6e96\u504f\u5dee\u304c 0.14<\/li>\n\n\n\n<li>\u75be\u60a3\u306a\u3057\u306e\u3001\u691c\u67fb\u5024 2 \u306e\u5e73\u5747\u304c 1.53\u3001\u6a19\u6e96\u504f\u5dee\u304c 0.16<\/li>\n<\/ul>\n\n\n\n<p>\u3068\u3059\u308b\u3002<\/p>\n\n\n\n<p>\u691c\u67fb\u5024 1 \u306eArea Under the Curve\uff08AUC\uff09\u3092 0.979\u3001\u691c\u67fb\u5024 2 \u306eAUC\u3092 0.919 \u3068\u3059\u308b\u3002<\/p>\n\n\n\n<p>\u75be\u60a3\u3042\u308a\u3001\u306a\u3057\u3001\u305d\u308c\u305e\u308c\u306e\u691c\u67fb\u5024 1 \u3068\u691c\u67fb\u5024 2 \u306e\u76f8\u95a2\u4fc2\u6570\u3092\u3068\u3082\u306b 0.60 \u3068\u3059\u308b\u3002<\/p>\n\n\n\n<p>\u4ee5\u4e0a\u306e\u524d\u63d0\u3092\u4ee5\u4e0b\u306e\u3088\u3046\u306b\u4ee3\u5165\u3059\u308b\u3002<\/p>\n\n\n\n<pre class=\"wp-block-code\"><code>mN.1 <span class=\"synStatement\">&lt;-<\/span> <span class=\"synConstant\">7.54<\/span>\nsN.1 <span class=\"synStatement\">&lt;-<\/span> <span class=\"synConstant\">2.02<\/span>\nmD.1 <span class=\"synStatement\">&lt;-<\/span> <span class=\"synConstant\">14.7<\/span>\nsD.1 <span class=\"synStatement\">&lt;-<\/span> <span class=\"synConstant\">3.94<\/span>\nmN.2 <span class=\"synStatement\">&lt;-<\/span> <span class=\"synConstant\">1.36<\/span>\nsN.2 <span class=\"synStatement\">&lt;-<\/span> <span class=\"synConstant\">0.14<\/span>\nmD.2 <span class=\"synStatement\">&lt;-<\/span> <span class=\"synConstant\">1.53<\/span>\nsD.2 <span class=\"synStatement\">&lt;-<\/span> <span class=\"synConstant\">0.16<\/span>\nAUC.1 <span class=\"synStatement\">&lt;-<\/span> <span class=\"synConstant\">0.979<\/span>\nAUC.2 <span class=\"synStatement\">&lt;-<\/span> <span class=\"synConstant\">0.919<\/span>\nrD <span class=\"synStatement\">&lt;-<\/span> <span class=\"synConstant\">0.60<\/span>\nrN <span class=\"synStatement\">&lt;-<\/span> <span class=\"synConstant\">0.60<\/span>\n<\/code><\/pre>\n\n\n\n<p>\u5e73\u5747\u3068\u6a19\u6e96\u504f\u5dee\u3092\u4f7f\u3063\u3066\u3001\u30d1\u30e9\u30e1\u30fc\u30bf\u3092\u8a08\u7b97\u3057\u3066\u3001\u30d1\u30e9\u30e1\u30fc\u30bf\u30bb\u30c3\u30c8\u3092\u6e96\u5099\u3059\u308b\u3002<\/p>\n\n\n\n<pre class=\"wp-block-code\"><code>A.1 <span class=\"synStatement\">&lt;-<\/span> <span class=\"synSpecial\">(<\/span>mD.1 <span class=\"synStatement\">-<\/span> mN.1<span class=\"synSpecial\">)<\/span><span class=\"synStatement\">\/<\/span>sD.1\nB.1 <span class=\"synStatement\">&lt;-<\/span> sN.1<span class=\"synStatement\">\/<\/span>sD.1\nA.2 <span class=\"synStatement\">&lt;-<\/span> <span class=\"synSpecial\">(<\/span>mD.2 <span class=\"synStatement\">-<\/span> mN.2<span class=\"synSpecial\">)<\/span><span class=\"synStatement\">\/<\/span>sD.2\nB.2 <span class=\"synStatement\">&lt;-<\/span> sN.2<span class=\"synStatement\">\/<\/span>sD.2\nparameters <span class=\"synStatement\">&lt;-<\/span> <span class=\"synType\">list<\/span><span class=\"synSpecial\">(<\/span>A1<span class=\"synStatement\">=<\/span>A.1<span class=\"synSpecial\">,<\/span> B1<span class=\"synStatement\">=<\/span>B.1<span class=\"synSpecial\">,<\/span> A2<span class=\"synStatement\">=<\/span>A.2<span class=\"synSpecial\">,<\/span> B2<span class=\"synStatement\">=<\/span>B.2<span class=\"synSpecial\">,<\/span> rn<span class=\"synStatement\">=<\/span>rN<span class=\"synSpecial\">,<\/span> ra<span class=\"synStatement\">=<\/span>rD<span class=\"synSpecial\">,<\/span> delta<span class=\"synStatement\">=<\/span>AUC.1<span class=\"synStatement\">-<\/span>AUC.2<span class=\"synSpecial\">)<\/span>\n<\/code><\/pre>\n\n\n\n<div id=\"biost-1647142097\" 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\u306e\u6bd4\u8f03\u306b\u5fc5\u8981\u306a\u30b5\u30f3\u30d7\u30eb\u6570\u306e\u8a08\u7b97\u7d50\u679c\">ROC \u66f2\u7dda\u306e\u6bd4\u8f03\u306b\u5fc5\u8981\u306a\u30b5\u30f3\u30d7\u30eb\u6570\u306e\u8a08\u7b97\u7d50\u679c<\/h2>\n\n\n\n<p>\u691c\u51fa\u529b80%\u3001\u75be\u60a3\u3042\u308a\uff1a\u306a\u3057\u306e\u6bd4\uff08kappa\uff09\u3092\uff11\uff1a\uff14\u306b\u3059\u308b\u3002<\/p>\n\n\n\n<p>\u3053\u306e\u3068\u304d\u306b\u3001\u4ee5\u4e0b\u306e\u3088\u3046\u306a\u30b9\u30af\u30ea\u30d7\u30c8\u3092\u66f8\u304f\u3068\u8a08\u7b97\u3055\u308c\u308b\u3002<\/p>\n\n\n\n<pre class=\"wp-block-code\"><code><span class=\"synIdentifier\">power.roc.test<\/span><span class=\"synSpecial\">(<\/span>parameters<span class=\"synSpecial\">,<\/span> power<span class=\"synStatement\">=<\/span><span class=\"synConstant\">0.80<\/span><span class=\"synSpecial\">,<\/span> kappa<span class=\"synStatement\">=<\/span><span class=\"synConstant\">4<\/span><span class=\"synSpecial\">)<\/span>\n<\/code><\/pre>\n\n\n\n<p>\u7d50\u679c\u306f\u4ee5\u4e0b\u306e\u901a\u308a\u3002<\/p>\n\n\n\n<pre class=\"wp-block-code\"><code>> power.roc.test(parameters, power=0.80, kappa=4)\n\n     Two ROC curves power calculation \n\n         ncases = 67.93234\n      ncontrols = 271.7294\n      sig.level = 0.05\n          power = 0.8<\/code><\/pre>\n\n\n\n<p>\u75be\u60a3\u3042\u308a68\u4f8b\u3001\u75be\u60a3\u306a\u3057272\u4f8b\u3001\u5408\u8a08340\u4f8b\u5fc5\u8981\u3068\u8a08\u7b97\u3055\u308c\u305f\u3002<\/p>\n\n\n\n<h2 class=\"wp-block-heading\" id=\"\u307e\u3068\u3081\">\u307e\u3068\u3081<\/h2>\n\n\n\n<p>ROC \u66f2\u7dda\u306e\u6bd4\u8f03\u306b\u5fc5\u8981\u306a\u30b5\u30f3\u30d7\u30eb\u30b5\u30a4\u30ba\u306e\u8a08\u7b97\u3092\u7d39\u4ecb\u3057\u305f\u3002<\/p>\n\n\n\n<p>\u75be\u60a3\u3042\u308a\u3001\u306a\u3057\u3001\u305d\u308c\u305e\u308c\u306b\u304a\u3044\u3066\u3001\u691c\u67fb\u5024 1 \u3001\u691c\u67fb\u5024 2 \u306e\u5e73\u5747\u5024\u3068\u6a19\u6e96\u504f\u5dee\u304c\u5148\u884c\u7814\u7a76\u304b\u3089\u5f97\u3089\u308c\u308b\u5834\u5408\u306e\u8a08\u7b97\u65b9\u6cd5\u3067\u3042\u308b\u3002<\/p>\n\n\n\n<p>\u53c2\u8003\u306b\u306a\u308c\u3070\u3002<\/p>\n\n\n\n<h2 class=\"wp-block-heading\" id=\"\u95a2\u9023\u8a18\u4e8b\">\u95a2\u9023\u8a18\u4e8b<\/h2>\n\n\n<div class=\"swell-block-postLink\">\t\t\t<div class=\"p-blogCard -internal\" data-type=\"type1\" data-onclick=\"clickLink\">\n\t\t\t\t<div class=\"p-blogCard__inner\">\n\t\t\t\t\t<span class=\"p-blogCard__caption\">\u3042\u308f\u305b\u3066\u8aad\u307f\u305f\u3044<\/span>\n\t\t\t\t\t<div class=\"p-blogCard__thumb c-postThumb\"><figure class=\"c-postThumb__figure\"><img decoding=\"async\" src=\"https:\/\/best-biostatistics.com\/toukei-er\/wp-content\/uploads\/2024\/08\/1920x1080-video-Excel-300x169.jpg\" alt=\"\" class=\"c-postThumb__img u-obf-cover\" width=\"320\" height=\"180\"><\/figure><\/div>\t\t\t\t\t<div class=\"p-blogCard__body\">\n\t\t\t\t\t\t<a class=\"p-blogCard__title\" href=\"https:\/\/best-biostatistics.com\/toukei-er\/entry\/sample-size-determination-comparing-2-roc-curves-01\/\">R \u3067 ROC \u66f2\u7dda\u306e\u6bd4\u8f03\u306b\u5fc5\u8981\u306a\u30b5\u30f3\u30d7\u30eb\u6570\u3092\u507d\u967d\u6027\u7387\u30fb\u967d\u6027\u7387\u30fbAUC \u3092\u7528\u3044\u3066\u8a08\u7b97\u3059\u308b\u65b9\u6cd5<\/a>\n\t\t\t\t\t\t<span class=\"p-blogCard__excerpt\">ROC \u66f2\u7dda\u306e\u6bd4\u8f03\u306b\u5fc5\u8981\u306a\u30b5\u30f3\u30d7\u30eb\u6570 \u30b5\u30f3\u30d7\u30eb\u30b5\u30a4\u30ba\u3092\u8a08\u7b97\u3059\u308b\u65b9\u6cd5 ROC \u66f2\u7dda\u306e\u6bd4\u8f03\u306b\u5fc5\u8981\u306a\u30b5\u30f3\u30d7\u30eb\u6570\u3092\u8a08\u7b97\u3059\u308b\u305f\u3081\u306b\u5fc5\u8981\u306a\u6570\u5024 ROC \u66f2\u7dda\u3092\u6bd4\u8f03\u3057\u305f\u3044\u691c\u67fb\u5024\u3092\u3001\u691c\u67fb\u5024&#8230;<\/span>\t\t\t\t\t<\/div>\n\t\t\t\t<\/div>\n\t\t\t<\/div>\n\t\t<\/div>\n\n\n\n\n\n\n\n","protected":false},"excerpt":{"rendered":"<p>ROC \u66f2\u7dda\u306e\u6bd4\u8f03\u306b\u5fc5\u8981\u306a\u30b5\u30f3\u30d7\u30eb\u30b5\u30a4\u30ba\u306e\u8a08\u7b97\u65b9\u6cd5\u306e\u7d39\u4ecb \u691c\u67fb\u5024\u306e\u5e73\u5747\u5024\u3068\u6a19\u6e96\u504f\u5dee\u3092\u7528\u3044\u308b\u65b9\u6cd5<\/p>\n","protected":false},"author":2,"featured_media":0,"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,16],"tags":[],"class_list":["post-570","post","type-post","status-publish","format-standard","hentry","category-r","category-roc","category-16"],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/posts\/570","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=570"}],"version-history":[{"count":3,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/posts\/570\/revisions"}],"predecessor-version":[{"id":3534,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/posts\/570\/revisions\/3534"}],"wp:attachment":[{"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/media?parent=570"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/categories?post=570"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/best-biostatistics.com\/toukei-er\/wp-json\/wp\/v2\/tags?post=570"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}