test <- function() {
genepath <- "inst/extdata/genes.txt"
genes = utils::read.table(
genepath,
sep = "\t",
stringsAsFactors = FALSE,
header = TRUE,
colClasses = "character",
check.names = FALSE
)
return(genes)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.