Skip to content

Commit

Permalink
spaceout
Browse files Browse the repository at this point in the history
  • Loading branch information
mpadge committed Feb 18, 2024
1 parent abacb7e commit 2303120
Show file tree
Hide file tree
Showing 3 changed files with 14 additions and 8 deletions.
2 changes: 1 addition & 1 deletion DESCRIPTION
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
Package: m4ra
Title: Many-to-Many Multi-Modal Routing Aggregator
Version: 0.1.1.030
Version: 0.1.1.031
Authors@R:
person(given = "Mark",
family = "Padgham",
Expand Down
18 changes: 12 additions & 6 deletions R/graph-contraction.R
Original file line number Diff line number Diff line change
Expand Up @@ -43,8 +43,10 @@ m4ra_contract_graph <- function (graph, city) {
hash <- substring (attr (graph, "hash"), 1, 6)
fname_c <- fs::path (
cache_dir,
paste0 ("m4ra-", city, "-", wt_profile, "-graphc-",
hash, ".Rds")
paste0 (
"m4ra-", city, "-", wt_profile, "-graphc-",
hash, ".Rds"
)
)

if (fs::file_exists (fname_c)) {
Expand All @@ -59,8 +61,10 @@ m4ra_contract_graph <- function (graph, city) {

fname <- fs::path (
cache_dir,
paste0 ("m4ra-", city, "-", wt_profile, "-graph-",
hash, ".Rds")
paste0 (
"m4ra-", city, "-", wt_profile, "-graph-",
hash, ".Rds"
)
)
if (!fs::file_exists (fname)) {
flist <- cache_one_graph (graph, city)
Expand Down Expand Up @@ -94,8 +98,10 @@ m4ra_contract_graph <- function (graph, city) {

fname_e <- fs::path (
cache_dir,
paste0 ("m4ra-", city, "-", wt_profile, "-edgemap-",
substring (hash, 1, 6), ".Rds")
paste0 (
"m4ra-", city, "-", wt_profile, "-edgemap-",
substring (hash, 1, 6), ".Rds"
)
)
fst::write_fst (edge_map, fname_e, compress = 0)
}
Expand Down
2 changes: 1 addition & 1 deletion codemeta.json
Original file line number Diff line number Diff line change
Expand Up @@ -7,7 +7,7 @@
"codeRepository": "https://github.com/UrbanAnalyst/m4ra",
"issueTracker": "https://github.com/UrbanAnalyst/m4ra/issues",
"license": "https://spdx.org/licenses/GPL-3.0",
"version": "0.1.1.030",
"version": "0.1.1.031",
"programmingLanguage": {
"@type": "ComputerLanguage",
"name": "R",
Expand Down

0 comments on commit 2303120

Please sign in to comment.