Nothing
knitr::opts_chunk$set(echo = FALSE)
genes_df <- params$df colnames(genes_df) <- c("Old Symbol", "Converted Symbol", "Change", "p-value") genes_df <- genes_df[genes_df[, 1] != genes_df[, 2], ] knitr::kable(genes_df, align = "c", table.caption.prefix ="")
org_df <- params$original_df missing_df <- org_df[!org_df[, 1] %in% params$df[, 1], ] knitr::kable(missing_df, align = "c", table.caption.prefix ="")
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.