{"id":326,"date":"2018-04-12T21:48:02","date_gmt":"2018-04-12T13:48:02","guid":{"rendered":"http:\/\/www.wuchangsong.com\/?p=326"},"modified":"2021-05-30T14:03:51","modified_gmt":"2021-05-30T06:03:51","slug":"ma%e5%9b%be%e7%bb%98%e5%88%b6","status":"publish","type":"post","link":"http:\/\/www.wuchangsong.com\/?p=326","title":{"rendered":"MA\u56fe\u7ed8\u5236"},"content":{"rendered":"<pre># \u5bfc\u5165ggplot2\u5305\nlibrary(ggplot2)\n\n# \u8bbe\u7f6e\u597d\u5de5\u4f5c\u76ee\u5f55(\u5230\u6570\u636e\u6240\u5728\u76ee\u5f55)\n# \u8bfb\u53d6\u8f93\u5165\u6570\u636e  \"R0-vs-R3.isoforms.filter.tsv\"\ndata = read.table(\"R0-vs-R3.isoforms.filter.tsv\",header=T,row.names=1)\n\n# \u8ba1\u7b97M\u503c\u548cA\u503c,\u5e76\u5c06M\u4f5c\u4e3ay\u8f74\uff0cA\u4f5c\u4e3ax\u8f74\naes = aes(x=(log2(R0_fpkm)+log2(R3_fpkm))\/2,y=log2(R0_fpkm)-log2(R3_fpkm))\n\n# \u7ed8\u5236MAplot\nggplot(data=data,aes) + geom_point(aes(color=significant))\n\n# \u6dfb\u52a0\u8f85\u52a9\u7ebf\nggplot(data=data,aes) + geom_hline(yintersect=0,linetype=4,color=\"blue\") + \ngeom_point(aes(color=significant))\n\n# \u6539\u53d8\u70b9\u7684\u5927\u5c0f\nmaplot = ggplot(data=data,aes) + geom_hline(yintercept=0,linetype=4,color=\"blue\") + \ngeom_point(aes(color=significant),size=1)\n\n# \u8bbe\u7f6e\u81ea\u5b9a\u4e49\u67d3\u8272\nmaplot + scale_color_manual(values=c(\"green\",\"black\",\"red\"))\n\n# \u8bbe\u7f6e\u6807\u9898\nmaplot + scale_color_manual(values=c(\"green\",\"black\",\"red\")) + \nlabs(title=\"MAplot of R0-vs-R3\",x=\"A\",y=\"M\")\n\n# \u4fdd\u5b58MAplot\nggsave(\"R0-vs-R3.MAplot.png\",width=8,height=6)<\/pre>\n","protected":false},"excerpt":{"rendered":"<p># \u5bfc\u5165ggplot2\u5305 library(ggplot2) # \u8bbe\u7f6e\u597d\u5de5\u4f5c\u76ee\u5f55(\u5230\u6570\u636e\u6240\u5728\u76ee\u5f55) # \u8bfb\u53d6\u8f93\u5165\u6570\u636e &#8220;R0-vs-R3.isoforms.filter.tsv&#8221; data = read.table(&#8220;R0-vs-R3.isoforms.filter.tsv&#8221;,header=T,row.names=1) # \u8ba1\u7b97M\u503c\u548cA\u503c,\u5e76\u5c06M\u4f5c\u4e3ay\u8f74\uff0cA\u4f5c\u4e3ax\u8f74 aes = aes(x=(log2(R0_fpkm)+log2(R3_fpkm))\/2,y=log2(R0_fpkm)-log2(R3_fpkm)) # \u7ed8\u5236MAplot ggplot(data=data,aes) + geom_point(aes(color=significant)) # \u6dfb\u52a0\u8f85\u52a9\u7ebf ggplot(data=data,aes) + geom_hline(yintersect=0,linetype=4,color=&#8221;blue&#8221;) + geom_point(aes(color=significant)) # \u6539\u53d8\u70b9\u7684\u5927\u5c0f maplot = ggplot(data=data,aes) + geom_hline(yintercept=0,linetype=4,color=&#8221;blue&#8221;) + geom_point(aes(color=significant),size=1) # \u8bbe\u7f6e\u81ea\u5b9a\u4e49\u67d3\u8272 maplot + scale_color_manual(values=c(&#8220;green&#8221;,&#8221;black&#8221;,&#8221;red&#8221;)) # \u8bbe\u7f6e\u6807\u9898 maplot + scale_color_manual(values=c(&#8220;green&#8221;,&#8221;black&#8221;,&#8221;red&#8221;)) + labs(title=&#8221;MAplot of R0-vs-R3&#8243;,x=&#8221;A&#8221;,y=&#8221;M&#8221;) # \u4fdd\u5b58MAplot ggsave(&#8220;R0-vs-R3.MAplot.png&#8221;,width=8,height=6)<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[10],"tags":[],"_links":{"self":[{"href":"http:\/\/www.wuchangsong.com\/index.php?rest_route=\/wp\/v2\/posts\/326"}],"collection":[{"href":"http:\/\/www.wuchangsong.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/www.wuchangsong.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/www.wuchangsong.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/www.wuchangsong.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=326"}],"version-history":[{"count":3,"href":"http:\/\/www.wuchangsong.com\/index.php?rest_route=\/wp\/v2\/posts\/326\/revisions"}],"predecessor-version":[{"id":772,"href":"http:\/\/www.wuchangsong.com\/index.php?rest_route=\/wp\/v2\/posts\/326\/revisions\/772"}],"wp:attachment":[{"href":"http:\/\/www.wuchangsong.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=326"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.wuchangsong.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=326"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.wuchangsong.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=326"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}