亚洲精品久久久久久第一页-人妻少妇精彩视品一区二区三区-91国产自拍免费视频-免费一级a在线播放视频正片-少妇天天日天天射天天爽-国产大屁股喷水视频在线观看-操美女骚穴抽插性爱视频-亚洲 欧美 中文字幕 丝袜-成人免费无码片在线观看

SCI文章中的棒棒糖圖如何使用R語(yǔ)言繪制?


SCI文章中的棒棒糖圖如何使用R語(yǔ)言繪制?

文章插圖
背景介紹棒棒糖圖,其實(shí)就是一個(gè)垂線圖,目前使用的人還比較多 。該圖形打破傳統(tǒng)的柱狀圖的形式,采用散點(diǎn)和垂線結(jié)合,形狀看起來(lái)像棒棒糖一樣 。在一些SCI文章中還比較多,我們今天來(lái)使用R語(yǔ)言來(lái)實(shí)現(xiàn)一下 。


軟件介紹R
RStudio


繪圖教程1.打開(kāi)RStudio,我們首先加載需要的包 。一般我會(huì)直接加載tidyverse,這是一個(gè)數(shù)據(jù)處理和繪圖的包的集合,基本上加載了這個(gè),數(shù)據(jù)處理繪圖都可以了
# 加載包library(tidyverse)
2.我們構(gòu)建一個(gè)數(shù)據(jù)框用于進(jìn)行繪圖
data <- data.frame(name=c("n_a","n_b","n_c","n_d","n_e"),value=https://www.520longzhigu.com/shenghuo/c(2.1,2.3,3.2,2.9,4.5))
3.使用ggplot包進(jìn)行繪圖
  • 采用geom_point()進(jìn)行散點(diǎn)的繪制
  • 采用geom_segment()進(jìn)行直線的繪制,事實(shí)上,該函數(shù)是用來(lái)繪制矩形的,因此這里x和xend是相同的,只改變y的值
ggplot(data,aes(name,value))+geom_point()+geom_segment(aes(x=name,xend=name,y=0,yend=value))
4.進(jìn)一步,我們對(duì)圖形進(jìn)行美化
  • 對(duì)圖形的點(diǎn)進(jìn)行更改,包括顏色,透明度
  • 對(duì)線進(jìn)行更改,包括顏色,線型,粗細(xì)
ggplot(data,aes(name,value))+geom_point(size=5, color="red", fill=alpha("orange", 0.3),alpha=0.7, shape=21, stroke=3)+geom_segment(aes(x=name,xend=name,y=0,yend=value),size=1, color="blue", linetype="dotdash")
5.最后,對(duì)主題和標(biāo)簽進(jìn)行美化即可
ggplot(data,aes(name,value))+geom_point(size=6, color="red", fill=alpha("orange", 0.3),alpha=0.7, shape=21, stroke=3)+geom_segment(aes(x=name,xend=name,y=0,yend=value),size=1.5, color="blue", linetype="dotdash")+theme(panel.background = element_rect(fill="#F0E9D2",colour = "black",size = 2),text = element_text(size=18))
6.當(dāng)然,你也可以將橫縱坐標(biāo)翻轉(zhuǎn)
ggplot(data,aes(name,value))+geom_point(size=6, color="red", fill=alpha("orange", 0.3),alpha=0.7, shape=21, stroke=3)+geom_segment(aes(x=name,xend=name,y=0,yend=value),size=1.5, color="blue", linetype="dotdash")+theme(panel.background = element_rect(fill="#F0E9D2",colour = "black",size = 2),text = element_text(size=18))+coord_flip()
【SCI文章中的棒棒糖圖如何使用R語(yǔ)言繪制?】7.好了,趕緊來(lái)學(xué)習(xí)一下吧!


    以上關(guān)于本文的內(nèi)容,僅作參考!溫馨提示:如遇健康、疾病相關(guān)的問(wèn)題,請(qǐng)您及時(shí)就醫(yī)或請(qǐng)專(zhuān)業(yè)人士給予相關(guān)指導(dǎo)!

    「愛(ài)刨根生活網(wǎng)」www.malaban59.cn小編還為您精選了以下內(nèi)容,希望對(duì)您有所幫助: