From 007083df735f2505bea3c327e14bbe98da65013c Mon Sep 17 00:00:00 2001 From: AQLT Date: Wed, 4 Oct 2023 18:45:10 +0200 Subject: [PATCH] method parameters harmonisation --- R/sc_d_summary_diagnostics.R | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/R/sc_d_summary_diagnostics.R b/R/sc_d_summary_diagnostics.R index 3189843..79f59ab 100644 --- a/R/sc_d_summary_diagnostics.R +++ b/R/sc_d_summary_diagnostics.R @@ -1,4 +1,5 @@ -summary_diagnostics <- function(x, digits = 2, decimal.mark = getOption("OutDec")){ +summary_diagnostics <- function(x, digits = 2, decimal.mark = getOption("OutDec"), + colours = c(`1` = "red", `2` = "yellow", `3` = "#A0CD63")){ UseMethod("summary_diagnostics", x) } summary_diagnostics.X13 <- function(x, digits = 2, decimal.mark = getOption("OutDec"),