code duplication checking parameters

[hechth]

RAMClustR/R/findmass.R

Lines 27 to 42 in 36fce5b

	rttol = 2,
	zmax = 6,
	m.check = TRUE)
	{
	if(is.null(ramclustObj)) {
	stop("must supply ramclustObj as input. i.e. ramclustObj = RC", '\n')
	}
	if (is.null(mz)) {
	stop("must set 'mz'", "\n")
	}
	if (is.null(mztol)) {
	stop("must set 'mztol'", "\n")
	}
	tar <- which(abs(ramclustObj$fmz - mz) <= mztol)

Duplicated with

RAMClustR/R/findfeature.R

Lines 40 to 45 in 36fce5b

	if (is.null(mz)) {
	stop("must set 'mz'", "\n")
	}
	if (is.null(mztol)) {
	stop("must set 'mztol'", "\n")
	}