## ----setup, include = FALSE----------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
## ---- echo=FALSE---------------------------------------------------------
system.file("extdata/LipidQ_DataBase", package = "lipidQ")
## ---- echo=FALSE---------------------------------------------------------
system.file("app/", package = "lipidQ")
## ----echo = FALSE--------------------------------------------------------
library(knitr)
data <- read.csv(system.file("extdata/LipidQ_DataBase/userSpecifiedColnames.csv"
, package = "lipidQ"), stringsAsFactors = FALSE)
data[1,] <- "TYPE_NAME_HERE"
kable(data[,1:7])
kable(data[,8:ncol(data)])
## ----echo = FALSE--------------------------------------------------------
library(knitr)
data <- read.csv(system.file("extdata/LipidQ_DataBase/userSpecifiedColnames.csv"
, package = "lipidQ"), stringsAsFactors = FALSE)
kable(data[,1:7])
kable(data[,8:ncol(data)])
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.