#' Calculate size based golden ratio #' #' @export golden_ratio <- function (x = 500) { y <- x * 1.618 return(y) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.