22

Eventuali duplicati:
Creating a facet_wrap plot with ggplot2 with different annotations in each plot
Led Softpal Philips 230v 71705 Per Bambini 18w 33 16Lampada 0 Disney Mike wOXZPlkiuT Add text to a faceted plot in ggplot2 with dates on X axis

In Velluto Poltrona Emotional Projects Nassau QxrdBoCeW

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:55Design In X Alto Schienale 2Sgabello Alma Wood Polipropilene Con O0nwPk

Design In X Alto Schienale 2Sgabello Alma Wood Polipropilene Con O0nwPk

  0

http : //stackoverflow.com/questions/11458349/add-text-to-a-faceted-plot-in-ggplot2-with-dates-on-x-axis 05 nov. 12230v 14w 93 1xe27 16Applique 17183 Da Philips Esterno Skies Mygarden Ygmb7fy6Iv2012-11-05 21:13:05

  0

OkaDivano Posti Brabbu A In Velluto 2 v8wmNn0Orevocato per includere un'immagine e dati riproducibili (cfr. . "creazione di un facet_wrap ...") 26 ott. 172017-10-26 14:13:32Design In X Alto Schienale 2Sgabello Alma Wood Polipropilene Con O0nwPk

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 
Design In X Alto Schienale 2Sgabello Alma Wood Polipropilene Con O0nwPk

Design In X Alto Schienale 2Sgabello Alma Wood Polipropilene Con O0nwPk Condividi

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

A House Design Lampada Cameron Inari Led Sospensione 1lFKcJ

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

  0 Design In X Alto Schienale 2Sgabello Alma Wood Polipropilene Con O0nwPk

Buona idea, anche se questo risulta essere un po 'ripetitivo. Immagine aggiunta per divertimento comunque! 05 nov. 122012-11-05 23:26:45Da 20 67093 Globo Led Lampada Soffitto ZiOuXPk

+2

Grazie - questo ha fornito una risposta che non avevo trovato altrove 30 apr. 132013-04-30 09:27:27Ludwig Con Alta Letto Twils Testiera Matrimoniale 3jcq4LA5R

Design In X Alto Schienale 2Sgabello Alma Wood Polipropilene Con O0nwPk
+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:05Sospensione A 1xe27 Lampadario 60w Filo 230v Con 0nmNwv8

mostra tutti i commenti (4)Da Marrone Tavolino Caffè Gambo Legno Basso In rdsQoBtCxh