Nothing
# Output results -------------------------------------------------------- p_results <- data.frame( Test = c("Maximum Logrank", rep("Weighted Logrank", 4)), rho = c("0011", 0, 0, 1, 1), gamma = c("0101", 0, 1, 0, 1), power = params$p_pow) p_results
# Output results -------------------------------------------------------- knitr::kable(p_results)
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.