never_give_up: Wrapper to keep trying an expression until no error is...

In Aaron0696/aaRon: Personal Package of Home-Brewed Functions

Wrapper to keep trying an expression until no error is received

Description

Convenience wrapper to allow an expression to keep evaluating (until 10 attempts) until it completes without error, plays a sound when done if beepr is installed.

Usage

never_give_up(expr, sound = "fanfare", message = "Never gonna give you up.")

Arguments

expr	Expression to be evaluated
sound	Fed into beepr::beep(). Defaults to 'fanfare'

Value

Output of expression when completed

Examples

test <- function(e){if(runif(1) < 0.8){stop("Error")}else{"Good"}}
never_give_up(test())
never_give_up(test(), sound = "mario", message = "I wish this would work...")

Aaron0696/aaRon documentation built on July 27, 2023, 2:05 p.m.