【发布时间】：2015-09-11 09:23:38
【问题描述】：
我有一个 34 行 3 列的数据集。列是国家、纬度和经度。我正在尝试在该地图上绘制所有 34 个点。
代码：
library(RODBC)
library(googleVis)
con <- odbcConnect("Data", uid = "username", pwd = "password")
Geo <- sqlQuery(con, "select * from ANA.R.vwGeo")
m <- leaflet() %>%
addTiles() %>% # Add default OpenStreetMap map tiles
addCircles(lng=Geo$lon, lat=Geo$lat, popup=Geo$country)
m # Print the map
此代码打印地图上的圆圈，但只有 8 个。检查后我意识到它只绘制了前 8 行而忽略了其余的？不知道如何改变这一点。
structure(list(country = c("Argentina", "Australia", "Austria",
"Belgium", "Brazil", "Canada", "China", "Denmark", "Europe",
"France", "Germany", "India", "Ireland", "Israel", "Italy", "Japan",
"Korea, Republic of", "Norway", "Philippines", "Poland", "Portugal"
), lat = c(-36.536119, -24.211317, 47.751901, 50.755453, -11.066766,
60.739101, 35.716703, 55.946866, NA, 46.97068, 51.295789, 22.518114,
53.297545, 31.191818, 43.259406, 36.110262, 36.641155, 62.153742,
15.137269, 52.22507, 39.77707), Ion = c(-64.653608, 134.654116,
14.559724, 4.646748, -50.060384, -101.625, 103.696658, 9.554184,
NA, 2.846033, 10.563983, 78.560473, -7.812353, 34.881909, 12.419802,
138.462604, 128.085175, 9.363357, 121.232504, 19.452793, -7.908592
)), .Names = c("country", "lat", "Ion"), class = "data.frame", row.names = c(NA,
-21L)) -> Geo
【问题讨论】：
-
可重现。例子。请。
-
@FaizSaiyed 这是一个图像，而不是一个可重现的例子。您可以将
dput(Geo)的输出粘贴到您的问题中，只需将其缩进 4 个空格，就像您将代码块一样。 -
哦，是的，没错。对于那个很抱歉。我对此还是很陌生。不过谢谢。