search for: ppmrange

...rame[["Intensity"]],decreasing = TRUE),] # Establish output frame using the most intense candidate newframe <- frame[1,] # Establish overlap-checking vector using the most intense candidate lowppm <- round(newframe[1,][["Mass"]]-newframe[1, [["Mass"]]/1E6*ppmrange,digits=digit) highppm <- round(newframe[1,][["Mass"]]+newframe[1, [["Mass"]]/1E6*ppmrange,digits=digit) presence <- seq(from=lowppm,to=highppm,by=10^(-digit)) # Walk through the entire original frame and check whether peaks are overlap-free ... do so until max of 200...