0
mydata <- read.csv(paste("plot.csv"), na.strings = c("", "NA"))
library(ggplot2)
library(ggsignif)
library(scales)
library(ggpubr)
options(scipen=10L)
compare_means(XYZ ~ GR, data = mydata, method="wilcox.test")
my_comparisons<-list(c("A", "B"), 
                     c("A", "C"), 
                     c("B", "C"))
plotXYZ <- ggboxplot(mydata, x = "GR", y = "XYZ", color = "GR", palette = "jco", fill="GR"
                    )+ 
  stat_compare_means(comparisons=my_comparisons,label.y=c(120,150,160))+               
  stat_compare_means(label.y = 170)
plotXYZ

`I want pvalue between-group in decimal form place of scientific

like I m getting pvalue 2.9e-05 . But I want 0.00029 to be print on plot

stefan
  • 90,330
  • 6
  • 25
  • 51
Nazia
  • 1

1 Answers1

0

I believe options(scipen = n) does not apply for plots. I see that you're already using scales. Have you tried this:

plotXYZ + scale_x_continuous(labels = comma)

Emir Dakin
  • 148
  • 5