Nothing
#' @title Afmdata check.
#'
#' @description Checks wether an R object is an afmdata or not.
#' @usage is.afmdata(x)
#' @param x Any \bold{R} object.
#' @return Returns \code{TRUE} if its argument is an afmdata (that is, has "afmdata"
#' amongst its classes) and \code{FALSE} otherwise.
#'
#' @export
is.afmdata <- function(x){
inherits(x,"afmdata")
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.