Dlaczego legenda ggplot2 nie łączy ręcznych wartości wypełnienia i skali?

Spodziewane zachowanie

Jeśli utworzę wykres za pomocą ggplot2 i użyję oddzielnych, powiedzmy, kształtu i wypełnienia skali, aby określić dane, spodziewałbym się, że legenda wytyczyłaby „białe” wypełnione punkty (które wyglądają na puste) i „czarne” wypełnione punkty (które nie wyglądają wydrążony).

W poniższym przykładowym kodzie pozycja legendy dla Windows powinna być białym pustym punktem, a dla Linuksa powinna być czarna.

Rzeczywiste zachowanie

Elementy legendy w „Systemie operacyjnym” przedstawiają dwa identyczne wizualnie punkty dla wyraźnie różnych systemów operacyjnych, których punkty są wyraźnie narysowane z różnymi wypełnieniami na wykresie. W poniższym przykładowym kodzie zarówno system Windows, jak i Linux są wyświetlane w legendzie jako nieodróżnialne czarne punkty puste, mimo że są one poprawnie wykreślane inaczej na samej działce.

Przykładowa działka

Przykładowy wykres z łamanym zachowaniem wypełnienia w legendzie http://f.cl.ly/items/2w2i09103Q2p0i3M1Y2d/BrokenFillRplot.png

Przykładowy kod
library(ggplot2)

x <- rnorm(n = 30)
y <- rnorm(n = 30)
treatment <- rep(c("red", "green", "blue"), times = 20)
operatingSystem <- rep(c("Windows", "Linux"), times = 30)

dd <- data.frame(x, y, treatment, operatingSystem)

fillScaleValues <- c(
  "Windows" = "white",
  "Linux" = "black"
)

shapeScaleValues <- c(
  "red" = 21,
  "green" = 22,
  "blue" = 23
)

p <- ggplot(
      aes(x = x, 
          y = y,
          shape = factor(treatment),
          fill = factor(operatingSystem)
      ), data = dd
     )

p <- p + geom_point()
p <- p + scale_fill_manual(values = fillScaleValues, name = "Operating System")
p <- p + scale_shape_manual(values = shapeScaleValues, name = "Treatment")

p
Informacje o sesji
R version 2.15.1 (2012-06-22)
Platform: x86_64-apple-darwin9.8.0/x86_64 (64-bit)

locale:
[1] C/en_US.UTF-8/C/C/C/C

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] ggplot2_0.9.2.1       reshape2_1.2.1        plyr_1.7.1            ProjectTemplate_0.4-2
[5] testthat_0.7         

loaded via a namespace (and not attached):
 [1] MASS_7.3-21        RColorBrewer_1.0-5 colorspace_1.1-1   dichromat_1.2-4   
 [5] digest_0.5.2       evaluate_0.4.2     grid_2.15.1        gtable_0.1.1      
 [9] labeling_0.1       memoise_0.1        munsell_0.4        proto_0.3-9.2     
[13] scales_0.2.2       stringr_0.6.1      tools_2.15.1      

questionAnswers(1)

yourAnswerToTheQuestion