#' Intialise a new Bayes Fst Object
#'
#' @param data a dataset of class \code{bayesFstData} loaded by \code{readData}.
#'
#' @return an object of class \code{bayesFst}
#'
#' @importFrom methods new
#' @examples
#' bd = readData(system.file("extdata", "data_BB04.json", package = "rbayesfst"))
#' bf = init(bd)
#' @export
init = function(data){
b = new(BayesFst)
b$setData(data)
myObj = list(b = b, data = data)
class(myObj) = "bayesFst"
return(myObj)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.