###########################################################################/**
# @RdocFunction isSingle
# @alias singles
#
# @title "Identifies all entries that exists exactly once"
#
# \description{
# @get "title".
# }
#
# \usage{
# isSingle(x, ...)
# singles(x, ...)
# }
#
# \arguments{
# \item{x}{A @vector of length K.}
# \item{...}{Additional arguments passed to @see "isReplicated".}
# }
#
# \value{
# A @logical @vector of length K,
# indicating whether the value is unique or not.
# }
#
# @author
#
# \seealso{
# Internally @see "isReplicated" is used.
# }
#*/###########################################################################
isSingle <- function(x, ...) {
!isReplicated(x, ...)
}
singles <- function(x, ...) {
x[isSingle(x, ...)]
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.