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

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

---

Originally was opened as:

• In spc.bin(), na.rm = 2 throws error  cbeleites/hyperSpec#241