从小提琴箱线图中的子图标题中删除 facet.by 标签
remove facet.by label from sublot title in violinboxplot
正如标题所说,我需要使用 ggplot2 从小提琴箱形图中每个子图的标题中删除与 facet.by 相关的标签。
读取数据并创建绘图
plotIt <- read.table("tryit.csv", sep="\t", header=T)
p <- ggviolin(data, x = "label", y = "aMeasure", fill="label", palette=rainbowcols, + facet.by="timepoint", add.params = list(fill = "white"), short.panel.labs = FALSE, main=paste("measuring", tolower(reg), sep=" "), ylab="a measure", xlab="", ylim=c(0,8)) + theme(plot.title = element_text(hjust = 0.5), axis.text.x=element_blank())
advanced <- p + stat_compare_means(comparisons = list(c("tone", "ttwo")), method = "t.test", paired=F, label.y=7.5) + geom_boxplot(width=0.05)
问题是:如何去除每个子图标题中的"timepoint"标签?
编辑:
这些是我用于绘图的包是 ggplot 和 ggpubr
您应该通过以下方式获得所需的结果:
short.panel.labs = TRUE
这也是facet
的默认行为,所以你可以完全删除short.panel.labs
。
使用 TRUE
/FALSE
或 T
/F
并不重要,但如果我没记错的话,为了清楚起见,建议使用完整符号。
正如标题所说,我需要使用 ggplot2 从小提琴箱形图中每个子图的标题中删除与 facet.by 相关的标签。
读取数据并创建绘图
plotIt <- read.table("tryit.csv", sep="\t", header=T)
p <- ggviolin(data, x = "label", y = "aMeasure", fill="label", palette=rainbowcols, + facet.by="timepoint", add.params = list(fill = "white"), short.panel.labs = FALSE, main=paste("measuring", tolower(reg), sep=" "), ylab="a measure", xlab="", ylim=c(0,8)) + theme(plot.title = element_text(hjust = 0.5), axis.text.x=element_blank())
advanced <- p + stat_compare_means(comparisons = list(c("tone", "ttwo")), method = "t.test", paired=F, label.y=7.5) + geom_boxplot(width=0.05)
问题是:如何去除每个子图标题中的"timepoint"标签?
编辑:
这些是我用于绘图的包是 ggplot 和 ggpubr
您应该通过以下方式获得所需的结果:
short.panel.labs = TRUE
这也是facet
的默认行为,所以你可以完全删除short.panel.labs
。
使用 TRUE
/FALSE
或 T
/F
并不重要,但如果我没记错的话,为了清楚起见,建议使用完整符号。