P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-07-27 13:07:54 +02:00
Code Releases Activity

(v3.0.0.9015) plotting fix

Browse Source
This commit is contained in:
github-actions[bot]
2025-07-19 14:06:36 +02:00
parent 49274f010b
commit 6cb724a208
5 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
R/ggplot_sir.R
View File

@ -177,8 +177,8 @@ ggplot_sir <- function(data,
nrow = NULL,
colours = c(
S = "#3CAEA3",
SI = "#3CAEA3",
SDD = "#8FD6C4",
SI = "#3CAEA3",
I = "#F6D55C",
IR = "#ED553B",
R = "#ED553B"

2
R/plotting.R
View File

@ -1490,7 +1490,7 @@ labels_sir_count <- function(position = NULL,
}
expand_SIR_colours <- function(colours_SIR, unname = TRUE) {
sir_order <- c("S", "SDD", "I", "R")
sir_order <- c("S", "SDD", "SI", "I", "IR", "R")
if (is.null(names(colours_SIR))) {
if (length(colours_SIR) == 1) {