##' Internal empty object for pepe mapping
##'
##' Internal empty object for pepe mapping
##' @title Internal empty object for pepe mapping
##' @param ... No parameters needed
##' @return data.frame
##' @author Jochen Kruppa
##' @export
empty_map_pep_list <- function(...){
list(count_df = tibble(genebank_id = "",
count_prot = ""),
alignment_df = tibble(qname = "",
prot_id = "",
pos_start = NA,
pos_end = NA,
genebank_id = NA,
ident = 0))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.