欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

R語(yǔ)言數(shù)據(jù)可視化繪圖Dot plot點(diǎn)圖畫(huà)法示例

 更新時(shí)間：2022年02月17日 09:51:53   作者：黃小仙  
這篇文章主要為大家介紹了R語(yǔ)言數(shù)據(jù)可視化繪圖Dot plot點(diǎn)圖的畫(huà)法示例，有需要的朋友可以借鑒參考下，希望能夠有所幫助，祝大家多多進(jìn)步

今天要給大家介紹的是點(diǎn)圖（Dot plot)，點(diǎn)圖展示的數(shù)據(jù)比較簡(jiǎn)單，但勝在好看啊。

作圖數(shù)據(jù)如下：

（數(shù)據(jù)框中的第一列行名在本次作圖中暫時(shí)用不到）

Step1. 繪圖數(shù)據(jù)的準(zhǔn)備

首先要把你想要繪圖的數(shù)據(jù)調(diào)整成R語(yǔ)言可以識(shí)別的格式，建議大家在excel中保存成csv格式。

Step2. 繪圖數(shù)據(jù)的讀取

data<-read.csv(“your file path”, header = T)
#注釋：header=T表示數(shù)據(jù)中的第一行是列名，如果沒(méi)有列名就用header=F

Step3.繪圖所需package的安裝、調(diào)用

library(reshape2)
library(ggplot2) 
library(Hmisc)                       
#注釋：package使用之前需要調(diào)用
# 今天要用到stat_summary()函數(shù)需要調(diào)用Hmisc包

Step4.繪圖

data_melt<-melt (data[,-1])
#注釋：melt()函數(shù)把表格中的寬數(shù)據(jù)變成長(zhǎng)數(shù)據(jù)
# data[,-1]去掉作圖用不到的第一列數(shù)據(jù)
p<-ggplot(data_melt, aes(x = variable, y = value, color=variable, fill= variable)) + 
   geom_dotplot(binaxis='y', stackdir='center', binwidth = 1)+
   theme(panel.background = element_blank(),
        panel.grid.major = element_blank(),
        panel.border = element_rect(colour="black",fill=NA))
p

添加平均值

p + stat_summary(fun.y = "mean", geom = "crossbar", 
             mapping = aes(ymin = ..y.., ymax = ..y..), width = 0.3)

添加誤差線

p + stat_summary(fun.y = "mean", geom = "crossbar", 
      mapping = aes(ymin = ..y.., ymax = ..y..), width = 0.3) +
      stat_summary(fun.data = "mean_se", geom="errorbar", width = 0.2)

以上就是R語(yǔ)言數(shù)據(jù)可視化繪圖Dot plot點(diǎn)圖畫(huà)法示例的詳細(xì)內(nèi)容，更多關(guān)于R語(yǔ)言數(shù)據(jù)可視化Dot plot點(diǎn)圖繪圖的資料請(qǐng)關(guān)注腳本之家其它相關(guān)文章！

相關(guān)文章

最新評(píng)論