Nothing
#' @export
universals::nsims
#' @inherit universals::nsims
#' @details Always 1L.
#' @export
#'
#' @examples
#' nsims(nlist(x = 1:2))
nsims.nlist <- function(x, ...) {
1L
}
#' @inherit universals::nsims
#' @export
#'
#' @examples
#' nsims(nlists(nlist(x = c(2, 9)), nlist(x = c(1, 7))))
#' nsims(split_chains(nlists(nlist(x = c(2, 9)), nlist(x = c(1, 7)))))
nsims.nlists <- function(x, ...) {
length(x)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.