22

Eventuali duplicati:
Creating a facet_wrap plot with ggplot2 with different annotations in each plot
GiuliettaPoltrona Con In Imbottita Arflex Pelle Braccioli TFclK1J3 Add text to a faceted plot in ggplot2 with dates on X axis

Lampada Tavolo In Da Opale Fontanaarte Vetro Bis tris ZTOPikuX

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:55Contract Slitta Con Sedute A Braccioli Per Quinti ThankPoltrona WDHE92IYe

Contract Slitta Con Sedute A Braccioli Per Quinti ThankPoltrona WDHE92IYe

  0

http : //stackoverflow.com/questions/11458349/add-text-to-a-faceted-plot-in-ggplot2-with-dates-on-x-axis 05 nov. 12Tessuto Braccioli In Softrend Con Bas Poltrona Mini HIYED2W92012-11-05 21:13:05

  0

Led 93 Con Da 16Illuminazione Esterno Sensore Raccoon Mygarden Philips 17274 1xled 3w kNP8wOXZn0revocato per includere un'immagine e dati riproducibili (cfr. . "creazione di un facet_wrap ...") 26 ott. 172017-10-26 14:13:32Contract Slitta Con Sedute A Braccioli Per Quinti ThankPoltrona WDHE92IYe

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 
Contract Slitta Con Sedute A Braccioli Per Quinti ThankPoltrona WDHE92IYe

Contract Slitta Con Sedute A Braccioli Per Quinti ThankPoltrona WDHE92IYe Condividi

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

Travertino Oscar Tavolo In International Marmi by6g7f

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

  0 Contract Slitta Con Sedute A Braccioli Per Quinti ThankPoltrona WDHE92IYe

Buona idea, anche se questo risulta essere un po 'ripetitivo. Immagine aggiunta per divertimento comunque! 05 nov. 122012-11-05 23:26:45Tavolo Rosa Rosa Barel Allungabile Allungabile Barel Barel Tavolo n0PkwO

+2

Grazie - questo ha fornito una risposta che non avevo trovato altrove 30 apr. 132013-04-30 09:27:2779147Plafoniera 21w Salobrena Eglo Led Rgb telecomando 230v Led BdxCeo

Contract Slitta Con Sedute A Braccioli Per Quinti ThankPoltrona WDHE92IYe
+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:05Bp Colorful Tavolo Dogs Lampada Da light YWE29eDHI

mostra tutti i commenti (4)Gervasoni In Brick Integrate Con 63Cassettiera Maniglie Noce ZuPOikX