{"id":25580,"date":"2024-01-22T17:10:00","date_gmt":"2024-01-22T09:10:00","guid":{"rendered":"http:\/\/www.biocloudservice.com\/wordpress\/?p=25580"},"modified":"2024-01-22T17:10:02","modified_gmt":"2024-01-22T09:10:02","slug":"%e5%b0%8f%e6%9e%9c%e5%b8%a6%e4%bd%a0%e7%bb%98%e5%88%b6roc%e6%9b%b2%e7%ba%bf%e8%af%84%e4%bc%b0%e7%94%9f%e5%ad%98%e9%a2%84%e6%b5%8b%e8%83%bd%e5%8a%9b","status":"publish","type":"post","link":"http:\/\/www.biocloudservice.com\/wordpress\/?p=25580","title":{"rendered":"\u5c0f\u679c\u5e26\u4f60\u7ed8\u5236ROC\u66f2\u7ebf\u8bc4\u4f30\u751f\u5b58\u9884\u6d4b\u80fd\u529b"},"content":{"rendered":"<p>ROC\uff08Receiver Operating Characteristic\uff09\u66f2\u7ebf\u662f\u4e00\u79cd\u7528\u4e8e\u8bc4\u4f30\u5206\u7c7b\u6a21\u578b\u6027\u80fd\u7684\u5de5\u5177\u3002\u5728\u751f\u5b58\u5206\u6790\u4e2d\uff0cROC\u66f2\u7ebf\u7528\u4e8e\u8bc4\u4f30\u57fa\u4e8e\u9884\u6d4b\u56e0\u5b50\uff08\u4f8b\u5982\u57fa\u56e0\u8868\u8fbe\uff09\u5bf9\u751f\u5b58\u6216\u4e8b\u4ef6\u53d1\u751f\u7684\u9884\u6d4b\u80fd\u529b\u3002\u8bc4\u4f30\u5206\u7c7b\u6a21\u578b\u6027\u80fd\uff1aROC\u66f2\u7ebf\u63d0\u4f9b\u4e86\u4e00\u79cd\u76f4\u89c2\u7684\u65b9\u5f0f\u6765\u8bc4\u4f30\u5206\u7c7b\u6a21\u578b\u7684\u6027\u80fd\uff0c\u7279\u522b\u662f\u5728\u4e0d\u540c\u9608\u503c\u4e0b\u7684\u6027\u80fd\u53d8\u5316\u3002\u66f2\u7ebf\u8d8a\u63a5\u8fd1\u5de6\u4e0a\u89d2\uff0c\u6a21\u578b\u7684\u6027\u80fd\u8d8a\u597d\u3002\u6bd4\u8f83\u4e0d\u540c\u6a21\u578b\uff1a\u901a\u8fc7\u6bd4\u8f83\u4e0d\u540c\u6a21\u578b\u7684ROC\u66f2\u7ebf\uff0c\u53ef\u4ee5\u5224\u65ad\u54ea\u4e2a\u6a21\u578b\u66f4\u9002\u5408\u4e8e\u7ed9\u5b9a\u7684\u9884\u6d4b\u4efb\u52a1\u3002\u66f2\u7ebf\u4e0b\u9762\u79ef\uff08Area Under the ROC Curve\uff0cAUC\uff09\u662f\u4e00\u4e2a\u5e38\u7528\u7684\u6307\u6807\uff0c\u8868\u793aROC\u66f2\u7ebf\u4e0b\u7684\u9762\u79ef\uff0c\u8303\u56f4\u57280\u52301\u4e4b\u95f4\u3002AUC\u503c\u8d8a\u63a5\u8fd11\uff0c\u6a21\u578b\u7684\u6027\u80fd\u8d8a\u597d\u3002\u9009\u62e9\u6700\u4f73\u9608\u503c\uff0c\u53ef\u89c6\u5316\u6a21\u578b\u6027\u80fd\uff1aROC\u66f2\u7ebf\u76f4\u89c2\u5730\u5c55\u793a\u4e86\u6a21\u578b\u5728\u4e0d\u540c\u9608\u503c\u4e0b\u7684\u5206\u7c7b\u6027\u80fd\uff0c\u53ef\u4ee5\u7528\u4e8e\u5411\u4ed6\u4eba\u6216\u7814\u7a76\u62a5\u544a\u4e2d\u5c55\u793a\u6a21\u578b\u7684\u6027\u80fd\u3002ROC\u66f2\u7ebf\u662f\u4e00\u79cd\u5e7f\u6cdb\u5e94\u7528\u4e8e\u5206\u7c7b\u6a21\u578b\u6027\u80fd\u8bc4\u4f30\u7684\u5de5\u5177\uff0c\u7279\u522b\u5728\u751f\u5b58\u5206\u6790\u4e2d\u7528\u4e8e\u8bc4\u4f30\u9884\u6d4b\u56e0\u5b50\u5bf9\u751f\u5b58\u6216\u4e8b\u4ef6\u53d1\u751f\u7684\u9884\u6d4b\u80fd\u529b\u3002\u5b83\u63d0\u4f9b\u4e86\u4e00\u4e2a\u7efc\u5408\u7684\u8bc4\u4f30\u5206\u7c7b\u6a21\u578b\u6027\u80fd\u7684\u6307\u6807\uff08AUC\uff09\uff0c\u540c\u65f6\u53ef\u5e2e\u52a9\u9009\u62e9\u6700\u4f73\u5206\u7c7b\u9608\u503c\u3002<\/p>\n<p>#install.packages(&#8220;survival&#8221;)<\/p>\n<p>#install.packages(&#8220;survminer&#8221;)<\/p>\n<p>#install.packages(&#8220;timeROC&#8221;)<\/p>\n<p>\u5b89\u88c5\u6240\u9700\u7684R\u5305\uff0c<\/p>\n<p>\u5206\u522b\u662fsurvival\u3001survminer\u548ctimeROC\u3002\u5982\u679c\u60a8\u4e4b\u524d\u5df2\u7ecf\u5b89\u88c5\u4e86\u8fd9\u4e9b\u5305\uff0c\u53ef\u4ee5\u8df3\u8fc7\u8fd9\u4e9b\u4ee3\u7801\u3002<\/p>\n<p>#\u5f15\u7528\u5305<\/p>\n<p>library(survival)<\/p>\n<p>library(survminer)<\/p>\n<p>library(timeROC)<\/p>\n<p>\u52a0\u8f7d\u6240\u9700\u7684R\u5305\uff0c\u4ee5\u4fbf\u5728\u4ee3\u7801\u4e2d\u4f7f\u7528\u76f8\u5e94\u7684\u51fd\u6570\u548c\u529f\u80fd<\/p>\n<p>inputFile=&#8221;expTime.txt&#8221;<\/p>\n<p>\u6307\u5b9a\u4e86\u8f93\u5165\u6587\u4ef6\u7684\u6587\u4ef6\u540d\u548c\u8def\u5f84\u3002\u5728\u8fd9\u4e2a\u4f8b\u5b50\u4e2d\uff0c\u8f93\u5165\u6587\u4ef6\u88ab\u5047\u8bbe\u4e3a\u540d\u4e3aexpTime.txt\u7684\u6587\u4ef6<\/p>\n<p>setwd(&#8220;C:\\\\biowolf\\\\Gene\\\\12.ROC&#8221;)<\/p>\n<p>\u8bbe\u7f6eR\u7684\u5de5\u4f5c\u76ee\u5f55\uff0c\u5373\u4ee3\u7801\u6267\u884c\u671f\u95f4\u7684\u9ed8\u8ba4\u6587\u4ef6\u5939\u3002\u5728\u8fd9\u4e2a\u4f8b\u5b50\u4e2d\uff0c\u5de5\u4f5c\u76ee\u5f55\u88ab\u8bbe\u7f6e\u4e3aC:\\\\biowolf\\\\Gene\\\\12.ROC<\/p>\n<p><img decoding=\"async\" loading=\"lazy\" width=\"307\" height=\"615\" class=\"wp-image-25581\" src=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-25580-1.png?resize=307%2C615\" srcset=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-25580-1.png?w=307 307w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-25580-1.png?resize=150%2C300 150w\" sizes=\"(max-width: 307px) 100vw, 307px\" data-recalc-dims=\"1\" \/><\/p>\n<p>rt=read.table(inputFile, header=T, sep=&#8221;\\t&#8221;, check.names=F, row.names=1)<\/p>\n<p>gene=colnames(rt)[3]<\/p>\n<p><img decoding=\"async\" loading=\"lazy\" width=\"528\" height=\"119\" class=\"wp-image-25582\" src=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-25580-2.png?resize=528%2C119\" srcset=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-25580-2.png?w=528 528w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-25580-2.png?resize=300%2C68 300w\" sizes=\"(max-width: 528px) 100vw, 528px\" data-recalc-dims=\"1\" \/><\/p>\n<p>\u4f7f\u7528read.table\u51fd\u6570\u4ece\u6307\u5b9a\u7684\u8f93\u5165\u6587\u4ef6\u4e2d\u8bfb\u53d6\u6570\u636e\uff0c\u5e76\u5c06\u6570\u636e\u5b58\u50a8\u5728\u540d\u4e3art\u7684\u6570\u636e\u6846\u4e2d\u3002<\/p>\n<p>header = TRUE\u8868\u793a\u7b2c\u4e00\u884c\u5305\u542b\u5217\u540d\uff0csep = &#8220;\\t&#8221;\u8868\u793a\u4f7f\u7528\u5236\u8868\u7b26\u4f5c\u4e3a\u5217\u4e4b\u95f4\u7684\u5206\u9694\u7b26\uff0c<\/p>\n<p>check.names = FALSE\u8868\u793a\u4e0d\u68c0\u67e5\u5217\u540d\u7684\u6709\u6548\u6027\uff0crow.names = 1\u8868\u793a\u4f7f\u7528\u7b2c\u4e00\u5217\u4f5c\u4e3a\u884c\u540d\u3002<\/p>\n<p>colnames(rt)[3]\u5c06\u7b2c\u4e09\u5217\u7684\u5217\u540d\u5b58\u50a8\u5728\u53d8\u91cfgene\u4e2d\u3002<\/p>\n<p><img decoding=\"async\" loading=\"lazy\" width=\"579\" height=\"376\" class=\"wp-image-25583\" src=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-25580-3.png?resize=579%2C376\" srcset=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-25580-3.png?w=579 579w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-25580-3.png?resize=300%2C195 300w\" sizes=\"(max-width: 579px) 100vw, 579px\" data-recalc-dims=\"1\" \/><\/p>\n<p>ROC_rt=timeROC(T=rt$futime, delta=rt$fustat,<\/p>\n<p>marker=rt[,gene], cause=1,<\/p>\n<p>weighting=&#8217;aalen&#8217;,<\/p>\n<p>times=c(1,3,5), ROC=TRUE)<\/p>\n<p>\u4f7f\u7528timeROC\u51fd\u6570\u6267\u884c\u751f\u5b58\u5206\u6790\uff0c\u5e76\u8ba1\u7b97\u5728\u4e0d\u540c\u65f6\u95f4\u70b9\u7684AUC\u503c\u3002<\/p>\n<p>T = rt$futime\u8868\u793a\u4e8b\u4ef6\u53d1\u751f\u65f6\u95f4\uff08\u751f\u5b58\u65f6\u95f4\uff09\u7684\u5411\u91cf\uff0cdelta = rt$fustat\u8868\u793a\u4e8b\u4ef6\u72b6\u6001\uff08\u751f\u5b58\/\u6b7b\u4ea1\uff09\u7684\u5411\u91cf\uff0c<\/p>\n<p>marker = rt[, gene]\u8868\u793a\u7528\u4e8e\u9884\u6d4b\u751f\u5b58\u7684\u6807\u8bb0\u53d8\u91cf\uff08\u57fa\u56e0\u8868\u8fbe\uff09\u7684\u5411\u91cf\uff0c<\/p>\n<p>cause = 1\u8868\u793a\u5c06\u5176\u89c6\u4e3a\u5355\u4e00\u4e8b\u4ef6\uff08\u4f8b\u5982\uff0c\u6b7b\u4ea1\uff09\uff0cweighting = &#8216;aalen&#8217;\u8868\u793a\u4f7f\u7528Aalen\u7684\u52a0\u6743\u65b9\u6cd5\uff0c<\/p>\n<p>times = c(1, 3, 5)\u8868\u793a\u8ba1\u7b971\u30013\u548c5\u5e74\u7684AUC\u503c\uff0cROC = TRUE\u8868\u793a\u8ba1\u7b97ROC\u66f2\u7ebf\u3002<\/p>\n<p>pdf(file=&#8221;ROC.pdf&#8221;, width=5, height=5)<\/p>\n<p><img decoding=\"async\" loading=\"lazy\" width=\"106\" height=\"82\" class=\"wp-image-25584\" src=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-25580-4.png?resize=106%2C82\" data-recalc-dims=\"1\" \/><\/p>\n<p>\u7528pdf\u51fd\u6570\u521b\u5efa\u4e00\u4e2a\u8f93\u51fa\u8bbe\u5907\uff0c\u5c06\u540e\u7eed\u7684\u56fe\u5f62\u8f93\u51fa\u4fdd\u5b58\u4e3aPDF\u6587\u4ef6\u3002<\/p>\n<p>file = &#8220;ROC.pdf&#8221;\u6307\u5b9a\u4e86\u8f93\u51fa\u6587\u4ef6\u7684\u540d\u79f0\uff0cwidth = 5, height = 5\u6307\u5b9a\u4e86\u8f93\u51fa\u56fe\u5f62\u7684\u5bbd\u5ea6\u548c\u9ad8\u5ea6\u3002<\/p>\n<p>plot(ROC_rt,time=1,col=&#8217;green&#8217;,title=FALSE,lwd=2)<\/p>\n<p>\u7528plot\u51fd\u6570\u5206\u522b\u7ed8\u5236\u4e86\u57281\u30013\u548c5\u5e74\u65f6\u95f4\u70b9\u7684ROC\u66f2\u7ebf\u3002col\u53c2\u6570\u6307\u5b9a\u4e86\u66f2\u7ebf\u7684\u989c\u8272\uff0c<\/p>\n<p>add = TRUE\u8868\u793a\u5c06\u66f2\u7ebf\u6dfb\u52a0\u5230\u540c\u4e00\u56fe\u4e2d\uff0ctitle = FALSE\u8868\u793a\u4e0d\u663e\u793a\u6807\u9898\uff0clwd = 2\u8868\u793a\u66f2\u7ebf\u7684\u7ebf\u5bbd\u3002<\/p>\n<p>plot(ROC_rt,time=3,col=&#8217;blue&#8217;,add=TRUE,title=FALSE,lwd=2)<\/p>\n<p>plot(ROC_rt,time=5,col=&#8217;red&#8217;,add=TRUE,title=FALSE,lwd=2)<\/p>\n<p>legend(&#8216;bottomright&#8217;,<\/p>\n<p>c(paste0(&#8216;AUC at 1 years: &#8216;,sprintf(&#8220;%.03f&#8221;,ROC_rt$AUC[1])),<\/p>\n<p>paste0(&#8216;AUC at 3 years: &#8216;,sprintf(&#8220;%.03f&#8221;,ROC_rt$AUC[2])),<\/p>\n<p>paste0(&#8216;AUC at 5 years: &#8216;,sprintf(&#8220;%.03f&#8221;,ROC_rt$AUC[3]))),<\/p>\n<p>col=c(&#8220;green&#8221;,&#8217;blue&#8217;,&#8217;red&#8217;),lwd=2,bty = &#8216;n&#8217;)<\/p>\n<p>legend\u51fd\u6570\u7528\u4e8e\u6dfb\u52a0\u56fe\u4f8b\uff0c\u663e\u793a\u6bcf\u4e2a\u65f6\u95f4\u70b9\u7684AUC\u503c\u3002&#8217;bottomright&#8217;\u6307\u5b9a\u4e86\u56fe\u4f8b\u7684\u4f4d\u7f6e\uff0c<\/p>\n<p>paste0\u51fd\u6570\u7528\u4e8e\u5c06AUC\u503c\u548c\u6587\u672c\u8fde\u63a5\u5728\u4e00\u8d77\uff0csprintf\u51fd\u6570\u7528\u4e8e\u683c\u5f0f\u5316AUC\u503c\u7684\u663e\u793a\uff0c<\/p>\n<p>col\u53c2\u6570\u6307\u5b9a\u4e86\u56fe\u4f8b\u6587\u672c\u7684\u989c\u8272\uff0clwd = 2\u8868\u793a\u56fe\u4f8b\u4e2d\u7ebf\u7684\u7ebf\u5bbd\uff0cbty = &#8216;n&#8217;\u8868\u793a\u4e0d\u7ed8\u5236\u56fe\u4f8b\u7684\u8fb9\u6846\u3002<\/p>\n<p>dev.off()<\/p>\n<p>\u5173\u95ed\u4e86PDF\u8bbe\u5907\uff0c\u5b8c\u6210\u4e86\u56fe\u5f62\u7684\u4fdd\u5b58<\/p>\n<p><img decoding=\"async\" loading=\"lazy\" width=\"640\" height=\"539\" class=\"wp-image-25585\" src=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-25580-5.png?resize=640%2C539\" srcset=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-25580-5.png?w=671 671w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-25580-5.png?resize=300%2C253 300w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-25580-5.png?resize=600%2C505 600w\" sizes=\"(max-width: 640px) 100vw, 640px\" data-recalc-dims=\"1\" \/><\/p>\n<p>\u4e0b\u671f\u5c06\u4e3a\u4f60\u5e26\u6765\u66f4\u591aR\u8bed\u8a00\u7684\u9a9a\u64cd\u4f5c\u6280\u5de7\uff0c\u4ee5\u4e0b\u63a8\u8350\u7684\u662f\u4e00\u4e2a\u591a\u529f\u80fd\u7684\u751f\u4fe1\u5e73\u53f0\u3002<\/p>\n<p>\u4e91\u751f\u4fe1\u5e73\u53f0\u94fe\u63a5\uff1a<a href=\"http:\/\/www.biocloudservice.com\/home.html\u3002\">http:\/\/www.biocloudservice.com\/home.html\u3002<\/a><\/p>\n<p>\u4e91\u751f\u4fe1\u5e73\u53f0\u94fe\u63a5\uff1ahttp:\/\/www.biocloudservice.com\/home.html\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"<p>ROC\uff08Receiver Operating Characteristic\uff09\u66f2\u7ebf\u662f\u4e00\u79cd\u7528\u4e8e\u8bc4\u4f30\u5206\u7c7b\u6a21\u578b\u6027\u80fd\u7684\u5de5 [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"jetpack_post_was_ever_published":false,"_jetpack_newsletter_access":""},"categories":[1],"tags":[],"jetpack_featured_media_url":"","_links":{"self":[{"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=\/wp\/v2\/posts\/25580"}],"collection":[{"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=25580"}],"version-history":[{"count":1,"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=\/wp\/v2\/posts\/25580\/revisions"}],"predecessor-version":[{"id":25586,"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=\/wp\/v2\/posts\/25580\/revisions\/25586"}],"wp:attachment":[{"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=25580"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=25580"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=25580"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}