Function retrieved from label_number(scale_cut = cut_short_scale()) fails

[lschneiderbauer]

I am not sure this package is meant to be used outside the context of 'ggplot2', but I was simply looking for a function that converted my numbers in a nice human readable fashion, and scales seems to provide just that.

However, the function seems to fail in certain conditions:

library(scales)

conv_label <- label_number(scale_cut = cut_short_scale())

y <- c(1460.6155, 848.2228, 572.0146)
conv_label(y)
#> [1] "1K"  "848" "572"

x <- c(1460.6155, 848.2228, 572.0146, 1014.9259)
conv_label(x)
#> Error in break_suffix[bad_break][improved_break & !power10_break] <- names(lower_break[improved_break & : NAs nicht zugelassen in Teilbereichszuweisungen

^{Created on 2025-01-28 with reprex v2.1.1}

There is no obvious reason to me why it should not work for the second example.
I am using scales 1.3.0.

[teunbrand]

Hi there thanks for the report! I think this is a duplicate of #413, which is already fixed in the development version