Fix bug where location_barnett_metrics wouldn't include local_date
parent
c2a74b1cba
commit
dba2664ae5
|
@ -31,6 +31,7 @@ accuracy_limit <- snakemake@params[["accuracy_limit"]]
|
|||
timezone <- snakemake@params[["timezone"]]
|
||||
metrics_to_include <- intersect(unlist(snakemake@params["metrics"], use.names = F),
|
||||
c("hometime","disttravelled","rog","maxdiam","maxhomedist","siglocsvisited","avgflightlen","stdflightlen","avgflightdur","stdflightdur","probpause","siglocentropy","minsmissing","circdnrtn","wkenddayrtn"))
|
||||
metrics_to_include <- c("local_date", metrics_to_include)
|
||||
|
||||
# By deafult we use all raw locations: fused without resampling and not fused (gps, network)
|
||||
location <- read.csv(snakemake@input[["raw"]], stringsAsFactors = F) %>%
|
||||
|
@ -61,4 +62,4 @@ if (nrow(location) > 1){
|
|||
|
||||
} else {
|
||||
write_empty_file(snakemake@output[[1]], metrics_to_include)
|
||||
}
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue