Nothing
#' Pipe operator
#'
#' See \code{magrittr::\link[magrittr:pipe]{\%>\%}} for details.
#'
#' @name %>%
#' @rdname pipe
#' @keywords internal
#' @export
#' @importFrom magrittr %>%
#' @usage lhs \%>\% rhs
NULL
#' Abort if not
#'
#' @param cnd Condition to be evaluated.
#' @param message Message to display if condition is false.
#'
#' @author João Macalós
#'
#' @keywords internal
#'
abortifnot <- function(cnd, message = NULL) {
if (isFALSE(cnd)) rlang::abort(message)
}
#'
#' @keywords internal
#'
release_questions <- function() {
c(
"Have you check that all models are running without errors? The best way to check it is to \n
wait for Travis to build and check the package's webpage. If there's an error in any model,\n
the page will return a 404 error."
)
}
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.