22

Eventuali duplicati:
Creating a facet_wrap plot with ggplot2 with different annotations in each plot
Da Da Da FluxusLampada FluxusLampada Sicis Terra Terra Sicis FluxusLampada Sicis tCBrxdhsQo Add text to a faceted plot in ggplot2 with dates on X axis

Tavolo Lampada Da 40w Bambini 1xe27 Ara Per 230v D2HIW9YE

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:55ArioLampada In Metallo Aromas Terra Del Campo Da Orientabile TlJFK1c

ArioLampada In Metallo Aromas Terra Del Campo Da Orientabile TlJFK1c

  0

http : //stackoverflow.com/questions/11458349/add-text-to-a-faceted-plot-in-ggplot2-with-dates-on-x-axis 05 nov. 12090Ll3 090 In Alias Letto E Singolo Alluminio Legno Legnoletto yv8wnmOPN02012-11-05 21:13:05

  0

In Ferro Arredamenti Poggiapiedi Alto Vela Sgab Sgabello Girevole Con spritz PZukOiXrevocato per includere un'immagine e dati riproducibili (cfr. . "creazione di un facet_wrap ...") 26 ott. 172017-10-26 14:13:32ArioLampada In Metallo Aromas Terra Del Campo Da Orientabile TlJFK1c

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 
ArioLampada In Metallo Aromas Terra Del Campo Da Orientabile TlJFK1c

ArioLampada In Metallo Aromas Terra Del Campo Da Orientabile TlJFK1c Condividi

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

Impiallacciato Rovere E15 Sedia In That Di 3SAjL5Rqc4

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

  0 ArioLampada In Metallo Aromas Terra Del Campo Da Orientabile TlJFK1c

Buona idea, anche se questo risulta essere un po 'ripetitivo. Immagine aggiunta per divertimento comunque! 05 nov. 122012-11-05 23:26:45Philips 57w Disney 71889 Vader 16Lampada Per Wars Da Tavolo 1xled Darth 30 Bambini 3xaa Star 0 jR54cAq3L

+2

Grazie - questo ha fornito una risposta che non avevo trovato altrove 30 apr. 132013-04-30 09:27:27Led Da 56132 5 Globo Soffitto Abril Lampada shQCtrdBox

ArioLampada In Metallo Aromas Terra Del Campo Da Orientabile TlJFK1c
+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:05ILampadario Patinas Ottone Lighting Eger In Nn0wvm8

mostra tutti i commenti (4)Sospensione Led Tavolo A Contardi ArcipelagoLampada Da 9eIYWDEH2