ggplot2에서 크기 범례를 얻고 수정하는 방법

Question

내 플롯에서 크기 범례를 표시하고 내 크기 범례의 이름을 변경하는 데 문제가 있습니다.

내 데이터는 공사가 이미 값을 5, 10 중 하나 인 크기의 열, 나는 이미

1. 내가 원하는 색상에 대한 전설이 ggplot2를 사용하고 20

   을 가지고있다 크기에 하나를 추가하고 수동으로 크기 레이블을 변경하십시오.

2. 전설의 글꼴을 어떻게 늘리시겠습니까? 그것은 초소형 (FIN, IND UTIL) 크기에 대한 15 shouldn 거기에 그냥 생략하고 두 전설을 나란히 표시 싶어요.

p <- ggplot(corp, aes(x=annRisk, y=annRet, color = corp$subsector1, face = "bold")) 

p<- p + geom_point(aes(size = corp$Colsize), alpha = 0.55) 

p<-p + scale_size(range = c(8, 20)) 

p<-p + scale_colour_manual("", values = c("UTIL" = "#fdcc8b", "IND" = "#fc8d59", "FIN" = "#d7301f", 
"ABS" = "#74a9cf", "CMBS" = "#0570b0", "LA" = "#8c96c6", "SOV"= "#88419d", "SUPRA" = "#b3cde3")) 

p<-p+labs(title = "SOME TITLE") 

print(p) 

p<-p+theme(plot.title = element_text(face = "bold", size = 20)) 

p<-p+theme(axis.title.x = element_text(size = 20), axis.text.x = element_text(size = 13)) 
p<-p+theme(axis.title.y = element_text(size = 20), axis.text.y = element_text(size = 13)) 

p<-p+geom_text(aes(label=ifelse(Colsize>=10,subsector2,"")), size=5,color = "black", face = "bold", hjust=-0.1, vjust = 0.1) 


p<-p+scale_x_continuous(labels = percent, name = "Annualized Risk", limits = c(0.05, 0.09)) 

p<-p+scale_y_continuous(labels = percent, name = "Annualized Return", limits = c(0.04, 0.08)) 

p<-p+ theme(legend.position = "bottom") 
print(p) 

Answer 1

나는 아직 데이터를 사용할 수 있지만, 다음과 같은 코드를 추가 시도 할 수 있습니다 : 당신이 더 많이 얻을 것 같은데요

p <- p + theme(legend.position = "bottom", 
       legend.title = element_blank(), 
       legend.text = element_text(size=14), 
       legend.box = "horizontal") 

p <- p + scale_size_manual(values=c(5,10,20), labels = c("5","10","20"))