R/peakSearch.R

In ajiangsfu/NMRphasing: Phase Error Correction and Baseline Correction for One Dimensional ('1D') 'NMR' Data

#' A function rather aimed at developers
#' @noRd
#'
peakSearch=function(datin){ ### datin is a vector
  peakInfo = peakDetectionCWTR(datin)
  majorPeakInfo = peakInfo$majorPeakInfo
  peakIndex = majorPeakInfo$peakIndex
  return(peakIndex)
}