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]?, |