में एकाधिक किंवदंतियों का औचित्य मैं आकार और रंग ("टाइप" और "ऑर्ग" को नीचे दिए गए उदाहरण में दर्शाते हुए दो किंवदंतियों के साथ एक नक्शा बनाने की कोशिश कर रहा हूं), और किंवदंतियों के इन्सेट हैं। मैं किंवदंतियों को रख सकता हूं, लेकिन मैं उन्हें उचित ठहराना चाहता हूं ताकि उनके बाएं किनारों को लाइन किया जा सके। मैं एक दूसरे के लिए उन्हें सम्मान के साथ केंद्रित के अलावा और कुछ नहीं कर सकते हैं:ggmap/ggplot2
require(ggplot2)
require(ggmap)
require(grid)
require(mapproj)
data <- data.frame(Org=rep(c("ABCDEFG","HIJKLMNOP","QRSTUVWX"),4)
, Type=rep(c("Y","Z"),6), Lat=runif(12,48,54.5)
, Long=runif(12,-133.5,-122.5))
osmMap <- get_map(location=c(-134,47.5,-122,55), source = 'osm')
points <- geom_jitter(data=data, aes(Long, Lat, shape=Type
, colour=Org))
legend <- theme(legend.justification=c(0,0), legend.position=c(0,0)
, legend.margin=unit(0,"lines"), legend.box="vertical"
, legend.key.size=unit(1,"lines"), legend.text.align=0
, legend.title.align=0)
ggmap(osmMap) + points + legend
यह एक सीधा जवाब नहीं है, लेकिन आप थोड़ा धोखा कर सकते हैं उन्हें समान रूप से आकार देने के लिए प्रारूप का उपयोग करके। अपने डेटा घोषणा के बाद 'डेटा $ प्रकार <- प्रारूप (डेटा $ प्रकार, चौड़ाई = 17)' का प्रयास करें और अपना कोड दोबारा शुरू करें। –
यह एक साफ चाल है, धन्यवाद। मैं इसे सोमवार – andyteucher