[英]ggplot2 legend not showing up
有人可以帮我弄清楚如何在与红点相关的右下角放置一个图例吗? 我只需要名称“我的投资组合”和一个红色指示器。 我不知道为什么一开始就没有传说
library(ggplot2)
x <- c(1,2,3)
y <- c(4,5,6)
ggplot(as.data.frame(cbind(x,y)), aes(x, y)) +
geom_line() +
geom_point(aes(2.5,5.5, colour = "red"),
shape = 18,
size = 3) +
ggtitle("Efficient Frontier") +
xlab("Volatility (Weekly)") +
ylab("Expected Returns (Weekly)") +
theme(plot.title = element_text(size=14, face="bold.italic", hjust = 0.5, margin=margin(0,0,15,0)),
axis.title.x = element_text(size = 10, margin=margin(15,0,0,0)),
axis.title.y = element_text(size = 10, margin=margin(0,15,0,0)),
panel.border = element_rect(colour = "black", fill=NA, size=1),
legend.position = "bottomright")
谢谢
使用legend.justification
:
library(tidyverse)
ggplot(as.data.frame(cbind(x,y)), aes(x, y)) +
geom_line() +
geom_point(aes(2.5,5.5, colour = "red"),
shape = 18,
size = 3) +
ggtitle("Efficient Frontier") +
xlab("Volatility (Weekly)") +
ylab("Expected Returns (Weekly)") +
theme(plot.title = element_text(size=14, face="bold.italic", hjust = 0.5, margin=margin(0,0,15,0)),
axis.title.x = element_text(size = 10, margin=margin(15,0,0,0)),
axis.title.y = element_text(size = 10, margin=margin(0,15,0,0)),
panel.border = element_rect(colour = "black", fill=NA, size=1),
legend.position = "bottom",
legend.justification = "right")
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.