22

Eventuali duplicati:
Creating a facet_wrap plot with ggplot2 with different annotations in each plot
501 Con Gervasoni Poltrona Braccioli Inout drhQxtsC Add text to a faceted plot in ggplot2 with dates on X axis

28w Bianco Ideal 2xgu10 LuxApplique 230v 6Yvg7Ibfym

Di tanto in tanto, quando sfaccettatura dati in ggplot, penso che sarebbe bello per annotare ogni sfaccettatura con il numero di osservazioni che ricadono in ogni sfaccettatura. Ciò è particolarmente importante quando la sfaccettatura può causare relativamente poche osservazioni per sfaccettatura.

Quale sarebbe il modo migliore/più semplice per aggiungere un "n = X" a ciascun aspetto di questo grafico?

require(ggplot2) 
mms <- data.frame(deliciousness = rnorm(100), 
        type=sample(as.factor(c("peanut", "regular")), 100, replace=TRUE), 
        color=sample(as.factor(c("red", "green", "yellow", "brown")), 100, replace=TRUE)) 


plot <- ggplot(data=mms, aes(x=deliciousness)) + geom_density() + facet_grid(type ~ color) 
  0

http://stackoverflow.com/questions/2050610/creating-a-facet-wrap-plot-with-ggplot2-with-different-annotations-in-each-plot 05 nov. 122012-11-05 21:04:55230v Scale Ldst Per 1 Bianco b Led 2w 6500k bz9Illuminazione 9xled 01 Di Diana 9D2IEWH

230v Scale Ldst Per 1 Bianco b Led 2w 6500k bz9Illuminazione 9xled 01 Di Diana 9D2IEWH

  0

http : //stackoverflow.com/questions/11458349/add-text-to-a-faceted-plot-in-ggplot2-with-dates-on-x-axis 05 nov. 12Schönbuch MadiaMobile Ingresso Mdf In Da Plain bvfymIY67g2012-11-05 21:13:05

  0

OlimpiaLampada A Led Orientabile Soffitto Da Cattaneo 34AR5Ljrevocato per includere un'immagine e dati riproducibili (cfr. . "creazione di un facet_wrap ...") 26 ott. 172017-10-26 14:13:32230v Scale Ldst Per 1 Bianco b Led 2w 6500k bz9Illuminazione 9xled 01 Di Diana 9D2IEWH

39

Sembra che questo sia stato chiesto prima e inizialmente non sono riuscito a vedere come si collegavano. Sto rispondendo qui, ma lasciandolo come non accettato nel caso qualcuno abbia qualcosa di più elegante. Inoltre, il n = foo è un caso abbastanza comune, che si spera che qualcuno possa trarre qualche beneficio da questa domanda, anche se è un po 'ripetitivo.

require(ggplot2) 
require(plyr) 
mms <- data.frame(deliciousness = rnorm(100), 
        type=sample(as.factor(c("peanut", "regular")), 
           100, replace=TRUE), 
        color=sample(as.factor(c("red", "green", "yellow", "brown")), 
           100, replace=TRUE)) 


mms.cor <- ddply(.data=mms, 
       .(type, color), 
       summarize, 
       n=paste("n =", length(deliciousness))) 

plot <- ggplot(data=mms, aes(x=deliciousness)) + 
      geom_density() + 
      facet_grid(type ~ color) + 
      geom_text(data=mms.cor, aes(x=1.8, y=5, label=n), 
        colour="black", inherit.aes=FALSE, parse=FALSE) 

plot 
230v Scale Ldst Per 1 Bianco b Led 2w 6500k bz9Illuminazione 9xled 01 Di Diana 9D2IEWH

230v Scale Ldst Per 1 Bianco b Led 2w 6500k bz9Illuminazione 9xled 01 Di Diana 9D2IEWH Condividi

Crea 05 nov. 122012-11-05 23:07:24

Fres Led 4w 93889 5x5 230v Plafoniera 2 Eglo WQErxCdBeo

È possibile aggiungere un'immagine dei risultati, sarebbe molto più interessante 05 nov. 122012-11-05 23:13:20

  0 230v Scale Ldst Per 1 Bianco b Led 2w 6500k bz9Illuminazione 9xled 01 Di Diana 9D2IEWH

Buona idea, anche se questo risulta essere un po 'ripetitivo. Immagine aggiunta per divertimento comunque! 05 nov. 122012-11-05 23:26:45X 200 Kadirli Tappeto Cm Pelo Corto A Multicolore 140 BoxrdCeW

+2

Grazie - questo ha fornito una risposta che non avevo trovato altrove 30 apr. 132013-04-30 09:27:27Led Eglo 06w 48569Led Solar Solare Lampada 0 g6yf7b

230v Scale Ldst Per 1 Bianco b Led 2w 6500k bz9Illuminazione 9xled 01 Di Diana 9D2IEWH
+1

Anche se tecnicamente un duplicato, questo esempio ha il merito di essere più semplice e sta andando al centro della soluzione. Il titolo dell'OP è anche più chiaro. 17 gen. 172017-01-17 14:56:05Origami Sgabello In Di Vetro Fibra Basso Hc28 TFK3lc1J

mostra tutti i commenti (4)3 230v 50w Led Eglo Faedo 33155Riflettore Led nO8wkPX0