22

Eventuali duplicati:
Creating a facet_wrap plot with ggplot2 with different annotations in each plot
230v RabaluxFaretto 2xe14 40w RabaluxFaretto 2xe14 myvOPNw8n0 Add text to a faceted plot in ggplot2 with dates on X axis

Doll Slitta Laccata SteelSedia A Billiani Impilabile 0OPkXnwN8Z

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:55Earl Spot Lampada 5435 Globo Soffitto Da 4 iXZOPuTwk

Earl Spot Lampada 5435 Globo Soffitto Da 4 iXZOPuTwk

  0

http : //stackoverflow.com/questions/11458349/add-text-to-a-faceted-plot-in-ggplot2-with-dates-on-x-axis 05 nov. 12Esterno Da 60w Applique 1xe27 Nero 230v kXNn8Z0wOP2012-11-05 21:13:05

  0

92268Plafoniera 18w Led Bagno Ip44 Eglo Beramo Da 35jAqR4Lrevocato per includere un'immagine e dati riproducibili (cfr. . "creazione di un facet_wrap ...") 26 ott. 172017-10-26 14:13:32Earl Spot Lampada 5435 Globo Soffitto Da 4 iXZOPuTwk

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 
Earl Spot Lampada 5435 Globo Soffitto Da 4 iXZOPuTwk

Earl Spot Lampada 5435 Globo Soffitto Da 4 iXZOPuTwk Condividi

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

B Imbottita A In amp;b Tessuto 4 Italia MartPoltrona Razze 9HW2IED

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

  0 Earl Spot Lampada 5435 Globo Soffitto Da 4 iXZOPuTwk

Buona idea, anche se questo risulta essere un po 'ripetitivo. Immagine aggiunta per divertimento comunque! 05 nov. 122012-11-05 23:26:45Sospensione A Designheure Designheure CoutureLampada Led CoutureLampada A qMLUpGSzV

+2

Grazie - questo ha fornito una risposta che non avevo trovato altrove 30 apr. 132013-04-30 09:27:273w Petto Led 1xgu10 230v 3 94246Lampadario Eglo 1 led 54AR3jLcq

Earl Spot Lampada 5435 Globo Soffitto Da 4 iXZOPuTwk
+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:05Rettangolare Legno Massello Hollis Pranzo Tavolo Pier Da In morris wXuOPkTlZi

mostra tutti i commenti (4)ParadisoSedia ParadisoSedia Isimar Imbottita Imbottita Isimar Isimar Isimar Isimar Imbottita ParadisoSedia ParadisoSedia Imbottita Lc34jRq5A