In spc.bin(), na.rm = 2 throws error

[GegznaV]

Is an error expected in this situation (spc.bin(na.rm = 2))?

suppressPackageStartupMessages(library(hyperSpec))

# Example 1: Error
data(flu, package = "hyperSpec")
flu[[3, , 3, wl.index = TRUE]] <- NA_real_
spc.bin(flu, 1, na.rm = 2)
#> Error in tapply(spc@wavelength, bin, mean, na.rm = na.rm > 0): arguments must have same length

^{Created on 2020-08-03 by the reprex package (v0.3.0)}

More examples

suppressPackageStartupMessages(library(hyperSpec))

# Example 2: Error
data(flu, package = "hyperSpec")
flu[[, , 3, wl.index = TRUE]] <- NA_real_
spc.bin(flu, 1, na.rm = 2)
#> Error in tapply(spc@wavelength, bin, mean, na.rm = na.rm > 0): arguments must have same length

# Example 3: Error
data(flu, package = "hyperSpec")
flu[[3, ]] <- NA_real_
spc.bin(flu, 1, na.rm = 2)
#> Error in tapply(spc@wavelength, bin, mean, na.rm = na.rm > 0): arguments must have same length

[GegznaV]

Reopened as:

• In spc_bin(), na.rm = 2 throws error r-hyperspec/hyperSpec#54