theme_bw()+theme(legend.position = "none") 通过geom_violin可绘制出小提琴图: ggplot(data2,aes(x=variable,y=value ,fill = variable))+ geom_violin(alpha=0.5,aes(linetype=NA))+ xlab("Group")+ylab("Score")+ theme_bw()+theme(legend.position = "none") 通过geom_jitter组合geom_violin可...
theme_bw(base_size = 12)+ ggsci::scale_color_jama() + theme(panel.grid = element_blank(), legend.position = 'right') + # 添加标签: geom_text_repel(data = filter(data, abs(logFC) > 1 & -log10(adj.P.Val) > 38), max.overlaps = getOption("ggrepel.max.overlaps", default = ...
theme_bw() 1. 2. 3. 4. 除了ggplot2 包自带的主题,还有一些扩展包提供了多种主题风格,例如 ggthemes 包、artyfarty 包等。使用这些包之前需要先安装,感兴趣的读者可自行探索。 以上介绍了 ggplot2 包中的映射(mapping)、图形元素(geom)、标度(scale)、分面(facet)和主题(theme)等概念,并展示了它们的基本...
在画图前,我们首先定义一下ggplot2格式刷。 首先,ggplot2本身自带了很漂亮的主题格式,如theme_gray和theme_bw。但是在工作用图上,很多公司对图表格式配色字体等均有明文的规定。像我们公司,对主色、辅色、字体等都有严格的规定。如刘万祥老师早期的一篇配色博文里,大家更是可以看到,很多商业杂志的图表,配色风格都是...
theme_linedraw ## function (base_size = 11, base_family = "", base_line_size = base_size/22, ## base_rect_size = base_size/22) ## { ## half_line <- base_size/2 ## theme_bw(base_size = base_size, base_family = base_family, ...
1. theme函数 theme_*系列函数提供了9种不同的风格。 theme_grey/gray/bw/linedraw/light/minimal/classic/dark/void都只有2个参数:base_size表示文字大小,base_family表示字体。 mg <- ggplot(mtcars,aes(x=mpg,y=wt))+geom_point() ...
ggplot2有多个内置主题。其中默认主题是theme_grey(),淡灰色背景和白色网格线。除此之外还有很多其他主题 theme_bw(): 是theme_grey()的变体,白色背景和灰色网格线 theme_linedraw(): 白色背景黑色线条 theme_light(): 和theme_linedraw()很像,区别是线条为灰色 ...
# Setupoptions(scipen=999)library(ggplot2)data("midwest",package="ggplot2")theme_set(theme_bw())# Add plot components ---gg<-ggplot(midwest,aes(x=area,y=poptotal))+geom_point(aes(col=state,size=popdensity))+geom_smooth(method="loess",se=F)+xlim(c(0,0.1))+ylim(c(0,500000))+la...
1. theme函数 theme_*系列函数提供了9种不同的风格。 theme_grey/gray/bw/linedraw/light/minimal/classic/dark/void都只有2个参数:base_size表示文字大小,base_family表示字体。 mg <- ggplot(mtcars,aes(x=mpg,y=wt))+geom_point() a=mg+theme_bw()+geom_text(aes(x=25,y=5),label='theme_bw',...
p1 <- p theme_gray() labs(title='theme_gray')p2 <- p theme_bw() labs(title='theme_bw')p3 <- p theme_linedraw() labs(title='theme_linedraw')p4 <- p theme_light() labs(title='theme_light')p5 <- p theme_dark() labs(title='theme_dark')p6 <- p theme_minimal() labs(...