library(shiny)
library(maptools)
library(ggplot2)
shinyServer(function(input, output) {
output$coordinates.plot<- renderPlot({
## this is just a silly visualization
hist(10) # todo mapwith continents + marker for user location
})
output$coord.text <- renderText({
lat <- input$telem$lat
lon <- input$telem$lon
paste(lat, lon)
})
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.