ändern Whisker Ende in geom_boxplot

Question

Ich versuche geom_boxplot zu verwenden Bild zu zeichnen. Ich möchte jedoch die Definition von Whisker ändern, was bedeutet, dass das Ende des Whiskers das Maximum und das Minimum meiner Daten ist und der Ausreißer entfernt werden sollte. Es wäre schön, auf meinem bestehenden Code zu basieren.

Vielen Dank.

con.for2=data.frame(d=as.character(gl(9,20)),close=exp(rnorm(180)),open=exp(rnorm(180))) 
concentration=melt(con.for2) 
colnames(concentration)=c("location","Condition","formaldehyde") 
p=ggplot(data=concentration,aes(factor(location), formaldehyde),ylim=c(0,0.15),cex.axis=1.5,cex.lab=15 
     ) + geom_boxplot(aes(fill = Condition))+xlab("Location") + ylab("Formaldehyde concentration (mg/m3)") 

Answer 1

aus der Antwort Angepasst Changing whisker definition in geom_boxplot

p <- ggplot(data=concentration,aes(factor(location), formaldehyde),ylim=c(0,0.15),cex.axis=1.5,cex.lab=15) 

f <- function(x) { 
    r <- quantile(x, probs = c(0, 0.25, 0.5, 0.75, 1)) 
    names(r) <- c("ymin", "lower", "middle", "upper", "ymax") 
    r 
} 

p + stat_summary(fun.data=f, aes(fill= Condition), geom="boxplot", position="dodge")