# devtools::install_github("bokeh/rbokeh@dev")
library(rbokeh)
library(maps)
m <- map("state", region = "colorado", plot = FALSE)
mx <- mean(range(m$x, na.rm = TRUE))
my <- mean(range(m$y, na.rm = TRUE))
gmap(lng = mx, lat = my, zoom = 6, width = 800) %>%
ly_lines(m$x, m$y, line_width = 2)
Last active
November 13, 2015 17:27
-
-
Save hafen/5a6c6682ca48a97c145b to your computer and use it in GitHub Desktop.
rbokeh gmap test
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| <!DOCTYPE html> | |
| <html> | |
| <head> | |
| <script src="https://cdn.pydata.org/bokeh/release/bokeh-0.10.0.min.js"></script> | |
| <link href="https://cdn.pydata.org/bokeh/release/bokeh-0.10.0.min.css" rel="stylesheet"> | |
| </head> | |
| <body> | |
| <div id="5115be5704d535fbe1ef9776fbb93a45" class="plotdiv"></div> | |
| <script type="text/javascript"> | |
| Bokeh.$(function() { | |
| var modelid = "aca2e5be53b03b5163285f23d4dab1d7"; | |
| var modeltype = "GMapPlot"; | |
| var elementid = "5115be5704d535fbe1ef9776fbb93a45"; | |
| Bokeh.logger.info("Realizing plot:"); | |
| Bokeh.logger.info(" - modeltype: GMapPlot"); | |
| Bokeh.logger.info(" - modelid: aca2e5be53b03b5163285f23d4dab1d7"); | |
| Bokeh.logger.info(" - elementid: 5115be5704d535fbe1ef9776fbb93a45"); | |
| var all_models = [{"type":"GMapPlot","id":"aca2e5be53b03b5163285f23d4dab1d7","attributes":{"title":null,"id":"aca2e5be53b03b5163285f23d4dab1d7","plot_width":790,"plot_height":434,"x_range":{"type":"Range1d","id":"dbedf83572de6ff933456e676a309d26"},"y_range":{"type":"Range1d","id":"344842333fe7e747786791fcaa118f90"},"left":[{"type":"LinearAxis","id":"2d676538db18d1252396e128fea07a1b"}],"below":[{"type":"LinearAxis","id":"ebe33ab35328777897cb697d7341f775"}],"right":[],"above":[],"renderers":[{"type":"GlyphRenderer","id":"20647780649f16de9a3a35f40696387a"},{"type":"LinearAxis","id":"ebe33ab35328777897cb697d7341f775"},{"type":"LinearAxis","id":"2d676538db18d1252396e128fea07a1b"}],"tools":[{"type":"PanTool","id":"1694c21cc15a1aeec7cfdddc5a7276fc"},{"type":"WheelZoomTool","id":"1bf58c3b819dc58ff819968f34d6e2a7"},{"type":"BoxZoomTool","id":"01d5e73f4832e21c13aa950baf475f7c"},{"type":"ResizeTool","id":"4b8cad1bbe89b49502ac23624ca04ed8"},{"type":"ResetTool","id":"0d5b9ec51fbf387d0567d573233ea206"},{"type":"PreviewSaveTool","id":"691f44e78b112dd78d09f4b4918e5e2c"}],"tool_events":{"type":"ToolEvents","id":"a2e7579d6a559417100da63265a377e3"},"extra_y_ranges":{},"extra_x_ranges":{},"tags":[],"doc":null,"min_border":4,"lod_threshold":null,"map_options":{"lat":39.0012,"lng":-105.5532,"zoom":6,"map_type":"hybrid"}}},{"type":"PanTool","id":"1694c21cc15a1aeec7cfdddc5a7276fc","attributes":{"id":"1694c21cc15a1aeec7cfdddc5a7276fc","tags":[],"doc":null,"plot":{"type":"GMapPlot","id":"aca2e5be53b03b5163285f23d4dab1d7"},"dimensions":["width","height"]}},{"type":"ToolEvents","id":"a2e7579d6a559417100da63265a377e3","attributes":{"id":"a2e7579d6a559417100da63265a377e3","tags":[],"doc":null},"geometries":[]},{"type":"WheelZoomTool","id":"1bf58c3b819dc58ff819968f34d6e2a7","attributes":{"id":"1bf58c3b819dc58ff819968f34d6e2a7","tags":[],"doc":null,"plot":{"type":"GMapPlot","id":"aca2e5be53b03b5163285f23d4dab1d7"},"dimensions":["width","height"]}},{"type":"BoxZoomTool","id":"01d5e73f4832e21c13aa950baf475f7c","attributes":{"id":"01d5e73f4832e21c13aa950baf475f7c","tags":[],"doc":null,"plot":{"type":"GMapPlot","id":"aca2e5be53b03b5163285f23d4dab1d7"}}},{"type":"ResizeTool","id":"4b8cad1bbe89b49502ac23624ca04ed8","attributes":{"id":"4b8cad1bbe89b49502ac23624ca04ed8","tags":[],"doc":null,"plot":{"type":"GMapPlot","id":"aca2e5be53b03b5163285f23d4dab1d7"}}},{"type":"ResetTool","id":"0d5b9ec51fbf387d0567d573233ea206","attributes":{"id":"0d5b9ec51fbf387d0567d573233ea206","tags":[],"doc":null,"plot":{"type":"GMapPlot","id":"aca2e5be53b03b5163285f23d4dab1d7"}}},{"type":"PreviewSaveTool","id":"691f44e78b112dd78d09f4b4918e5e2c","attributes":{"id":"691f44e78b112dd78d09f4b4918e5e2c","tags":[],"doc":null,"plot":{"type":"GMapPlot","id":"aca2e5be53b03b5163285f23d4dab1d7"}}},{"type":"ColumnDataSource","id":"bce9521217f25c2848ecf1d01beddd91","attributes":{"id":"bce9521217f25c2848ecf1d01beddd91","tags":[],"doc":null,"column_names":["x","y"],"selected":[],"discrete_ranges":{},"cont_ranges":{},"data":{"x":[-102.0495,-102.0495,-102.0438,-102.0438,-102.0495,-102.0495,-102.0495,-102.0552,-102.0552,-102.0552,-102.0552,-102.061,-102.0552,null,-102.0495,-102.124,-102.2787,-102.485,-102.7485,-102.886,-103.0063,null,-103.0063,-103.0866,-103.1668,-103.3902,-103.6366,-103.8772,-104.0148,-104.1122,-104.3986,-104.7997,-105.1034,-105.2409,-105.3899,-105.6018,-105.7222,-106.0087,-106.4727,-106.5988,-106.9082,-107.2749,-107.441,-107.4582,-107.5499,-107.9166,-108.2718,-108.3922,-108.4896,-108.6901,-108.9193,-109.0396,null,-109.0511,-109.0568,-109.0568,-109.0568,-109.0625,-109.0568,-109.0568,-109.0511,-109.0453,-109.0511,-109.0396,null,-104.0606,-104.9429,-105.2867,-106.2092,-106.2035,-106.3295,-106.8566,-107.3093,-107.9223,-109.0568,-109.0511,null,-104.0606,-103.5736,-103.373,-102.6568,-102.6167,-102.061,-102.061,-102.0667,-102.061,-102.0667,-102.0667,-102.0552],"y":[37.0016,37.3855,37.6491,37.735,38.2564,38.6116,38.6918,39.0528,39.133,39.5685,39.5799,40.0039,40.0096,null,37.0016,36.9844,36.9844,36.9844,36.9844,36.9844,37.0016,null,37.0016,36.9959,36.9844,36.9844,36.9844,36.9844,36.9844,36.9844,36.9844,36.9844,36.9844,36.9844,36.9844,36.9844,36.9844,36.9844,36.9844,36.9844,36.9844,36.9959,36.9844,36.9959,36.9959,36.9959,36.9959,36.9959,37.0016,36.9959,36.9959,36.9959,null,40.9951,40.6571,40.2216,39.6544,39.4997,39.3622,38.5085,38.1533,37.8668,37.6319,36.9959,null,41.0066,41.0123,41.0066,41.0123,41.0066,41.0066,41.0123,41.018,41.018,40.9894,40.9951,null,41.0066,41.0066,41.0066,41.0066,41.0066,41.0009,40.7488,40.7029,40.6915,40.4394,40.3477,40.0096]}}},{"type":"Line","id":"c76b130e4bea4af93a8293f9cd64c50d","attributes":{"id":"c76b130e4bea4af93a8293f9cd64c50d","tags":[],"doc":null,"group":null,"line_width":{"units":"data","value":2},"line_color":{"units":"data","value":"black"},"line_alpha":{"units":"data","value":1},"x":{"units":"data","field":"x"},"y":{"units":"data","field":"y"}}},{"type":"Line","id":"7ad0e94c03f216329707bf24d7704d99","attributes":{"id":"7ad0e94c03f216329707bf24d7704d99","tags":[],"doc":null,"group":null,"line_width":{"units":"data","value":2},"line_color":{"units":"data","value":"#e1e1e1"},"line_alpha":{"units":"data","value":1},"x":{"units":"data","field":"x"},"y":{"units":"data","field":"y"}}},{"type":"GlyphRenderer","id":"20647780649f16de9a3a35f40696387a","attributes":{"id":"20647780649f16de9a3a35f40696387a","tags":[],"doc":null,"selection_glyph":null,"nonselection_glyph":{"type":"Line","id":"7ad0e94c03f216329707bf24d7704d99"},"server_data_source":null,"name":null,"data_source":{"type":"ColumnDataSource","id":"bce9521217f25c2848ecf1d01beddd91"},"glyph":{"type":"Line","id":"c76b130e4bea4af93a8293f9cd64c50d"}}},{"type":"Range1d","id":"dbedf83572de6ff933456e676a309d26","attributes":{"id":"dbedf83572de6ff933456e676a309d26","tags":[],"doc":null,"start":-119.427,"end":49.3657}},{"type":"Range1d","id":"344842333fe7e747786791fcaa118f90","attributes":{"id":"344842333fe7e747786791fcaa118f90","tags":[],"doc":null,"start":-115.8131,"end":51.278}},{"type":"LinearAxis","id":"ebe33ab35328777897cb697d7341f775","attributes":{"id":"ebe33ab35328777897cb697d7341f775","tags":[],"doc":null,"plot":{"type":"GMapPlot","id":"aca2e5be53b03b5163285f23d4dab1d7"},"axis_label":"","formatter":{"type":"BasicTickFormatter","id":"d035e9f663a023afc52008850002ddb3"},"ticker":{"type":"BasicTicker","id":"27f5b17fd2d2889aadbb59efcf3a2cf7"},"visible":true,"axis_label_text_font_size":"12pt"}},{"type":"BasicTickFormatter","id":"d035e9f663a023afc52008850002ddb3","attributes":{"id":"d035e9f663a023afc52008850002ddb3","tags":[],"doc":null}},{"type":"BasicTicker","id":"27f5b17fd2d2889aadbb59efcf3a2cf7","attributes":{"id":"27f5b17fd2d2889aadbb59efcf3a2cf7","tags":[],"doc":null,"num_minor_ticks":5}},{"type":"LinearAxis","id":"2d676538db18d1252396e128fea07a1b","attributes":{"id":"2d676538db18d1252396e128fea07a1b","tags":[],"doc":null,"plot":{"type":"GMapPlot","id":"aca2e5be53b03b5163285f23d4dab1d7"},"axis_label":"","formatter":{"type":"BasicTickFormatter","id":"79c377e2d67ac9f2e2423703ab2a1896"},"ticker":{"type":"BasicTicker","id":"3c4f495f9c9bcb2c44b696ea1548ce34"},"visible":true,"axis_label_text_font_size":"12pt"}},{"type":"BasicTickFormatter","id":"79c377e2d67ac9f2e2423703ab2a1896","attributes":{"id":"79c377e2d67ac9f2e2423703ab2a1896","tags":[],"doc":null}},{"type":"BasicTicker","id":"3c4f495f9c9bcb2c44b696ea1548ce34","attributes":{"id":"3c4f495f9c9bcb2c44b696ea1548ce34","tags":[],"doc":null,"num_minor_ticks":5}}]; | |
| // change "nulls" in data to NaN | |
| function traverseObject(obj) { | |
| for(var key in obj) { | |
| if(obj[key].constructor === Object) { | |
| traverseObject(obj[key]); | |
| } else if(obj[key].constructor === Array) { | |
| for (var i = 0; i < obj[key].length; i++) { | |
| if(obj[key][i] === null) | |
| obj[key][i] = NaN; | |
| }; | |
| } | |
| }; | |
| } | |
| for(var i = 0; i < all_models.length; i++) { | |
| if(all_models[i].type === "ColumnDataSource") | |
| traverseObject(all_models[i].attributes.data); | |
| }; | |
| Bokeh.load_models(all_models); | |
| var model = Bokeh.Collections(modeltype).get(modelid); | |
| var view = new model.default_view({model: model, el: "#" + elementid}); | |
| // Bokeh.instance = view; | |
| Bokeh.index[modelid] = view; | |
| }); | |
| </script> | |
| </body> | |
| </html> |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment