#' Makes HTML hyper link
#' @param files character vector of filenames
#' @return link command vector
#' @details Used in making HTML files
#' @export
#'
make.hyperlink <- function(files,links){
link.command <- rep("",length(files))
for(file.iter in 1:length(files)){
link.command[file.iter] <- paste0("<a href=\"file:///",files[file.iter],"\">",links[file.iter],"</a>")
}
return(link.command)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.