2021-03-08生信技能樹-生信入門D6

生信技能樹2021生信入門線上課筆記航邢,需要結合課程講解服用

常見可視化R包

作圖:base, ggplot2, ggpubr
拼圖:par里的mfrow, grid.arrange, cowplot, customLayout,patchwork
導出:pdf()等三段論, ggsave, eoffice---to pptx

length(unique(mpg$class))#class一列取值的個數(shù)

ggplot2習題

習題.png
ggplot(data = iris,aes(x = Species, y = Sepal.Width)) + 
  geom_violin(aes(fill = Species)) +#用映射設置多個對象
  geom_boxplot()+
  geom_jitter(aes(shape = Species))+#點圖酪术,抖動
  coord_flip()#翻轉(zhuǎn)
#注意圖層順序啤斗,注意圖的合理性

ggpubr 可以兩兩比較

ggpubr.png
library(ggpubr)
ggscatter(iris,x="Sepal.Length",
          y="Petal.Length",
          color="Species")

p <- ggboxplot(iris, x = "Species", 
               y = "Sepal.Length",
               color = "Species", 
               shape = "Species",
               add = "jitter")#可以賦值
p
my_comparisons <- list( c("setosa", "versicolor"), 
                        c("setosa", "virginica"), 
                        c("versicolor", "virginica") )#兩兩比較的列表
p + stat_compare_means(comparisons = my_comparisons)+ # Add pairwise comparisons p-value
  stat_compare_means(label.y = 9) #P值放的位置對應的縱坐標的值

labs()用于設置圖表標題子標題奈揍、坐標名稱等

p <- ggplot(mtcars, aes(mpg, wt, colour = cyl)) + geom_point()
p + labs(colour = "Cylinders")#把顏色標尺的標題設置為Cylinders
p + labs(x = "New x label")#把橫坐標標題設置為New x label

# The plot title appears at the top-left, with the subtitle
# display in smaller text underneath it
#圖表的標題默認設置在左上角蜡感,副標題以小一點的字號出現(xiàn)在主標題下面
p + labs(title = "New plot title")
p + labs(title = "New plot title", subtitle = "A subtitle")

# The caption appears in the bottom-right, and is often used for
# sources, notes or copyright
#圖片說明默認設置在右下角,用于注釋
p + labs(caption = "(based on data from ...)")

# The plot tag appears at the top-left, and is typically used
# for labelling a subplot with a letter.
#圖片在左上角加tag和標題
p + labs(title = "title", tag = "A")

# If you want to remove a label, set it to NULL.
#去掉某個設置薇组,設置為NULL
p + labs(title = "title") + labs(title = NULL)

ggplot(mtcars, aes(mpg, wt, colour = cyl)) + 
  geom_point() + 
  xlab(label = "New x lab") +#設置x軸標題
  ylab(label = "New y lab") + #設置y軸標題
  ggtitle(label = "This is title", subtitle = "This is subtitle")#設置標題和子標題
代碼可運行卻不出圖---因為畫板被占用

dev.off()關閉畫板外臂,多次運行直到null device,再運行律胀,后者dev.new()

一些教程補充

-畫圖合集
http://www.reibang.com/nb/35523479
-配色RColorBrewer
http://www.reibang.com/p/194765c8c17e
-patchwork拼圖
https://mp.weixin.qq.com/s/p7LLLvzR5LPgHhuRGhYQBQ
-ggplot2作圖theme主題設置
https://blog.csdn.net/u014801157/article/details/24372531

最后編輯于
?著作權歸作者所有,轉(zhuǎn)載或內(nèi)容合作請聯(lián)系作者
  • 序言:七十年代末宋光,一起剝皮案震驚了整個濱河市,隨后出現(xiàn)的幾起案子炭菌,更是在濱河造成了極大的恐慌罪佳,老刑警劉巖,帶你破解...
    沈念sama閱讀 219,589評論 6 508
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件黑低,死亡現(xiàn)場離奇詭異赘艳,居然都是意外死亡,警方通過查閱死者的電腦和手機克握,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 93,615評論 3 396
  • 文/潘曉璐 我一進店門蕾管,熙熙樓的掌柜王于貴愁眉苦臉地迎上來,“玉大人菩暗,你說我怎么就攤上這事掰曾。” “怎么了停团?”我有些...
    開封第一講書人閱讀 165,933評論 0 356
  • 文/不壞的土叔 我叫張陵旷坦,是天一觀的道長掏熬。 經(jīng)常有香客問我,道長秒梅,這世上最難降的妖魔是什么旗芬? 我笑而不...
    開封第一講書人閱讀 58,976評論 1 295
  • 正文 為了忘掉前任,我火速辦了婚禮捆蜀,結果婚禮上岗屏,老公的妹妹穿的比我還像新娘。我一直安慰自己漱办,他們只是感情好这刷,可當我...
    茶點故事閱讀 67,999評論 6 393
  • 文/花漫 我一把揭開白布。 她就那樣靜靜地躺著娩井,像睡著了一般暇屋。 火紅的嫁衣襯著肌膚如雪。 梳的紋絲不亂的頭發(fā)上洞辣,一...
    開封第一講書人閱讀 51,775評論 1 307
  • 那天咐刨,我揣著相機與錄音,去河邊找鬼扬霜。 笑死定鸟,一個胖子當著我的面吹牛,可吹牛的內(nèi)容都是我干的著瓶。 我是一名探鬼主播联予,決...
    沈念sama閱讀 40,474評論 3 420
  • 文/蒼蘭香墨 我猛地睜開眼,長吁一口氣:“原來是場噩夢啊……” “哼材原!你這毒婦竟也來了沸久?” 一聲冷哼從身側(cè)響起,我...
    開封第一講書人閱讀 39,359評論 0 276
  • 序言:老撾萬榮一對情侶失蹤余蟹,失蹤者是張志新(化名)和其女友劉穎卷胯,沒想到半個月后,有當?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體威酒,經(jīng)...
    沈念sama閱讀 45,854評論 1 317
  • 正文 獨居荒郊野嶺守林人離奇死亡窑睁,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點故事閱讀 38,007評論 3 338
  • 正文 我和宋清朗相戀三年,在試婚紗的時候發(fā)現(xiàn)自己被綠了葵孤。 大學時的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片担钮。...
    茶點故事閱讀 40,146評論 1 351
  • 序言:一個原本活蹦亂跳的男人離奇死亡,死狀恐怖佛呻,靈堂內(nèi)的尸體忽然破棺而出裳朋,到底是詐尸還是另有隱情,我是刑警寧澤吓著,帶...
    沈念sama閱讀 35,826評論 5 346
  • 正文 年R本政府宣布鲤嫡,位于F島的核電站,受9級特大地震影響绑莺,放射性物質(zhì)發(fā)生泄漏暖眼。R本人自食惡果不足惜,卻給世界環(huán)境...
    茶點故事閱讀 41,484評論 3 331
  • 文/蒙蒙 一纺裁、第九天 我趴在偏房一處隱蔽的房頂上張望诫肠。 院中可真熱鬧,春花似錦欺缘、人聲如沸栋豫。這莊子的主人今日做“春日...
    開封第一講書人閱讀 32,029評論 0 22
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽丧鸯。三九已至,卻和暖如春嫩絮,著一層夾襖步出監(jiān)牢的瞬間丛肢,已是汗流浹背。 一陣腳步聲響...
    開封第一講書人閱讀 33,153評論 1 272
  • 我被黑心中介騙來泰國打工剿干, 沒想到剛下飛機就差點兒被人妖公主榨干…… 1. 我叫王不留蜂怎,地道東北人。 一個月前我還...
    沈念sama閱讀 48,420評論 3 373
  • 正文 我出身青樓置尔,卻偏偏與公主長得像杠步,于是被迫代替她去往敵國和親。 傳聞我的和親對象是個殘疾皇子榜轿,可洞房花燭夜當晚...
    茶點故事閱讀 45,107評論 2 356

推薦閱讀更多精彩內(nèi)容