{"id":24101,"date":"2024-01-10T17:23:13","date_gmt":"2024-01-10T09:23:13","guid":{"rendered":"http:\/\/www.biocloudservice.com\/wordpress\/?p=24101"},"modified":"2024-01-10T17:23:14","modified_gmt":"2024-01-10T09:23:14","slug":"%e6%ac%a2%e8%bf%8e%e6%9d%a5%e5%88%b0ggplot2%e7%9a%84%e4%b8%96%e7%95%8c-%e5%a0%86%e5%8f%a0%e6%9f%b1%e7%8a%b6%e5%9b%be","status":"publish","type":"post","link":"http:\/\/www.biocloudservice.com\/wordpress\/?p=24101","title":{"rendered":"\u6b22\u8fce\u6765\u5230ggplot2\u7684\u4e16\u754c\u2014\u2014\u5806\u53e0\u67f1\u72b6\u56fe"},"content":{"rendered":"\n<p>\u4eca\u5929\u5c0f\u679c\u7528ggplot2\u7ed8\u5236\u4e86\u57fa\u56e0\u8868\u8fbe\u91cf\u7684\u5806\u53e0\u67f1\u72b6\u56fe\uff0c\u987e\u540d\u601d\u4e49\uff0c\u5806\u79ef\u67f1\u72b6\u56fe\uff0c\u662f\u6bcf\u7ec4\u7684\u6570\u636e\u90fd\u5806\u53e0\u5728\u540c\u4e00\u6761\u67f1\u5b50\u4e0a\u3002<\/p>\n\n\n\n<p>ggplot2\u662f\u4e00\u4e2a\u7528\u6765\u7ed8\u5236\u7edf\u8ba1\u56fe\u5f62\uff08\u6216\u79f0\u4e3a\u6570\u636e\u56fe\u5f62\uff09\u7684R\u8f6f\u4ef6\u5305\u3002\u4e0e\u5176\u4ed6\u5927\u591a\u6570\u7684\u56fe\u5f62\u8f6f\u4ef6\u5305\u4e0d\u540c\uff0cggplot2\u662f\u7531\u5176\u80cc\u540e\u7684\u4e00\u5957\u56fe\u5f62\u8bed\u6cd5\u6240\u652f\u6301\u7684\u3002\u8fd9\u4e00\u8bed\u6cd5\u57fa\u4e8e\u300aGrammar of Graphics\u300b\uff08Wilkinson\uff0c2005\uff09\u4e00\u4e66\uff0c\u5b83\u7531\u4e00\u7cfb\u5217\u72ec\u7acb\u7684\u56fe\u5f62\u90e8\u4ef6\u7ec4\u6210\uff0c\u5e76\u80fd\u4ee5\u8bb8\u591a\u79cd\u4e0d\u540c\u7684\u65b9\u5f0f\u7ec4\u5408\u8d77\u6765\u3002\u8fd9\u4e00\u70b9\u4f7f\u5f97ggplot2 \u7684\u529f\u80fd\u975e\u5e38\u5f3a\u5927\uff0c\u56e0\u4e3a\u5b83\u4e0d\u4f1a\u5c40\u9650\u4e8e\u4e00\u4e9b\u5df2\u7ecf\u5b9a\u4e49\u597d\u7684\u7edf\u8ba1\u56fe\u5f62\uff0c\u800c\u662f\u53ef\u4ee5\u6839\u636e\u4f60\u7684\u9700\u8981\u91cf\u8eab\u5b9a\u505a\u3002\u8fd9\u542c\u8d77\u6765\u4f3c\u4e4e\u6709\u4e9b\u56f0\u96be\uff0c\u4f46\u5b9e\u9645\u4e0a\u53ea\u9700\u8981\u638c\u63e1\u4e00\u4e9b\u6838\u5fc3\u51c6\u5219\u4ee5\u53ca\u5c11\u8bb8\u7279\u4f8b\uff0c\u4eca\u5929\u5c0f\u679c\u5c31\u4ee5\u7ed8\u5236\u5806\u53e0\u67f1\u72b6\u56fe\u4e3a\u4f8b\uff0c\u4e00\u8d77\u548c\u5c0f\u4f19\u4f34\u8d70\u8fdbggplot2\u7684\u4e16\u754c\u3002<\/p>\n\n\n\n<p>ggplot2 \u53ef\u4ee5\u7ed8\u5236\u51fa\u5f88\u591a\u7f8e\u89c2\u7684\u56fe\u5f62\uff0c\u540c\u65f6\u80fd\u907f\u514d\u8bf8\u591a\u7e41\u7410\u7684\u7ec6\u8282\uff0c\u4f8b\u5982\u6dfb\u52a0\u56fe\u4f8b\u7b49\u3002\u7528ggplot2 \u7ed8\u56fe\u65f6\uff0c\u56fe\u5f62\u7684\u6bcf\u4e2a\u90e8\u5206\u53ef\u4ee5\u4f9d\u6b21\u8fdb\u884c\u6784\u5efa\uff0c\u4e4b\u540e\u8fd8\u53ef\u4ee5\u8fdb\u884c\u7f16\u8f91\u3002ggplot2 \u7cbe\u5fc3\u6311\u9009\u4e86\u4e00\u7cfb\u5217\u9884\u8bbe\u56fe\u5f62\uff0c\u56e0\u6b64\u5728\u5927\u90e8\u5206\u7684\u60c5\u5f62\u4e0b\u4f60\u53ef\u4ee5\u5feb\u901f\u5730\u7ed8\u5236\u51fa\u8bb8\u591a\u9ad8\u8d28\u91cf\u7684\u56fe\u5f62\u3002\u5982\u679c\u5728\u683c\u5f0f\u4e0a\u8fd8\u6709\u989d\u5916\u7684\u9700\u6c42\uff0c\u4e5f\u53ef\u4ee5\u5229\u7528 ggplot2\u4e2d\u7684\u4e3b\u9898\u7cfb\u7edf\u6765\u8fdb\u884c\u5b9a\u5236\u3002\u8fd9\u6837\uff0c\u4f60\u5c06\u65e0\u9700\u82b1\u8d39\u592a\u591a\u65f6\u95f4\u6765\u8c03\u6574\u56fe\u5f62\u7684\u5916\u89c2\uff0c\u800c\u53ef\u4ee5\u66f4\u52a0\u4e13\u6ce8\u5730\u7528\u56fe\u5f62\u6765\u5c55\u793a\u4f60\u7684\u6570\u636e\u3002\u4f46\u5c0f\u4f19\u4f34\u4eec\u53ef\u80fd\u9700\u8981\u82b1\u8d39\u4e00\u4e9b\u65f6\u95f4\u6765\u548c\u5c0f\u679c\u4e00\u8d77\u5b66\u4e60\uff0cggplot2\u8fd8\u662f\u5f88\u5bb9\u6613\u5b66\u4e60\u7684\u3002<\/p>\n\n\n\n<p>\u9996\u5148\u5c0f\u679c\u7ed9\u5c0f\u4f19\u4f34\u4eec\u4ecb\u7ecd\u4e0b\u8f93\u5165\u7684\u6570\u636e<\/p>\n\n\n\n<p>&#8220;count.csv&#8221;\u5305\u542b2\u4e2a\u7ef4\u5ea6\u7684\u6570\u636e\u3002\u6bcf\u4e00\u5217\u662f\u4e00\u7c07\u67f1\u5b50\uff0c\u6bcf\u4e00\u884c\u4e0d\u540c\u7684\u989c\u8272\u56fe\u4f8b\u533a\u5206\u3002<\/p>\n\n\n\n<figure class=\"wp-block-image\"><img decoding=\"async\" loading=\"lazy\" width=\"640\" height=\"81\" src=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?resize=640%2C81\" alt=\"\" class=\"wp-image-24102\" srcset=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?w=1918 1918w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?resize=300%2C38 300w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?resize=1024%2C129 1024w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?resize=768%2C97 768w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?resize=1536%2C194 1536w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?resize=600%2C76 600w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?w=1280 1280w\" sizes=\"(max-width: 640px) 100vw, 640px\" data-recalc-dims=\"1\" \/><\/figure>\n\n\n\n<p>\u8bdd\u4e0d\u591a\u8bf4\uff0c\u76f4\u63a5\u4e0a\u4ee3\u7801<\/p>\n\n\n\n<p>#\u52a0\u8f7dR\u5305\uff0c\u6ca1\u6709\u5b89\u88c5\u8bf7\u5148\u5b89\u88c5install.packages(&#8220;\u5305\u540d&#8221;)<\/p>\n\n\n\n<p>library(ggplot2)<\/p>\n\n\n\n<p>library(RColorBrewer)<\/p>\n\n\n\n<p>library(reshape2)<\/p>\n\n\n\n<p>#\u8bbe\u7f6e\u8def\u5f84<\/p>\n\n\n\n<p>setwd(&#8216;D:\\\\\u6570\u636e\\\\\u8868\u8fbe\u91cf\u67f1\u72b6\u56fe&#8217;)<\/p>\n\n\n\n<p>#\u5bfc\u5165\u6570\u636e<\/p>\n\n\n\n<p>mydata &lt;- read.csv(&#8220;count.csv&#8221;)<\/p>\n\n\n\n<p># \u8f6c\u5316\u6570\u636e\u683c\u5f0f<\/p>\n\n\n\n<p>data&lt;-melt(mydata,id.vars=&#8217;Count&#8217;)<\/p>\n\n\n\n<p>data$Count &lt;- factor(data$Count, levels=c(&#8220;&gt;1000&#8243;,&#8221;500-1000&#8243;,&#8221;100-500&#8243;,&#8221;1-100&#8243;,&#8221;0-1&#8221;))<\/p>\n\n\n\n<p>#\u7ed8\u5236\u5806\u79ef\u67f1\u72b6\u56fe<\/p>\n\n\n\n<p>p &lt;- ggplot(data=data,aes(variable,value,fill=Count))+<\/p>\n\n\n\n<p>scale_fill_discrete(limits=c(&#8220;&gt;1000&#8243;,&#8221;500-1000&#8243;,&#8221;100-500&#8243;,&#8221;1-100&#8243;,&#8221;0-1&#8221;))+<\/p>\n\n\n\n<p>#\u8fd9\u91cc\u7684\u5c0f\u77e5\u8bc6\u70b9\u662f\u8c03\u6574\u56fe\u4f8b\u7684\u987a\u5e8f\u53ef\u4ee5\u4f7f\u7528\u51fd\u6570scale_fill_discrete(limits=c(&#8220;&gt;1000&#8243;,&#8221;500-1000&#8243;,&#8221;100-500&#8243;,&#8221;1-100&#8243;,&#8221;0-1&#8221;))<\/p>\n\n\n\n<p>#\u5982\u679c\u662f\u9488\u5bf9\u5206\u7ec4\u7684\u67f1\u5f62\u56fe\uff0c\u5219position\u9664\u4e86\u53ef\u4ee5&#8221;identity&#8221;(\u4e0d\u8c03\u6574\uff0c\u7ec4\u5185\u524d\u540e\u91cd\u53e0)\u3001\u8fd8\u5305\u62ec\u201cstack\u201c\uff08\u5806\u79ef\uff0c\u9ed8\u8ba4\uff09\uff1b&#8221;fill&#8221;(\u6309\u6bd4\u4f8b\u5806\u79ef)\uff1b\u201cdodge\u201c\uff08\u5206\u6563\u5f00\uff09<\/p>\n\n\n\n<p>geom_bar(stat=&#8221;identity&#8221;,position=&#8221;stack&#8221;, color=&#8221;black&#8221;, width=0.55,size=0.4)+<\/p>\n\n\n\n<p>#\u8bbe\u7f6e\u5806\u53e0\u67f1\u72b6\u56fe\u989c\u8272<\/p>\n\n\n\n<p>scale_fill_manual(values=c(&#8220;#354e97&#8221;, &#8220;#70a3c4&#8221;, &#8220;#c7e5ec&#8221;,&#8221;#f5b46f&#8221;,&#8221;#df5b3f&#8221;))+<\/p>\n\n\n\n<p># \u6dfb\u52a0x\uff0cy\u8f74\u540d<\/p>\n\n\n\n<p>labs(x = &#8220;lncRNA&#8221;,y = &#8220;Number of genes&#8221;)+<\/p>\n\n\n\n<p># \u5750\u6807\u8f74\u5ef6\u4f38\uff0c\u786e\u4fdd\u56fe\u5f62\u5143\u7d20\u8986\u76d6\u81f3\u5750\u6807<\/p>\n\n\n\n<p>scale_y_continuous(expand = c(0,0))+<\/p>\n\n\n\n<p># \u4e3b\u9898\u7c7b\u578b<\/p>\n\n\n\n<p>theme_classic()+<\/p>\n\n\n\n<p># \u8bbe\u7f6e\u4e3b\u9898<\/p>\n\n\n\n<p>theme(panel.background=element_rect(fill=&#8221;white&#8221;,colour=&#8221;white&#8221;,size=0.25), # \u586b\u5145\u6846\u5185\u4e3b\u9898\u989c\u8272\uff0c\u8fb9\u6846\u989c\u8272\u548c\u8fb9\u6846\u7ebf\u6761\u7c97\u7ec6\uff0c\u8bbe\u7f6e\u56fa\u5b9a\u4e3b\u9898\u4e3a\u4f20\u7edf\u7684\u767d\u8272\u80cc\u666f\u548c\u767d\u8272\u7684\u7f51\u683c\u7ebf&nbsp;<\/p>\n\n\n\n<p>axis.line=element_line(colour=&#8221;black&#8221;,size=0.25), # x,y\u8f74\u989c\u8272\uff0c\u7c97\u7ec6<\/p>\n\n\n\n<p>axis.title=element_text(size=11,color=&#8221;black&#8221;), # x,y\u8f74\u540d\u8bbe\u7f6e<\/p>\n\n\n\n<p>axis.text = element_text(size=8,color=&#8221;black&#8221;), # x,y\u8f74\u6587\u672c\u8bbe\u7f6e<\/p>\n\n\n\n<p>legend.position= c(0.7,0.65) # \u663e\u793a\u56fe\u4f8b\uff0cc(x,y)\u8fd9\u91cc\u6307\u5c06\u8f74\u9ed8\u8ba4\u4e3a1\uff0c\u91cc\u9762\u7684\u6570\u5b57\u4e3a\u8f74\u7684\u5360\u6bd4)<\/p>\n\n\n\n<p>p_right=p+theme(legend.position = &#8220;right&#8221;)<\/p>\n\n\n\n<p>p_right<\/p>\n\n\n\n<p>#\u8bb0\u5f97\u5148\u628a\u56fe\u7247\u4fdd\u5b58\u5230p_right<\/p>\n\n\n\n<p>#png\uff0cpdf\uff0cjpg\u4e09\u79cd\u56fe\u7247\u683c\u5f0f\u4fdd\u5b58<\/p>\n\n\n\n<p>ggsave(&#8220;\u8868\u8fbe\u91cf\u67f1\u72b6\u56fe.png&#8221;,width = 10,height = 3,dpi=2000)<\/p>\n\n\n\n<p>ggsave(&#8220;\u8868\u8fbe\u91cf\u67f1\u72b6\u56fe.pdf&#8221;,width = 10,height = 3,dpi=2000)<\/p>\n\n\n\n<p>ggsave(&#8220;\u8868\u8fbe\u91cf\u67f1\u72b6\u56fe.jpg&#8221;,width = 10,height = 3,dpi=2000)<\/p>\n\n\n\n<p><img decoding=\"async\" src=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-2.png?w=640\" data-recalc-dims=\"1\"><strong>\u5728\u5de5\u4f5c\u76ee\u5f55\u67e5\u770b\u521a\u521a\u4fdd\u5b58\u7684\u6587\u4ef6<\/strong><\/p>\n\n\n\n<figure class=\"wp-block-image\"><img decoding=\"async\" loading=\"lazy\" width=\"640\" height=\"192\" src=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?resize=640%2C192\" alt=\"\" class=\"wp-image-24104\" srcset=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?w=2493 2493w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?resize=300%2C90 300w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?resize=1024%2C308 1024w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?resize=768%2C231 768w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?resize=1536%2C461 1536w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?resize=2048%2C615 2048w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?resize=600%2C180 600w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?w=1280 1280w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?w=1920 1920w\" sizes=\"(max-width: 640px) 100vw, 640px\" data-recalc-dims=\"1\" \/><\/figure>\n\n\n\n<p>\u4f7f\u7528ggplot2 \u7ed8\u5236\u5806\u53e0\u67f1\u5f62\u56fe\u7684\u5185\u5bb9\u53ca\u56fe\u7247\u7f8e\u5316\u7684\u5185\u5bb9\u4e3b\u8981\u5c31\u662f\u8fd9\u4e9b\uff0c\u4e0d\u80fd\u8bf4\u5f88\u5168\uff0c\u4f46\u662f\u591f\u7528\uff0c\u5176\u5b9e\u4f7f\u7528ggplot2\u7ed8\u5236\u5176\u4ed6\u7c7b\u578b\u7684\u56fe\u7247\uff0c\u4e5f\u4e3b\u8981\u662f\u4fee\u6539\u8fd9\u4e9b\u5185\u5bb9\uff0c\u6240\u4ee5\u8981\u5b66\u4f1a\u4e3e\u4e00\u53cd\u4e09\u3002\u52a0\u6cb9\uff01<\/p>\n\n\n\n<p><strong>\u4e0d\u60f3\u5199\u4ee3\u7801\uff1f\u53ef\u4ee5\u7528\u6211\u4eec\u7684\u5de5\u5177\u4e91\u751f\u4fe1\u5e73\u53f0\u5728\u7ebf\u7ed8\u5236\u5806\u79ef\u67f1\u5f62\u56fe\u3002<\/strong><\/p>\n\n\n\n<p><strong>\u7f51\u5740\uff1a&nbsp;&nbsp;<a href=\"http:\/\/www.biocloudservice.com\/home.html&quot; \\t &quot;_blank\">http:\/\/www.biocloudservice.com\/home.html<\/a><\/strong><\/p>\n\n\n\n<p>\u8c22\u8c22\u4f60\u7684\u9605\u8bfb\uff0c\u8bf7\u671f\u5f85\u5c0f\u679c\u7684\u4e0b\u4e00\u671f\u5206\u4eab<\/p>\n\n\n<p><strong>\u6b22\u8fce\u6765\u5230ggplot2\u7684\u4e16\u754c\u2014\u2014\u5806\u53e0\u67f1\u72b6\u56fe<\/strong><\/p>\n<p>\u4eca\u5929\u5c0f\u679c\u7528ggplot2\u7ed8\u5236\u4e86\u57fa\u56e0\u8868\u8fbe\u91cf\u7684\u5806\u53e0\u67f1\u72b6\u56fe\uff0c\u987e\u540d\u601d\u4e49\uff0c\u5806\u79ef\u67f1\u72b6\u56fe\uff0c\u662f\u6bcf\u7ec4\u7684\u6570\u636e\u90fd\u5806\u53e0\u5728\u540c\u4e00\u6761\u67f1\u5b50\u4e0a\u3002<\/p>\n<p>ggplot2\u662f\u4e00\u4e2a\u7528\u6765\u7ed8\u5236\u7edf\u8ba1\u56fe\u5f62\uff08\u6216\u79f0\u4e3a\u6570\u636e\u56fe\u5f62\uff09\u7684R\u8f6f\u4ef6\u5305\u3002\u4e0e\u5176\u4ed6\u5927\u591a\u6570\u7684\u56fe\u5f62\u8f6f\u4ef6\u5305\u4e0d\u540c\uff0cggplot2\u662f\u7531\u5176\u80cc\u540e\u7684\u4e00\u5957\u56fe\u5f62\u8bed\u6cd5\u6240\u652f\u6301\u7684\u3002\u8fd9\u4e00\u8bed\u6cd5\u57fa\u4e8e\u300aGrammar of Graphics\u300b\uff08Wilkinson\uff0c2005\uff09\u4e00\u4e66\uff0c\u5b83\u7531\u4e00\u7cfb\u5217\u72ec\u7acb\u7684\u56fe\u5f62\u90e8\u4ef6\u7ec4\u6210\uff0c\u5e76\u80fd\u4ee5\u8bb8\u591a\u79cd\u4e0d\u540c\u7684\u65b9\u5f0f\u7ec4\u5408\u8d77\u6765\u3002\u8fd9\u4e00\u70b9\u4f7f\u5f97ggplot2 \u7684\u529f\u80fd\u975e\u5e38\u5f3a\u5927\uff0c\u56e0\u4e3a\u5b83\u4e0d\u4f1a\u5c40\u9650\u4e8e\u4e00\u4e9b\u5df2\u7ecf\u5b9a\u4e49\u597d\u7684\u7edf\u8ba1\u56fe\u5f62\uff0c\u800c\u662f\u53ef\u4ee5\u6839\u636e\u4f60\u7684\u9700\u8981\u91cf\u8eab\u5b9a\u505a\u3002\u8fd9\u542c\u8d77\u6765\u4f3c\u4e4e\u6709\u4e9b\u56f0\u96be\uff0c\u4f46\u5b9e\u9645\u4e0a\u53ea\u9700\u8981\u638c\u63e1\u4e00\u4e9b\u6838\u5fc3\u51c6\u5219\u4ee5\u53ca\u5c11\u8bb8\u7279\u4f8b\uff0c\u4eca\u5929\u5c0f\u679c\u5c31\u4ee5\u7ed8\u5236\u5806\u53e0\u67f1\u72b6\u56fe\u4e3a\u4f8b\uff0c\u4e00\u8d77\u548c\u5c0f\u4f19\u4f34\u8d70\u8fdbggplot2\u7684\u4e16\u754c\u3002<\/p>\n<p>ggplot2 \u53ef\u4ee5\u7ed8\u5236\u51fa\u5f88\u591a\u7f8e\u89c2\u7684\u56fe\u5f62\uff0c\u540c\u65f6\u80fd\u907f\u514d\u8bf8\u591a\u7e41\u7410\u7684\u7ec6\u8282\uff0c\u4f8b\u5982\u6dfb\u52a0\u56fe\u4f8b\u7b49\u3002\u7528ggplot2 \u7ed8\u56fe\u65f6\uff0c\u56fe\u5f62\u7684\u6bcf\u4e2a\u90e8\u5206\u53ef\u4ee5\u4f9d\u6b21\u8fdb\u884c\u6784\u5efa\uff0c\u4e4b\u540e\u8fd8\u53ef\u4ee5\u8fdb\u884c\u7f16\u8f91\u3002ggplot2 \u7cbe\u5fc3\u6311\u9009\u4e86\u4e00\u7cfb\u5217\u9884\u8bbe\u56fe\u5f62\uff0c\u56e0\u6b64\u5728\u5927\u90e8\u5206\u7684\u60c5\u5f62\u4e0b\u4f60\u53ef\u4ee5\u5feb\u901f\u5730\u7ed8\u5236\u51fa\u8bb8\u591a\u9ad8\u8d28\u91cf\u7684\u56fe\u5f62\u3002\u5982\u679c\u5728\u683c\u5f0f\u4e0a\u8fd8\u6709\u989d\u5916\u7684\u9700\u6c42\uff0c\u4e5f\u53ef\u4ee5\u5229\u7528 ggplot2\u4e2d\u7684\u4e3b\u9898\u7cfb\u7edf\u6765\u8fdb\u884c\u5b9a\u5236\u3002\u8fd9\u6837\uff0c\u4f60\u5c06\u65e0\u9700\u82b1\u8d39\u592a\u591a\u65f6\u95f4\u6765\u8c03\u6574\u56fe\u5f62\u7684\u5916\u89c2\uff0c\u800c\u53ef\u4ee5\u66f4\u52a0\u4e13\u6ce8\u5730\u7528\u56fe\u5f62\u6765\u5c55\u793a\u4f60\u7684\u6570\u636e\u3002\u4f46\u5c0f\u4f19\u4f34\u4eec\u53ef\u80fd\u9700\u8981\u82b1\u8d39\u4e00\u4e9b\u65f6\u95f4\u6765\u548c\u5c0f\u679c\u4e00\u8d77\u5b66\u4e60\uff0cggplot2\u8fd8\u662f\u5f88\u5bb9\u6613\u5b66\u4e60\u7684\u3002<\/p>\n<p>\u9996\u5148\u5c0f\u679c\u7ed9\u5c0f\u4f19\u4f34\u4eec\u4ecb\u7ecd\u4e0b\u8f93\u5165\u7684\u6570\u636e<\/p>\n<p>&#8220;count.csv&#8221;\u5305\u542b2\u4e2a\u7ef4\u5ea6\u7684\u6570\u636e\u3002\u6bcf\u4e00\u5217\u662f\u4e00\u7c07\u67f1\u5b50\uff0c\u6bcf\u4e00\u884c\u4e0d\u540c\u7684\u989c\u8272\u56fe\u4f8b\u533a\u5206\u3002<\/p>\n<p><img decoding=\"async\" loading=\"lazy\" width=\"640\" height=\"81\" class=\"wp-image-24102\" src=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?resize=640%2C81\" srcset=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?w=1918 1918w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?resize=300%2C38 300w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?resize=1024%2C129 1024w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?resize=768%2C97 768w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?resize=1536%2C194 1536w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?resize=600%2C76 600w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-1.png?w=1280 1280w\" sizes=\"(max-width: 640px) 100vw, 640px\" data-recalc-dims=\"1\" \/><\/p>\n<p>\u8bdd\u4e0d\u591a\u8bf4\uff0c\u76f4\u63a5\u4e0a\u4ee3\u7801<\/p>\n<p>#\u52a0\u8f7dR\u5305\uff0c\u6ca1\u6709\u5b89\u88c5\u8bf7\u5148\u5b89\u88c5install.packages(&#8220;\u5305\u540d&#8221;)<\/p>\n<p>library(ggplot2)<\/p>\n<p>library(RColorBrewer)<\/p>\n<p>library(reshape2)<\/p>\n<p>#\u8bbe\u7f6e\u8def\u5f84<\/p>\n<p>setwd(&#8216;D:\\\\\u6570\u636e\\\\\u8868\u8fbe\u91cf\u67f1\u72b6\u56fe&#8217;)<\/p>\n<p>#\u5bfc\u5165\u6570\u636e<\/p>\n<p>mydata &lt;- read.csv(&#8220;count.csv&#8221;)<\/p>\n<p># \u8f6c\u5316\u6570\u636e\u683c\u5f0f<\/p>\n<p>data&lt;-melt(mydata,id.vars=&#8217;Count&#8217;)<\/p>\n<p>data$Count &lt;- factor(data$Count, levels=c(&#8220;&gt;1000&#8243;,&#8221;500-1000&#8243;,&#8221;100-500&#8243;,&#8221;1-100&#8243;,&#8221;0-1&#8221;))<\/p>\n<p>#\u7ed8\u5236\u5806\u79ef\u67f1\u72b6\u56fe<\/p>\n<p>p &lt;- ggplot(data=data,aes(variable,value,fill=Count))+<\/p>\n<p>scale_fill_discrete(limits=c(&#8220;&gt;1000&#8243;,&#8221;500-1000&#8243;,&#8221;100-500&#8243;,&#8221;1-100&#8243;,&#8221;0-1&#8221;))+<\/p>\n<p>#\u8fd9\u91cc\u7684\u5c0f\u77e5\u8bc6\u70b9\u662f\u8c03\u6574\u56fe\u4f8b\u7684\u987a\u5e8f\u53ef\u4ee5\u4f7f\u7528\u51fd\u6570scale_fill_discrete(limits=c(&#8220;&gt;1000&#8243;,&#8221;500-1000&#8243;,&#8221;100-500&#8243;,&#8221;1-100&#8243;,&#8221;0-1&#8221;))<\/p>\n<p>#\u5982\u679c\u662f\u9488\u5bf9\u5206\u7ec4\u7684\u67f1\u5f62\u56fe\uff0c\u5219position\u9664\u4e86\u53ef\u4ee5&#8221;identity&#8221;(\u4e0d\u8c03\u6574\uff0c\u7ec4\u5185\u524d\u540e\u91cd\u53e0)\u3001\u8fd8\u5305\u62ec\u201cstack\u201c\uff08\u5806\u79ef\uff0c\u9ed8\u8ba4\uff09\uff1b&#8221;fill&#8221;(\u6309\u6bd4\u4f8b\u5806\u79ef)\uff1b\u201cdodge\u201c\uff08\u5206\u6563\u5f00\uff09<\/p>\n<p>\u00a0<\/p>\n<p>geom_bar(stat=&#8221;identity&#8221;,position=&#8221;stack&#8221;, color=&#8221;black&#8221;, width=0.55,size=0.4)+<\/p>\n<p>\u00a0<\/p>\n<p>#\u8bbe\u7f6e\u5806\u53e0\u67f1\u72b6\u56fe\u989c\u8272<\/p>\n<p>scale_fill_manual(values=c(&#8220;#354e97&#8221;, &#8220;#70a3c4&#8221;, &#8220;#c7e5ec&#8221;,&#8221;#f5b46f&#8221;,&#8221;#df5b3f&#8221;))+<\/p>\n<p>\u00a0<\/p>\n<p># \u6dfb\u52a0x\uff0cy\u8f74\u540d<\/p>\n<p>\u00a0<\/p>\n<p>labs(x = &#8220;lncRNA&#8221;,y = &#8220;Number of genes&#8221;)+<\/p>\n<p>\u00a0<\/p>\n<p># \u5750\u6807\u8f74\u5ef6\u4f38\uff0c\u786e\u4fdd\u56fe\u5f62\u5143\u7d20\u8986\u76d6\u81f3\u5750\u6807<\/p>\n<p>\u00a0<\/p>\n<p>scale_y_continuous(expand = c(0,0))+<\/p>\n<p>\u00a0<\/p>\n<p># \u4e3b\u9898\u7c7b\u578b<\/p>\n<p>\u00a0<\/p>\n<p>theme_classic()+<\/p>\n<p>\u00a0<\/p>\n<p># \u8bbe\u7f6e\u4e3b\u9898<\/p>\n<p>\u00a0<\/p>\n<p>theme(panel.background=element_rect(fill=&#8221;white&#8221;,colour=&#8221;white&#8221;,size=0.25), # \u586b\u5145\u6846\u5185\u4e3b\u9898\u989c\u8272\uff0c\u8fb9\u6846\u989c\u8272\u548c\u8fb9\u6846\u7ebf\u6761\u7c97\u7ec6\uff0c\u8bbe\u7f6e\u56fa\u5b9a\u4e3b\u9898\u4e3a\u4f20\u7edf\u7684\u767d\u8272\u80cc\u666f\u548c\u767d\u8272\u7684\u7f51\u683c\u7ebf\u00a0<\/p>\n<p>\u00a0<\/p>\n<p>axis.line=element_line(colour=&#8221;black&#8221;,size=0.25), # x,y\u8f74\u989c\u8272\uff0c\u7c97\u7ec6<\/p>\n<p>\u00a0<\/p>\n<p>axis.title=element_text(size=11,color=&#8221;black&#8221;), # x,y\u8f74\u540d\u8bbe\u7f6e<\/p>\n<p>\u00a0<\/p>\n<p>axis.text = element_text(size=8,color=&#8221;black&#8221;), # x,y\u8f74\u6587\u672c\u8bbe\u7f6e<\/p>\n<p>\u00a0<\/p>\n<p>legend.position= c(0.7,0.65) # \u663e\u793a\u56fe\u4f8b\uff0cc(x,y)\u8fd9\u91cc\u6307\u5c06\u8f74\u9ed8\u8ba4\u4e3a1\uff0c\u91cc\u9762\u7684\u6570\u5b57\u4e3a\u8f74\u7684\u5360\u6bd4)<\/p>\n<p>p_right=p+theme(legend.position = &#8220;right&#8221;)<\/p>\n<p>p_right<\/p>\n<p>#\u8bb0\u5f97\u5148\u628a\u56fe\u7247\u4fdd\u5b58\u5230p_right<\/p>\n<p>#png\uff0cpdf\uff0cjpg\u4e09\u79cd\u56fe\u7247\u683c\u5f0f\u4fdd\u5b58<\/p>\n<p>ggsave(&#8220;\u8868\u8fbe\u91cf\u67f1\u72b6\u56fe.png&#8221;,width = 10,height = 3,dpi=2000)<\/p>\n<p>ggsave(&#8220;\u8868\u8fbe\u91cf\u67f1\u72b6\u56fe.pdf&#8221;,width = 10,height = 3,dpi=2000)<\/p>\n<p>ggsave(&#8220;\u8868\u8fbe\u91cf\u67f1\u72b6\u56fe.jpg&#8221;,width = 10,height = 3,dpi=2000)<\/p>\n<p><img decoding=\"async\" loading=\"lazy\" width=\"351\" height=\"128\" class=\"wp-image-24103\" src=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-2.png?resize=351%2C128\" srcset=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-2.png?w=351 351w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-2.png?resize=300%2C109 300w\" sizes=\"(max-width: 351px) 100vw, 351px\" data-recalc-dims=\"1\" \/><strong>\u5728\u5de5\u4f5c\u76ee\u5f55\u67e5\u770b\u521a\u521a\u4fdd\u5b58\u7684\u6587\u4ef6<\/strong><\/p>\n<p><img decoding=\"async\" loading=\"lazy\" width=\"640\" height=\"192\" class=\"wp-image-24104\" src=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?resize=640%2C192\" srcset=\"https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?w=2493 2493w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?resize=300%2C90 300w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?resize=1024%2C308 1024w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?resize=768%2C231 768w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?resize=1536%2C461 1536w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?resize=2048%2C615 2048w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?resize=600%2C180 600w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?w=1280 1280w, https:\/\/i0.wp.com\/www.biocloudservice.com\/wordpress\/wp-content\/uploads\/2024\/01\/word-image-24101-3.png?w=1920 1920w\" sizes=\"(max-width: 640px) 100vw, 640px\" data-recalc-dims=\"1\" \/><\/p>\n<p>\u4f7f\u7528ggplot2 \u7ed8\u5236\u5806\u53e0\u67f1\u5f62\u56fe\u7684\u5185\u5bb9\u53ca\u56fe\u7247\u7f8e\u5316\u7684\u5185\u5bb9\u4e3b\u8981\u5c31\u662f\u8fd9\u4e9b\uff0c\u4e0d\u80fd\u8bf4\u5f88\u5168\uff0c\u4f46\u662f\u591f\u7528\uff0c\u5176\u5b9e\u4f7f\u7528ggplot2\u7ed8\u5236\u5176\u4ed6\u7c7b\u578b\u7684\u56fe\u7247\uff0c\u4e5f\u4e3b\u8981\u662f\u4fee\u6539\u8fd9\u4e9b\u5185\u5bb9\uff0c\u6240\u4ee5\u8981\u5b66\u4f1a\u4e3e\u4e00\u53cd\u4e09\u3002\u52a0\u6cb9\uff01<\/p>\n<p><strong>\u4e0d\u60f3\u5199\u4ee3\u7801\uff1f\u53ef\u4ee5\u7528\u6211\u4eec\u7684\u5de5\u5177\u4e91\u751f\u4fe1\u5e73\u53f0\u5728\u7ebf\u7ed8\u5236\u5806\u79ef\u67f1\u5f62\u56fe\u3002<\/strong><\/p>\n<p><strong>\u7f51\u5740\uff1a\u00a0\u00a0<a href=\"http:\/\/www.biocloudservice.com\/home.html&quot; \\t &quot;_blank\">http:\/\/www.biocloudservice.com\/home.html<\/a><\/strong><\/p>\n<p>\u8c22\u8c22\u4f60\u7684\u9605\u8bfb\uff0c\u8bf7\u671f\u5f85\u5c0f\u679c\u7684\u4e0b\u4e00\u671f\u5206\u4eab<\/p>","protected":false},"excerpt":{"rendered":"<p>\u4eca\u5929\u5c0f\u679c\u7528ggplot2\u7ed8\u5236\u4e86\u57fa\u56e0\u8868\u8fbe\u91cf\u7684\u5806\u53e0\u67f1\u72b6\u56fe\uff0c\u987e\u540d\u601d\u4e49\uff0c\u5806\u79ef\u67f1\u72b6\u56fe\uff0c\u662f\u6bcf\u7ec4\u7684\u6570\u636e\u90fd\u5806\u53e0\u5728\u540c\u4e00\u6761\u67f1\u5b50\u4e0a\u3002 [&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\/24101"}],"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=24101"}],"version-history":[{"count":1,"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=\/wp\/v2\/posts\/24101\/revisions"}],"predecessor-version":[{"id":24105,"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=\/wp\/v2\/posts\/24101\/revisions\/24105"}],"wp:attachment":[{"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=24101"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=24101"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.biocloudservice.com\/wordpress\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=24101"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}