我是一名大学生,也是编程初学者。 研究时我遇到了问题&ggplot2'封装
我想要情节' wifi区'并在一个情节中添加圆圈,但我不能这样做..并且对于该做什么感到困惑..
我想知道对应于" wifi区域"的point_geom大小。实半径20米'
数据包含纬度,经度和关于什么样的移动机构服务。
我的代码如下:
library(ggmap)
wifi_daejeon <- read.csv("C:/Users/Byeongsoo/Desktop/R markdown/대전와이파이.csv")
wifi_gungdong <- subset(wifi_daejeon, EMD_NM == "궁동")
cent_gungdong <- c(mean(wifi_gungdong$LON), mean(wifi_gungdong$LAT))
bmap_gungdong <- ggmap(get_googlemap(center = cent_gungdong, zoom = 15, maptype = "roadmap"),
extent = "device",
base_layer = ggplot(wifi_gungdong, aes(x = LON, y = LAT, colour = CCB)))
bmap_gungdong +
geom_point() +
theme(plot.title = element_text(size = 20, colour = "BLUE"),
axis.text = (element_text(size=10))) +
theme(legend.title = element_text(size = 15)) +
theme()
不幸的是,我无法上传图片,因为我没有10个声誉..
图片的网址是:
http://postfiles4.naver.net/20140318_99/soccerball1_1395130002602k7k10_PNG/%C4%B8%C3%B3.PNG?type=w3
这是我的问题。感谢您阅读至今。
答案 0 :(得分:2)
map <- get_map()
g<-ggmap(map, extent = TRUE)
g + geom_point(aes(x=-95.36327,y=29.763284),col='red',size=20,shape=1)