legend是映射的color,则使用scale_color系列函数。 由于其中一个label是setosasetosasetosasetosasetosa,中间没有空格,所以使用str_wrap函数也不会有效果,此时可以使用str_replace函数进行正则替换,(.{20})代表任意20个任意字符,由于匹配默认从字符串前面开始,所以可以不指定开头锚定符,指定的话就是(^.{20}),替换为\...
ggplot(data, aes(x=变量1, y=变量2, color=类别变量)) + geom_point() + scale_color_manual(values=c("blue", "red"), labels=c("标签1", "标签2"), guide=guide_legend(title="图例标题", title.position = "top", label.position = "right")) 使用scale_color_manual()可以手动定义不同类...
ggplot(aes(x=dose,y=len,fill=dose))+ geom_boxplot() p 4更改图例位置 使用theme()函数中的legend.postion语句更改图例的位置,选项有4种:“top”, “bottom”, “left”, “right”。 # top p+theme(legend.position = "top") # bottom p+theme(legend.position = "bottom") # left p+theme(leg...
ggplot(data, aes(x=name,fill=name)) + geom_bar(stat = "count",width =0.6)+ scale_fill_nejm()+ theme_ipsum()+ xlab("组别")+ ylab("组值")+ ggtitle("R语言与医学生")+ theme(legend.position = "none")+coord_flip() 二、为图形设置为百分比 我们知道如果我们需要将y轴的数字转为百分比...
bp + theme(legend.justification=c(1,0), legend.position=c(1,0)) 隐藏斜线 ? 1 2 3 # No outline ggplot(data=PlantGrowth, aes(x=group, fill=group)) + geom_bar() ? 1 2 3 # 如果设置了颜色, 那么图例中就会出现 黑色斜线 ggplot(data=PlantGrowth, aes(x=group, fill=group)) + geom...
legend = FALSE)+ geom_point(aes(color=group02), size=5, show.legend = TRUE) ggplot(data=dat,aes(x=x,y=y))+ geom_errorbarh(aes(xmin=x-sd_value, xmax=x+sd_value, color=group02), height=0, show.legend = FALSE)+ geom_point(aes(color=group02), size=5, show.legend = TRUE)...
Legend定位 1. 如果图例绘在制图区外,必须提前保留绘制legend的空间。如par(mai=c(2,0.5,0.5,0.5)),图例绘制在下方,所以留2,其余3个方向为0.5。 2. 图例绘在制图区外,必须设置参数xpd=TRUE,否则命令正确也不会出图,因为默认xpd=F。 3. 图例位置由x,y决定。legend 默认坐标为左上角的坐标(因为设定xjust...
1、画图前的准备:自定义ggplot2格式刷 在画图前,我们首先定义一下ggplot2格式刷。 首先,ggplot2本身自带了很漂亮的主题格式,如theme_gray和theme_bw。但是在工作用图上,很多公司对图表格式配色字体等均有明文的规定。像我们公司,对主色、辅色、字体等都有严格的规定。如刘万祥老师早期的一篇配色博文里,大家更是可...
ggplot(mpg, aes(displ, hwy, colour = class)) + geom_point() ggplot(mpg, aes(displ, hwy, colour = class)) + geom_point(show.legend = FALSE) + directlabels::geom_dl(aes(label = class), method = "smart.grid") directlabels提供了一系列直接标签的定位方法,我们一般使用smart.grid即可。
ggplot(data=Arthritis, mapping=aes(x=Improved))+geom_bar(stat="count",width=0.5, color='red',fill='steelblue') 2,设置条形图的文本 使用geom_text()为条形图添加文本,显示条形图的高度,并调整文本的位置和大小。 当stat="count"时,设置文本的标签需要使用一个特殊的变量aes(label=..count..), 表示...