Reverse factors in only 1 bar in ggplot2

Question

Reverse factors in only 1 bar in ggplot2

Navigation

#1 by (5 votes)

3

Does anyone have any idea how to order the factors in just 1 bar in ggplot2? Reorder data no longer works: (

In case I would like to invert the first bar, so that the green one stays up and the red one down.

library(ggplot2)

dados <- expand.grid(a = letters[1:5], b = letters[1:2])
dados$a <- paste(dados$a)
dados$b <- paste(dados$b)
dados$val <- rnorm(10, 5, 1)
ggplot(aes(x = a, y = val, fill = b), data = dados) + geom_bar(stat = 'identity')

dados2 <- rbind(tail(dados, -1), head(dados, 1))
ggplot(aes(x = a, y = val, fill = b), data = dados2) + geom_bar(stat = 'identity') # Funcionava nas versões anteriores :\

r ggplot2

asked by anonymous 12.06.2017 / 20:23

1 answer

In a matrix Z of elements (i, j) how to assign the value 1 when i = j? (software R) Are Java lambdas equivalent to JavaScript Closures?

score 5 · Answer 1

Gambiarra, but it works:

dados2$c <- ifelse(dados2$a == "a", dados2$b, NA)
dados2$d <- ifelse(dados2$a == "a", dados2$val, NA)
dados2$val[dados2$a == "a"] <- NA
ggplot(aes(x = a, y = d, fill = c), data = dados2) + 
  geom_bar(stat = 'identity', position = position_stack(reverse = TRUE)) +
  geom_bar(aes(x = a, y= val, fill = b), stat= "identity")