Ich kann R nicht dazu bringen, meine zusammengefassten Daten nicht in alphabetischer Reihenfolge zu speichern

Question

Ich versuche, ein Balkendiagramm für die Veröffentlichung zu erstellen, und versuche die Änderungen in den Operationstypen in unserem Krankenhaus vor einer Curriculum-Implementierung zu zeigen und danach "BR" bzw. "AR". Die Operationsarten sind "Offen", "Laparoskopisch" und "Roboter". Ich möchte, dass die "BR" -Werte vor den "AR" -Werten in meinem Balkendiagramm stehen, aber ich kann nicht herausfinden, wie ich R dazu bringen kann, sie in dieser Reihenfolge zu lesen (ich bin ziemlich neu in R und Codierung) :(). mein Datenrahmen df

namens

  bin type cases_per_month 
1   Open BR   18.35 
2   Open AR   15.50 
3 Laparoscopic BR   4.25 
4 Laparoscopic AR   1.95 
5  Robotic BR   0.10 
6  Robotic AR   1.15 

ggplot(data=df, aes(x=bin, y=cases_per_month)) + geom_bar(stat="identity") 

data <- tapply(df$cases_per_month, list(df$type, df$bin), sum) 
barplot(data, beside=T, col=c("black", "grey"), 
    main="Average Cases per Month,BR and AR: Ventral", 
    xlab="Case Type", ylab="Average Cases per Month") 
legend(locator(1), rownames(data), fill=c("black","grey")) 

weil R liest „BR“ und „AR“ als Atom-Vektoren, die meisten der Befehle, die ich versucht habe, ich es nicht zulassen, neu anordnen, wie ich will

Das ist, was ich jetzt immer. ich meine y-Achse will 20 auch gehen, aber ich brauche nur, dass googeln, ich bin sicher, dass

Answer 1

Dieser ist ein bisschen schwierig. Hier ist meine Lösung:

# Load ggplot 
library(ggplot2) 

# Create data frame 
bin <- c('Open', 'Open', 'Laparoscopic', 'Laparoscopic', 'Robotic', 'Robotic') 
type <- c('BR', 'AR', 'BR', 'AR', 'BR', 'AR') 
cases.per.month <- c(18.35, 15.5, 4.25, 1.95, .1, 1.15) 
df <- data.frame(bin, type, cases.per.month) 

# Reorder levels 
df$type <- factor(df$type, c('BR', 'AR')) 

# Plot BR and AR types side-by-side 
ggplot(df, aes(x = bin, y = cases.per.month, fill = type)) + geom_bar(stat = 'identity', position = 'dodge') 

Auch willkommen in R!

Answer 2

Komm schon. Du brauchst das nur.

data <- data[2:1, ] 

Ihre Figur wird durch die barplot Funktion im graphics Paket anstelle des ggplot2 Paket erstellt. Die ggplot Zeile ist in Ihren Skripten nutzlos. Verwenden Sie für Ihr y axis Problem den ylim Parameter.

barplot(data,beside=T,col=c("black","grey"), 
     main="Average Cases per Month,BR and AR: Ventral", 
     xlab="Case Type",ylab="Average Cases per Month", ylim=c(0,20))