#' Print all rows
#'
#' Print all rows of a tibble
#'
#' @param tbl Input tibble
#' @export
pinf <- function(tbl){
print(tbl,n=Inf)
}
#' Print more rows
#'
#' Print 200 rows of a tibble
#'
#' @param tbl Input tibble
#' @export
pmore <- function(tbl){
print(tbl,n=200)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.