Goals: Add links that are reasonable and good explanations of how stuff works. No hype and no vendor content if possible. Practical first-hand accounts of models in prod eagerly sought.
| // v2 | |
| /* UPDATE 13/02/2022 | |
| Added columns argument and made each optional | |
| */ | |
| // Returns an array of unique random numbers | |
| RANDUNIQUE = | |
| LAMBDA([rows],[columns],[min],[max], |
| name: Dad Joke API Example | |
| description: Very basic implementation of fetching data and putting into Excel | |
| host: EXCEL | |
| api_set: {} | |
| script: | |
| content: | | |
| const button = document.querySelector("button"); | |
| button.addEventListener("click", run); | |
| async function getRandomDadJoke(){ |
| library(tidycensus) | |
| library(leaflet) | |
| library(sf) | |
| library(viridis) | |
| options(tigris_use_cache = TRUE) | |
| il1 <- get_acs(geography = "county", | |
| variables = c(hhincome = "B19013_001"), | |
| state = "IL", | |
| geometry = TRUE) %>% |
Specifically I'm looking for web mapping applications that include multiple layers and don't look like an ArcGIS clone -- perhaps something that looks like it was designed by a designer rather than a GIS tech :) This is a list of responses from Twitter, many of which do look GIS-y so more suggestions are welcome...
| let | |
| BaseUrl = "https://fake-odata-api.com/v1/Entities?", | |
| Token = "F4K3-T0K3N-D0NT-U5E-L0L", | |
| EntitiesPerPage = 1000, | |
| GetJson = (Url) => | |
| let Options = [Headers=[ #"Authorization" = "Bearer " & Token ]], | |
| RawData = Web.Contents(Url, Options), | |
| Json = Json.Document(RawData) | |
| in Json, |
| ## https://timogrossenbacher.ch/2016/12/beautiful-thematic-maps-with-ggplot2-only/ | |
| library(raster) | |
| library(sp) | |
| library(rgdal) | |
| library(viridisLite) | |
| library(rasterVis) | |
| ## Read age data | |
| data <- read.csv("input/avg_age_15.csv", stringsAsFactors = F) | |
| ## Read shapefile |
| Public Function quote(sString As String) As String | |
| quote = Chr(34) + sString + Chr(34) | |
| End Function | |
| Public Function URLEncode(sString As String) As String | |
| Dim iLen As Integer | |
| iLen = Len(sString) | |
| If iLen > 0 Then | |
| ReDim sResult(iLen) As String |
| let | |
| Web.MultiPartPost = (url as text, parts as record) as binary => | |
| let | |
| unique = Text.NewGuid(), | |
| boundary = "--" & unique, | |
| crlf = "#(cr)#(lf)", | |
| item = (name, value) => | |
| let | |
| filename = Value.Metadata(value)[name]?, | |
| contentType = Value.Metadata(value)[type]?, |