#' @title Select an element of each vector from a list
#' @description Selects y'th element of each vector from a list
#' @param x list
#' @param y number of element. Must be integer
#' @keywords internal
#' @export
#'
select <- function(x,y) sapply(x, "[", y)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.