Wie dynamisch die Brüche und Grenzen zu ändern, während die Box-Plots Plotten ggplots

Question

mit habe ich folgende Daten

head(airquality) 
    Ozone Solar.R Wind Temp Month Day 
1 41  190 7.4 67  5 1 
2 36  118 8.0 72  5 2 
3 12  149 12.6 74  5 3 
4 18  313 11.5 62  5 4 
5 NA  NA 14.3 56  5 5 
6 28  NA 14.9 66  5 6 

Die Zusammenfassung Statistik:

data.frame': 153 obs. of 6 variables: 
$ Ozone : int 41 36 12 18 NA 28 23 19 8 NA ... 
$ Solar.R: int 190 118 149 313 NA NA 299 99 19 194 ... 
$ Wind : num 7.4 8 12.6 11.5 14.3 14.9 8.6 13.8 20.1 8.6 ... 
$ Temp : int 67 72 74 62 56 66 65 59 61 69 ... 
$ Month : int 5 5 5 5 5 5 5 5 5 5 ... 
$ Day : int 1 2 3 4 5 6 7 8 9 10 ... 

name type na  mean  disp median  mad min max nlevs 
1 Ozone integer 37 42.129310 32.987885 31.5 25.94550 1.0 168.0  0 
2 Solar.R integer 7 185.931507 90.058422 205.0 98.59290 7.0 334.0  0 
3 Wind numeric 0 9.957516 3.523001 9.7 3.40998 1.7 20.7  0 
4 Temp integer 0 77.882353 9.465270 79.0 8.89560 56.0 97.0  0 
5 Month integer 0 6.993464 1.416522 7.0 1.48260 5.0 9.0  0 
6  Day integer 0 15.803922 8.864520 16.0 11.86080 1.0 31.0  0 

Jetzt habe ich die boxplot der kontinuierlichen plotten möchten Vars und ich haben den folgenden Code, den ich für einen anderen Datensatz verwendet habe.

d <- melt(df) 

p <- ggplot(d) + 
    geom_boxplot(aes(x=variable, y=value, color=variable,fill=variable))) + 
    labs(x="", y="", title="Box Plot of Variables",subtitle="",caption="") + my_theme() + 
    scale_y_continuous(breaks=c(seq(0,100000,20000)), limits = c(0,100000)) + 
    theme(plot.title = element_text(lineheight=.8, face="bold",colour = "steelblue",hjust =0.5,vjust = 2,size = 11)) + 
    theme(text = element_text(size=10), axis.text.x = element_text(angle=45, hjust=1)) 

Offensichtlich sind die Brüche und Grenzen Parameter in scale_y_continuous() haben für diese Daten geändert werden, was bedeutet, dass dies jedes Mal getan werden muss, wann immer ich die boxplot plotten möchten; aber dieser Ansatz gibt mir nicht die Flexibilität, es verallgemeinerbar zu machen.

Sag, dass ich möchte, dass es in meiner glänzenden App enthalten ist.

Wie kann ich dynamisch die Pausen und Grenzen Parameter je nach Datumseingabe ändern, ohne es jedes Mal manuell zu tun.

Answer 1

diese Variable auf Ihren Code hinzufügen:

num.labels <- 10 #or whatever 

Dann Ihren Anruf scale_y_continuous aktualisieren:

scale_y_continuous(breaks= seq(min(d$value), max(d$value), length.out = num.labels), 
        limits = c(min(d$value),max(d$value))) 

Sie sollten es von dort nehmen können.