Sagen wir, ich habe diese einfachen Daten:

 mydata <- data.frame(group=c("A", "B", "0", "AB"), FR=c(20, 32, 32, 16))

Wenn ich aus diesem Datenrahmen ein Kreisdiagramm erstellen möchte, kann ich Folgendes tun:

 with(mydata,pie(FR, labels=paste0(as.character(group), " ", FR, "%"), radius=1))

Es ist ganz einfach, aber akzeptabel.

Wie kann ich mit ggplot2 oder lattice etwas ähnliches bekommen?

Nach viel Versuch und Irrtum habe ich

ggplot(mydata, aes(x = factor(1), y=FR,fill=factor(group)) ) + geom_bar(width = 1,stat="identity")+coord_polar(theta = "y") 

Es ist viel komplexer und hässlicher. Soll es nicht einfach sein? ggplot-Bücher enthalten nur einige Beispiele und raten von der Verwendung von Kreisdiagrammen ab.

Gitter ist noch schlimmer, du brauchst viele, viele Zeilen, um es zu erschrecken.

Kann mir jemand helfen, ein schönes und einfaches Kreisdiagramm zu bekommen? Zum Beispiel so etwas wie ...

Gibt es kein R-Paket, das das ohne 20 Codezeilen problemlos kann?