context("lipidmaps")
test_that("lipidmaps",
{
expect_true(is.data.frame(LMsearch("ZKRPGPZHULJLKJ-JHRQRACZSA-N")))
expect_true(is.data.frame(LMsearch("C18H32O2")))
expect_error(LMsearch("Oleic acid"))
}
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.