ggmosaic: ошибка «Дискретное значение для непрерывного масштабирования» при импорте ggplot2/ggmosaic

Question

В своем пакете я люблю создавать мозаичный сюжет. В интерактивном сеансе это хорошо работает. Однако, если я вызываю функцию из нового сеанса R с devtools::load_all, возникает ошибка «Дискретное значение, поступающее в непрерывную шкалу».

Вот минимальный рабочий пример:

      test_ggmosaic <- function(dat) {
    dat <- datasets::mtcars
    p <- ggplot2::ggplot(data=dat)+
        ggmosaic::geom_mosaic(
            ggplot2::aes(weight=mpg,x=ggmosaic::product(gear, cyl), fill=mpg)
        ) +
        ggplot2::theme_bw()+
        ggplot2::scale_fill_discrete(guide=ggplot2::guide_legend(reverse=TRUE)
    )
    return(p)
}

Теперь, когда эта функция определена внутри пакета, и ggplot2 и ggmosaic добавлены к Imports поле в DESCRIPTION файл, и я вызываю эту функцию после загрузки devtools и (через load_all) пакет, в котором находится функция, я получаю сообщение об ошибке

      Fehler: Discrete value supplied to continuous scale

С другой стороны, когда я сначала выполняю

      library(ggplot2)
library(ggmosaic)

а затем вызовите указанную выше функцию, появится график (и в этом примере не имеет особого смысла).