Изменить параметры / палитру ggplot2 по умолчанию в функции темы

Question

Я пытаюсь переопределить палитру графика, используя личную функцию темы , но, похоже, я не могу изменить функцию внутри функции.

Итак, если я запускаю следующее, мне удается то, что мне нужно, но не тогда, когда я вставляю эту строку кода в мою тему.

my_colours_pal <- c("#EBB600", "#40A4D8", "#5D3A9B", "#DC3220", "#D35FB7, "#32CD32")
scale_colour_discrete <- function(...) ggplot2::scale_colour_manual(my_colours_pal)

Есть ли способ, которым я мог бы повторноопределить «внешние» функции в моей новой функции?Это похоже на assign(), но с функциями.Нравится:

changefxs <- function (condition) {
  my_colours_pal <- c("#EBB600", "#40A4D8", "#5D3A9B", "#DC3220", "#D35FB7, "#32CD32")
  scale_colour_discrete <- function(...) ggplot2::scale_colour_manual(my_colours_pal)
}