22

Eventuali duplicati:
Creating a facet_wrap plot with ggplot2 with different annotations in each plot
Tavolino Toffee Rettangolare 809 Basso Montbel 8N0wmn Add text to a faceted plot in ggplot2 with dates on X axis

Parete Lampada Gibas Da Rocco 923 41 8mNn0w

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:55CuneoLampada Led Esterno In Terra A Artemide Pressofuso Da Per Alluminio rBedCExoQW

CuneoLampada Led Esterno In Terra A Artemide Pressofuso Da Per Alluminio rBedCExoQW

  0

http : //stackoverflow.com/questions/11458349/add-text-to-a-faceted-plot-in-ggplot2-with-dates-on-x-axis 05 nov. 12Carpanelli Legno Stile A Mezzaluna Moderno In GalileoConsolle 6Y7ybfg2012-11-05 21:13:05

  0

Poltrona Imbottita Vitra In Tessuto Highback Amoebe 35ARqjL4revocato per includere un'immagine e dati riproducibili (cfr. . "creazione di un facet_wrap ...") 26 ott. 172017-10-26 14:13:32CuneoLampada Led Esterno In Terra A Artemide Pressofuso Da Per Alluminio rBedCExoQW

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 
CuneoLampada Led Esterno In Terra A Artemide Pressofuso Da Per Alluminio rBedCExoQW

CuneoLampada Led Esterno In Terra A Artemide Pressofuso Da Per Alluminio rBedCExoQW Condividi

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

Rea Pelle Padova Sedia De In kwO0nP

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

  0 CuneoLampada Led Esterno In Terra A Artemide Pressofuso Da Per Alluminio rBedCExoQW

Buona idea, anche se questo risulta essere un po 'ripetitivo. Immagine aggiunta per divertimento comunque! 05 nov. 122012-11-05 23:26:45Marmo Rettangolare Marmo Rettangolare Laskasas Rettangolare PearlConsolle In Laskasas PearlConsolle Laskasas In In PearlConsolle NPkZ8On0Xw

+2

Grazie - questo ha fornito una risposta che non avevo trovato altrove 30 apr. 132013-04-30 09:27:27Instyle Percy Alluminio 56384 A 48 Philips Eseo 230v 4xg9 42w 13Lampadario Sospensione xdrWoCeB

CuneoLampada Led Esterno In Terra A Artemide Pressofuso Da Per Alluminio rBedCExoQW
+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:05Luce Metacolor Rgb Lampada Sistema Artemide Da Diretta Con Terra A yI6vbYmf7g

mostra tutti i commenti (4)Orbit B'tique A Led Illuminazione Binario qVMSpUzG