R可视化-绘制柱形图1

一、模拟数据 ＃

data <- data.frame(
samplename=letters[1:6], # 变量samplename，赋值从字母A－F；
samplevalue=sample(seq(3,12),6) #变量samplevalue，赋值为3－12之间的随机数；
)
data # 查看data，如下：
samplename samplevalue
1          a           6
2          b           7
3          c          10
4          d          12
5          e           4
6          f           9

二、绘制柱形图

2.1 基本柱形图

barplot(height=data$samplevalue,
names=data$samplename,
)

2.2 单一颜色

barplot(height=data$samplevalue,
names=data$samplename,
col="red"
)

2.3 边框颜色

barplot(height=data$samplevalue,
names=data$samplename,
col="red",
border="blue"
)

2.4 从调色板填充颜色

library(RColorBrewer)

cols <- brewer.pal(6,"Paired")
barplot(height=data$samplevalue,
names=data$samplename,
col=cols,
border="blue"
)

2.5 添加主标题，X轴标题，Y轴标题，设定Y轴刻度限度

cols <- brewer.pal(6,"Paired")
barplot(height=data$samplevalue,
names=data$samplename,
col=cols,
border="blue",
main="My title",
xlab="Name",
ylab="Value",
ylim=c(0,13)
)

2.6 调整为水平柱形图，设定坐标轴文字方向

barplot(height=data$samplevalue,
names=data$samplename,
col=cols,
border="blue",
main="My title",
xlab="Name",
ylab="Value",
ylim=c(0,13),
horiz=T,
las=2
)

2.7 坐标轴颜色，字体，字号

barplot(height=data$samplevalue,
names=data$samplename,
col=cols,
border="blue",
main="My title",
xlab="Name",
ylab="Value",
ylim=c(0,13),
col.axis="green", 
font.axis=2, 
cex.axis=1 
)