Zmiana legendy pozycji/kierunek za pomocą OPT() nie ma wpływu

Question

Tworzenie następujące wyniki wydruku w legendzie jest umieszczony pionowo, po prawej stronie, a nie na dolnej poziomej, jak wskazano w wywołaniu opts():

dat <- data.frame(x = runif(10), y = runif(10), 
        grp = rep(letters[1:2],each = 5)) 

ggplot(data = dat, aes(x = x, y = y, colour = grp)) + 
    geom_point() + 
    opts(legend.position = "bottom", legend.direction = "horizontal") + 
    theme_bw() 

Jak uzyskać legendę we właściwym miejscu?

Answer 1

Problem polega na tym, że theme_bw() zostaje umieszczony po połączeniu z numerem opts() i resetuje niektóre ustawienia domyślne. Wystarczy umieścić theme_bw() przed opts():

ggplot(data = dat, aes(x = x, y = y, colour = grp)) + 
    geom_point() + 
    theme_bw() + 
    opts(legend.position = "bottom", legend.direction = "horizontal") 

Uwaga: Od wersji 0.9.2 opts została replaced przez theme:

theme(legend.position = "bottom", legend.direction = "horizontal")