R-boxplot установлен в 2 десятичных знака

Question

Могу ли я установить средние значения до 2 знаков после запятой?

fun_mean <- function(x){return(data.frame(y=mean(x),label=mean(x,na.rm=T)))} 

goo = ggplot(dataset1, aes(x=Pleace, y=Scored.Probabilities)) + 
     geom_boxplot(aes(fill=Pleace)) + 
     stat_summary(fun.y = mean, geom="point",colour="darkred", size=3) + 
     stat_summary(fun.data = fun_mean, geom="text", vjust=-0.7) 
print (goo) 

Answer 1

использование round(x, digits = 2)

fun_mean <- function(x){return(round(data.frame(y=mean(x),label=mean(x,na.rm=T)),digit=2))} 
goo <- ggplot(dataset1, aes(x=Pleace, y=Scored.Probabilities)) + 
geom_boxplot(aes(fill=Pleace)) + 
stat_summary(fun.y = mean, geom="point",colour="darkred", size=3) + 
stat_summary(fun.data = fun_mean, geom="text", vjust=-0.7) 

goo 

Ссылка: https://stat.ethz.ch/R-manual/R-devel/library/base/html/Round.html