R/qtl1 doesn’t have any code to pick out multiple peaks on a chromosome in scanone output. For scantwo, you can look at evidence for a second QTL, given the first on a chromosome.
Rather than try to identify the multiple peaks in the output of scanone, I would encourage you to fit multiple-QTL models, such as with fitqtl().
karl