#' Filter by row
#'
#' @param data a data.frame
#' @param selection seleted rows
#'
#' @return a filter data.frame
#' @export
#'
#' @examples
#' filter2(iris, c(1:10))
#'
filter2 <- function(data, selection) {
data[selection,]
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.