Warning: `qplot()` was deprecated in ggplot2 3.4.0. e.g. ``` cal_hist_plot <- qplot(cal.plsr.data[,paste0(inVar)],geom="histogram", main = paste0("Cal. Histogram for ",inVar), xlab = paste0(inVar),ylab = "Count",fill=I("grey50"),col=I("black"), alpha=I(.7)) ```