Wie reproduziere ich den pareto.chart-Plot aus dem qcc-Paket mit ggplot2?

Ich habe die pareto.chart-Funktion aus dem qcc-Paket in R verwendet und es gefällt mir sehr gut. Jetzt möchte ich alle meine Grafiken portieren, um stattdessen das ggplot2-Paket zu verwenden. Meine Kenntnisse über ggplot2 sind jedoch trotz der hervorragenden Dokumentation sehr begrenzt, sodass ich nicht alle Details herausfinden kann. Grundsätzlich möchte ich eine Handlung wie diese

aber stattdessen mit dem ggplot2-Paket gemacht. Der Code zur Erstellung des Plots ist unten aufgeführt:

<code>    library(qcc)
    defect <- c(80, 27, 66, 94, 33)
    names(defect) <- c("price code", "schedule date", "supplier code", "contact num.", "part num.")
    pareto.chart(defect, ylab = "Error frequency", col=heat.colors(length(defect)))
</code>

Hat jemand eine Lösung dafür? Das Pareto-Diagramm wurde bereits zuvor besprochenHier aber das ergebnis sieht nicht so aus wie ich es will.

Antworten auf die Frage(1)

Ihre Antwort auf die Frage