bjo*_*eph 15
你可以使用legend.key参数theme.那是
theme(legend.key = element_rect(fill = "black"))
一个例子:
a <- seq(1:5)
b <- seq(1:5)
c <- seq(1:5)
d <- data.frame(a, b, c)
ggplot(data = d, aes(x = a, y = b, color = factor(c))) +
geom_point() +
theme(legend.key = element_rect(fill = "yellow"))
Run Code Online (Sandbox Code Playgroud)
生产: