rnk.file <- "./inst/extdata/naive.vs.th1.rnk"
exampleRanks <- read.table(rnk.file,
header=TRUE, colClasses = c("character", "numeric"))
exampleRanks <- setNames(exampleRanks$t, exampleRanks$ID)
devtools::use_data(exampleRanks)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.