Legend coloring issue when plotting multiple legends for different geom_point layers about ggnewscale HOT 4 CLOSED

I started removing some bits of (probably unnecesary) code and I think that if you remove the show.legend = TRUE bits you can get the result you want. I have no idea why that's necesary, though, but hopefuly this is good enough for you right now until I can publish a proper fix.

library(ggplot2)
library(ggnewscale)

set.seed(123)
d <- data.frame(
  feature = rep(base::factor(c("feature1","feature2")), 54),
  name = rep(base::factor(c("name1", "name2", "name3")), 36),
  x = runif(108, min = 0.1, max = 100),
  y = runif(108, min = 0.1, max = 100)
)



ggplot(data = d, aes(x = x, y = y)) +
  geom_point(shape = 19, data = subset(d, feature == "feature1"), aes(color = name), size = 3) +
  scale_color_manual(name = "feature1", values = c("blue", "orange", "green")) +
  new_scale_color() +
  geom_point(shape = 21, data = subset(d, feature == "feature2"), aes(color = name), size = 3) +
  scale_color_manual(name = "feature2", values = c("blue", "orange", "green")) 

^{Created on 2021-06-07 by the reprex package (v2.0.0)}

from ggnewscale.

Hi @eliocamp,

That's certainly good enough for me.

I actually used the show.legend argument initially only for testing and playing around with different ggplot() settings. Wouldn't have expected that this might affect my plotting results.

Many thanks for your help!

from ggnewscale.

Good to know.
I'll leave this issue open because I feel that this is a genuine bug.

from ggnewscale.

I'll close this since it's likely the same as #59.

from ggnewscale.