predict_spectra error "arguments imply differing number of rows" even with example data

[jmh579]

Example code provided with function causes error:

Error in data.frame(..., check.names = FALSE) :
arguments imply differing number of rows: 175, 0

Bug identified: updated save_model() output file column names changed but the predict_spectra() function was not updated accordingly. Change column name for best number of components from "best.ncomp" to "best.ncomp_mode."