#' Open Directory on PC
#'
#' This is a helper function to open current project directory
#'
#' It doesn't require any specific parameters
#'
#' @param ... empty space
#'
#' @export
owin <- function(...) if(Sys.info()[1]=="Windows") shell(cmd="explorer .",intern=F,wait=F)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.