#调整柱子宽度 p+geom_bar(stat="summary",fun=mean,position="dodge",width=0.5) 调整柱子间距 主要通过将X轴转变为连续变量并通过控制变量大小以改变柱间距离,我们先给原数据加一列连续变量: df$x<-c(1,2,3)#添加连续变量 #绘图 p1<-ggplot(df,aes(x,value,color=group,fill=group))+geom_bar(stat=...
ggplot(data = diamonds) + geom_bar(aes(x = cut, fill = clarity), color = "white", position = "identity") 1. 2. 3. 4. 可以观察到当positinotallow=“identity”该图的形式为高度表示绝对数量的堆积柱状图,当color = “white”时边框变成了白色,当我们想改变柱子的填充颜色时,可以使用fill这个函数。
df<- data.frame(type = type, nums =nums)## 测试数据保持不变ggplot(df, aes(type, weight= nums)) +geom_bar(fill= ifelse(df$nums >20,'red','blue'))## 利用判断语句输出颜色 绘图结果如下: 006、设置柱状图绘图的宽度 a、使用width参数设置为:0.3 type <- c('A','B','C','D','E'...
ggsave(filename = "0-2.png",#命名 plot=p2,#哪张图 path = "C:/Users/12974/Desktop/百度经验/简书/R语言绘制多个分组簇状柱状图", #保存路径 units="px", width = 1200,#宽度 height = 600 #高度 )
data$right <- cumsum(data$number_of_obs) + 30*c(0:(nrow(data)-1)) #将一个数据集中的每个观察值(number_of_obs)向右移动(宽度累加+间隔累加) data$left <- data$right - data$number_of_obs #再次查看数据 data #画图 ggplot(data, aes(ymin = 0)) + ...
ggplot(data,aes(x=Experiment,y=Value,fill=Type))+ geom_bar(stat = 'identity', #柱状图位置并排: position = 'dodge', #使用position=position_dodge(width=0.9),可使组内柱子间隔,自行试一下。 width = 0.8, #设置柱子宽度,使变量之间分开
以后坚持每周学习用ggplot2绘制一种类型的图,并将绘图代码的详细含义写在博客上。 偶然看到RPubs的第一个作业里有几张图可以用来练习ggplot2,就试着写了一下代码,这里记录一些我认为有些难度的图与代码。 习题Problem 2:分面直方图 Note:这一节有些修改,题目中绘制的是直方图,我误解为了柱状图,因此就按照柱状图的...
stat : 设置stat参数以确定模式。 fill : 代表条形图内部的颜色。 color : 代表条形图轮廓的颜色。 width : 代表条形图的宽度。使用中的数据集。让我们先绘制一个普通的柱状图,以显示一个没有任何帮助的普通图的打印结果。例子library(ggplot2) # Inserting data ODI <- data.frame(match=c("M-1","M-2"...