https://fosstodon.org/@HeathrTurnr ; Heather Turner
https://fosstodon.org/@trevin_flick ; Trevin Flickinger
https://fosstodon.org/@jonthegeek ; Jon Harmon
https://fosstodon.org/@samherniman ; Sam Herniman
https://mastodon.social/@SagePhoenixDM ; Alan Jackson
https://fosstodon.org/@ivelasq3 ; Isabella Velásquez
https://mastodon.social/@bhogale ; Prasanna Bhogale
https://fosstodon.org/@Drmowinckels ; Mo - Athanasia Mowinckel
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
# Assumption is that you run it at the root of the project | |
# waiting https://github.com/quarto-dev/quarto-cli/issues/3917 to ditch | |
new_post <- function(title, author = "default") { | |
t <- tolower(gsub(" ", "_", title, fixed = TRUE)) | |
dir_path <- paste("posts", | |
paste(Sys.Date(), t, sep = "_"), | |
sep = "/") |
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
# copy paste from wiki https://en.wikipedia.org/wiki/List_of_U.S._state_and_territory_abbreviations | |
US_states <- data.frame( | |
"United States of America" = c("Alabama", "Alaska","Arizona","Arkansas","California", | |
"Colorado","Connecticut","Delaware","District of Columbia", | |
"Florida","Georgia","Hawaii","Idaho","Illinois","Indiana","Iowa", | |
"Kansas","Kentucky","Louisiana","Maine","Maryland", | |
"Massachusetts","Michigan","Minnesota","Mississippi","Missouri", | |
"Montana","Nebraska","Nevada","New Hampshire","New Jersey", | |
"New Mexico","New York","North Carolina","North Dakota","Ohio", |
flowchart LR
subgraph one[Initializing package]
direction LR
A("create_package()")-->C("use_git()")
A-->B("use_XX_licence()")
A--> Z("use_testthat()")
end
subgraph two[Developping]
direction LR
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
#loading some libs | |
library(sf);library(lwgeom) | |
# a simplified example from sf help page of st_line_sample | |
ls = st_sfc(st_linestring(rbind(c(.1,0), c(0,0), c(0,1))), crs = 4326) |> | |
st_transform(3857) | |
# st_line_sample give you MULTIPOINT that you convert to POINT | |
points <- st_line_sample(ls, density = units::set_units(1, 1/km)) |> | |
st_cast("POINT") |