Rareplot error causes pipeline failure at process PHYLOSEQ_UNFILTERED

[alexpiper]

freyr is failing at process FREYR:PHYLOSEQ_UNFILTERED (fwhF2-fwhR2nDac) using the test dataset.

Error in break_suffix[bad_break][improved_break & !power10_break] <- names(lower_break[improved_break & : NAs are not allowed in subscripted assignments Calls: tryCatch ... get_labels -> <Anonymous> -> labels -> number -> scale_cut

The error seems to be with the scale_cut function, as reported in the scales repo r-lib/scales#413

Following a suggestion in that thread, a temporary workaround until scales is updated is replacing this line in the rareplot function in bin/functions.R :
scale_x_continuous(labels = label_number(scale_cut = cut_short_scale())) + with scale_x_continuous(label = scales::label_number(scale_cut = append(scales::cut_short_scale(), 1, 1)))+

This seems to fix the issue

[alexpiper]

Ive applied this workaround in c38b97a