Mosaikplot mit Beschriftungen in jeder Box, die einen Namen und einen Prozentsatz aller Beobachtungen zeigen

Question

Ich möchte ein Mosaikplot (R-Paket vcd, siehe z. B. http://cran.r-project.org/web/packages/vcd/vignettes/residual-shadings.pdf) mit Beschriftungen innerhalb der Zeichnung erstellen. Die Etiketten sollten entweder eine Kombination der verschiedenen Faktoren oder irgendein benutzerdefiniertes Etikett und den Prozentsatz der Gesamtbeobachtungen in dieser Kombination von Kategorien zeigen (siehe z. B. http://i.usatoday.net/communitymanager/_photos/technology-live/2011/07/28/nielsen0728x-large.jpg, obwohl dies nicht ganz ein Mosaikplot ist). Ich vermute, dass etwas wie die labeling_values-Funktion hier eine Rolle spielt, aber ich kann es nicht richtig zum Laufen bringen.

library(vcd) 
library(MASS) 
data("Titanic") 
mosaic(Titanic, labeling = labeling_values) 

Alternative Wege zwei Variablen mit kategorischen Daten in einer freundlichen Art und Weise für Nicht-Statistiker zu vertreten sind auch willkommen und sind akzeptable Lösungen.

Answer 1

Hier ist ein Beispiel für das Hinzufügen von Proportionen als Beschriftungen. Der Grad der Individualisierung einer Handlung ist wie immer Geschmackssache, zeigt aber zumindest die Prinzipien. Weitere Möglichkeiten finden Sie unter ?labeling_cells.

labs <- round(prop.table(Titanic), 2) 
mosaic(Titanic, pop = FALSE) 
labeling_cells(text = labs, margin = 0)(Titanic)