\HeaderA{fsetequal-methods}{Performs *set* equality on two Massvectors}{fsetequal.Rdash.methods}
\aliasA{fsetequal,Massvector,Massvector-method}{fsetequal-methods}{fsetequal,Massvector,Massvector.Rdash.method}
\aliasA{fsetequal,numeric,numeric-method}{fsetequal-methods}{fsetequal,numeric,numeric.Rdash.method}
\keyword{methods}{fsetequal-methods}
\keyword{manip}{fsetequal-methods}
\begin{Description}\relax
Performs *set* equality on two Massvectors
\end{Description}
\begin{Arguments}
\begin{ldescription}
\item[\code{obx}] see below in \bold{Methods} section
\item[\code{oby}] see below in \bold{Methods} section
\item[\code{error}] measurement error in \emph{e.g.} Da or as relative error
in parts per million (ppm)
\item[\code{ppm}] if \code{TRUE} then error in parts per million(ppm), in
arbitrary units otherwise.
\item[\code{uniq}] if \code{TRUE} compute non-crossing matching.
\end{ldescription}
\end{Arguments}
\begin{Section}{Methods}
\describe{
\item[obx = "numeric", oby = "numeric"] ...
\item[obx = "Massvector", oby = "Massvector"] ...
}
\end{Section}
\begin{SeeAlso}\relax
\code{\LinkA{Massvector-class}{Massvector.Rdash.class}},\code{\LinkA{fintersect-methods}{fintersect.Rdash.methods}},\code{\LinkA{intersect}{intersect}}
\end{SeeAlso}
\begin{Examples}
\begin{ExampleCode}
data(pldata)
pl1 <- pldata[[1]]
pl2 <- pldata[[4]]
fsetequal(pl1,pl1,error=0.1,ppm=FALSE)
fsetequal(pl1[,1,drop=TRUE],pl1[,1,drop=TRUE],error=0.1,ppm=FALSE)
fsetequal(pl1,pl2,error=0.1,ppm=FALSE)
\end{ExampleCode}
\end{Examples}

