我正在使用一些数据在某些地方生成带有标记的地图,并使用弹出功能输出多个值.
我得到的数据来自sql,以下是代码:
con <- odbcConnect("data", uid = "user", pwd = "password")
area <- sqlQuery(con, "EXEC sp")
区域变量包含11行和6列.6列是:Region(文本),Employed(整数),Retired(整数),used(整数),Longitude(整数)和Latitude(整数).
我使用经度和纬度使用传单库在地图上制作点.当用户点击地图上受尊重的点时,我希望将其他人显示为弹出窗口.
我如何用每个点的弹出窗口生成地图和点的代码.
m <- leaflet() %>%
addTiles() %>% # Add default OpenStreetMap map tiles
addMarkers(lng=area$Longitude, lat=area$Latitude, popup=area$Region)
上面的函数工作,并在地图上显示具有正确区域名称的弹出输出.但是如果我尝试将弹出窗口更改为多个列,则会显示带有点的地图,但是当我点击它时它不响应我.
有人可以告诉我如何在弹出窗口中输出多个值.
这样的事情:
m <- leaflet() %>%
addTiles() %>% # Add default OpenStreetMap map tiles
addMarkers(lng=area$Longitude, lat=area$Latitude, popup=c(area$Region, area$Employed, area$Retired, area$Unemployed))
注意:当我点击该点时,我希望弹出窗口显示如下:
Region Name
Employed: 559
Retired: 400
Unemployed: 300
如果你不明白我的意思,请问一个问题,因为我仍然掌握了R的知识.
我在rstudio上这样做
快速提问.我在sql server中有一些数据已加载到RStudio中.我已经为数据做了一个条形图,现在我正在使用小册子库,使用纬度和经度在地图上绘制一个点.我希望能够在用户点击该点时使用弹出窗口显示条形图.
BarChart代码(也许这是一个问题,因为我使用的是googleVis库,所以不确定我是否可以在弹出窗口中使用它.但同样这是我可以制作和需要的最合适的条形图 - 其他建议可能会有所帮助,因为我不是R图书馆的专业人士)
Switzerland <- sqlQuery(con, "sql query")
SwitzerlandChart <- gvisBarChart(Switzerland, options = list(height=200))
对于图形图,代码是:
m <- leaflet() %>%
addTiles() %>% # Add default OpenStreetMap map tiles
addCircles(lng=8.498868, lat=46.9221, popup=paste(plot(SwitzerlandChart)))
当我运行此代码时,它会打开一个网页来查看我的条形图.然后我运行以下内容:
m #Prints the graph
这会打印带有所需位置点的图形,但弹出窗口会显示一个网页,而这也是我只能打开的网页.
我希望能够在弹出窗口内绘制条形图.
希望有人能提供帮助
我正在尝试创建一个表,对于其中一个列,我希望默认值是特定的 - 请参阅下面的代码:
CREATE TABLE dbo.PSTest(
modDate datetime default getdate()
, [Date] datetime default (SELECT CONVERT (DATE, GETDATE()))
);
我收到以下错误
Msg 1046, Level 15, State 1, Line 28
Subqueries are not allowed in this context. Only scalar expressions are allowed.
我明白我不能这样做,但有办法解决这个问题吗？
先感谢您