R/identifyPoints.r

Defines functions identifyPoints

#' @export
identifyPoints<-function(dat,X='X',Y='Y',tl=.25){

x<-as.vector(unlist(dat[X]))
y<-as.vector(unlist(dat[Y]))
rows<-identify(x,y,tol=tl)
dat[rows,]

}
LobsterScience/bio.lobster documentation built on Feb. 14, 2025, 3:28 p.m.