Reposted by Mehmet Göktuğ Öztürk
I wrote a book on spatial networks, using Python, networkx, and osmnx
Online version can be found here:
bgu-geography.com/net/
Comments and ideas are welcome!
Mehmet Göktuğ Öztürk
@mehmetgoktug.bsky.social
69 followers 309 following 21 posts
Ecologist | Fire Ecology | Biogeography | Spatial Data Analysis | Birdwatching | Open and Reproducible Science
![R code and output:
> x <- readLines(pipe("svn log")) # run in R's svn repo
> rx <- x[grep("^r\\d+ \\|",x)]
> who <- gsub(" ","",sapply(strsplit(rx,"\\|"),"[",2))
> twho <- table(who)
> twho[rev(order(twho))[1:5]]
who
ripley maechler hornik pd luke
29782 9965 9092 2778 2253
>](https://cdn.bsky.app/img/feed_thumbnail/plain/did:plc:hdbguwort62mhodqy7vjspud/bafkreiculgvrr25grmfktrliae3z54xuqxvzw6e63yk6sskk43r3h3j4ue)
![Diff of a change the 'Getting Started in R - Tinyverse Edition' manuscript with a nice data.table improvement: inside a pair of ( ) we can place each chained operation on its own line improving readability.
I.e. we have
cw21 <- ( # use '(' to keep ops on separate lines
cw[Time %in% c(0,21)] # i: select rows
[, weight := Weight] # j: mutate
[, Group := factor(Group)]
[, .(Chick,Group,Time,weight)] # j: arrange
[order(Chick,Time)] # i: order
[1:5] # i: subset
)](https://cdn.bsky.app/img/feed_thumbnail/plain/did:plc:hdbguwort62mhodqy7vjspud/bafkreibbmwqmfe2wuvlsvy2f7v5eegui6lwocren4lvy2hc4kmn7kuvnjm)
