Skip to content
Snippets Groups Projects

Flexible projection horizons

Merged Ernst, Julian requested to merge ernstj-main-patch-51118 into main
1 file
+ 8
0
Compare changes
  • Side-by-side
  • Inline
+ 8
0
@@ -267,6 +267,10 @@ report_simulation <- function() {
summarise(N = mean(N)) %>%
mutate(run = "Mean") %>%
ungroup()
# Update max year for population pyramids
updateNumericInput(session, "year", min = min(Age1$Year), max = max(Age1$Year))
rbind(Age2, Age1)
} else {
# If no csv is available, read RDS
@@ -279,6 +283,10 @@ report_simulation <- function() {
summarise(N = mean(N)) %>%
mutate(run = "Mean") %>%
ungroup()
# Update max year for population pyramids
updateNumericInput(session, "year", min = min(Age1$Year), max = max(Age1$Year))
rbind(Age2, Age1)
}
}
Loading