assert_not_empty = function(df) {
stopifnot(is.data.frame(df))
stopifnot(nrow(df) > 0)
}
inverse_normalize = function(x) {
qnorm(rank(x, na.last = "keep") / (sum(!is.na(x)) + 1))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.