1
0
mirror of https://github.com/msberends/AMR.git synced 2025-07-08 16:42:10 +02:00

resistance predict

This commit is contained in:
2019-01-15 16:51:49 +01:00
parent 8db87a15e9
commit 1ee710c861
4 changed files with 54 additions and 193 deletions

View File

@ -335,9 +335,9 @@ ggplot_rsi_predict <- function(x, main = paste("Resistance prediction of", attri
ggplot2::geom_col() +
ggplot2::geom_errorbar(ggplot2::aes(ymin = se_min, ymax = se_max)) +
scale_y_percent() +
labs(title = main,
y = paste0("Percentage (", ylab, ")"),
x = "Year",
caption = paste0("(model: ", attributes(x)$model_title, ")"))
ggplot2::labs(title = main,
y = paste0("Percentage (", ylab, ")"),
x = "Year",
caption = paste0("(model: ", attributes(x)$model_title, ")"))
)
}