#' Base type for Optotrak data
opto <- function() structure(list(), class = 'opto')
#' Extracts dataframe from opto object
#' @export
as.data.frame.opto <- function(x) x$df
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.