mirror of
				https://github.com/msberends/AMR.git
				synced 2025-10-31 00:08:24 +01:00 
			
		
		
		
	(v3.0.0.9015) plotting fix
This commit is contained in:
		| @@ -1,6 +1,6 @@ | |||||||
| Package: AMR | Package: AMR | ||||||
| Version: 3.0.0.9014 | Version: 3.0.0.9015 | ||||||
| Date: 2025-07-18 | Date: 2025-07-19 | ||||||
| Title: Antimicrobial Resistance Data Analysis | Title: Antimicrobial Resistance Data Analysis | ||||||
| Description: Functions to simplify and standardise antimicrobial resistance (AMR) | Description: Functions to simplify and standardise antimicrobial resistance (AMR) | ||||||
|   data analysis and to work with microbial and antimicrobial properties by |   data analysis and to work with microbial and antimicrobial properties by | ||||||
|   | |||||||
							
								
								
									
										2
									
								
								NEWS.md
									
									
									
									
									
								
							
							
						
						
									
										2
									
								
								NEWS.md
									
									
									
									
									
								
							| @@ -1,4 +1,4 @@ | |||||||
| # AMR 3.0.0.9014 | # AMR 3.0.0.9015 | ||||||
|  |  | ||||||
| This is primarily a bugfix release, though we added one nice feature too. | This is primarily a bugfix release, though we added one nice feature too. | ||||||
|  |  | ||||||
|   | |||||||
| @@ -177,8 +177,8 @@ ggplot_sir <- function(data, | |||||||
|                        nrow = NULL, |                        nrow = NULL, | ||||||
|                        colours = c( |                        colours = c( | ||||||
|                          S = "#3CAEA3", |                          S = "#3CAEA3", | ||||||
|                          SI = "#3CAEA3", |  | ||||||
|                          SDD = "#8FD6C4", |                          SDD = "#8FD6C4", | ||||||
|  |                          SI = "#3CAEA3", | ||||||
|                          I = "#F6D55C", |                          I = "#F6D55C", | ||||||
|                          IR = "#ED553B", |                          IR = "#ED553B", | ||||||
|                          R = "#ED553B" |                          R = "#ED553B" | ||||||
|   | |||||||
| @@ -1490,7 +1490,7 @@ labels_sir_count <- function(position = NULL, | |||||||
| } | } | ||||||
|  |  | ||||||
| expand_SIR_colours <- function(colours_SIR, unname = TRUE) { | 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 (is.null(names(colours_SIR))) { | ||||||
|     if (length(colours_SIR) == 1) { |     if (length(colours_SIR) == 1) { | ||||||
|   | |||||||
| @@ -9,7 +9,7 @@ ggplot_sir(data, position = NULL, x = "antibiotic", | |||||||
|   fill = "interpretation", facet = NULL, breaks = seq(0, 1, 0.1), |   fill = "interpretation", facet = NULL, breaks = seq(0, 1, 0.1), | ||||||
|   limits = NULL, translate_ab = "name", combine_SI = TRUE, |   limits = NULL, translate_ab = "name", combine_SI = TRUE, | ||||||
|   minimum = 30, language = get_AMR_locale(), nrow = NULL, colours = c(S |   minimum = 30, language = get_AMR_locale(), nrow = NULL, colours = c(S | ||||||
|   = "#3CAEA3", SI = "#3CAEA3", SDD = "#8FD6C4", I = "#F6D55C", IR = "#ED553B", |   = "#3CAEA3", SDD = "#8FD6C4", SI = "#3CAEA3", I = "#F6D55C", IR = "#ED553B", | ||||||
|   R = "#ED553B"), datalabels = TRUE, datalabels.size = 2.5, |   R = "#ED553B"), datalabels = TRUE, datalabels.size = 2.5, | ||||||
|   datalabels.colour = "grey15", title = NULL, subtitle = NULL, |   datalabels.colour = "grey15", title = NULL, subtitle = NULL, | ||||||
|   caption = NULL, x.title = "Antimicrobial", y.title = "Proportion", ...) |   caption = NULL, x.title = "Antimicrobial", y.title = "Proportion", ...) | ||||||
|   | |||||||
		Reference in New Issue
	
	Block a user
	 github-actions[bot]
					github-actions[bot]