data(Blank2022intmat)
fits <- calculateCurveFit(Blank2022intmat, idx = 1:5)
peakstats <- calculatePeakStatistics(curveFits = fits,
singlePeaks = Blank2022peaks,
spec = Blank2022spec)
head(peakstats)
Run the code above in your browser using DataLab