gruppierte boxplots r ggplot2

Ich habe 5 Spalten mit numerischen Daten (Geräte -, Hyiene.items etc) und 1 Spalte von kategorischen Daten (A oder D).
Ich würde gerne eine gruppierte boxplot der numerischen Daten, die nach Kategorie gruppiert, aber ich kann nicht einen Weg finden:

 head(sc)
  Equipment Hygiene.items Patient Near.bed Far.bed Care
1         0             0       1        5       1    D
2         1             4       1        2       0    D
3         3             1       1        2       0    D
4         0             2       2        3       1    A
5         1             2       1        5       2    A
6         1             2       1        1       1    A

boxplot(sc~sc$Care) würde scheinen, dass die am besten geeignete Weg, richtig?
Ich mag ggplot2 aber es sieht nicht aus wie kann ich das einfach so machen:

ggplot(sc, aes(y=sc)) + 
  geom_boxplot(aes(fill=Care))

EDIT: Was ich wie die Aussehen:

Denke ich, was ich bin nach, ist so etwas wie dieses, die ich in Matlab (vor langer Zeit):

Oder das 4. Diagramm hier: Plotly

Was ich habe, so weit:

library(ggplot2)
library(RColorBrewer)

ggplot(melt_A,aes(x=Care,y=value,fill=Care))+geom_boxplot(ylim=c(1,6,1))+facet_grid(~variable)+
labs(x = "Care", y = "Surface contacts",color="Care" )+
  scale_y_continuous(limits = c(-0, 6))+
  scale_fill_brewer(palette="Purples")+
  theme_bw()+
  theme(strip.background=element_rect(fill="black"))+
  theme(strip.text=element_text(color="white", face="bold"))

Frage

Wie kann ich das Care-labels aus D, H, Ich, auf etwas anderes? z.B. die Direkte Pflege, Haushalt, Medikamente, Runde, etc...

Behoben:

Antwort darauf gefunden hier : Stack

Ich habe Folgendes in meine ggplot Befehl

scale_fill_brewer(palette="Purples",
  labels = c("Direct care", "Housekeeping","Medication    round","Mealtimes","Miscellaneous care","Personal care"))