Code
w1 <- simpleWarning("This is a warning")
cat(format_warning(w1))
Output
Warning: This is a warning
Code
w2 <- simpleWarning("This is a warning", call = quote(f()))
cat(format_warning(w2))
Output
Warning in f(): This is a warning
Code
w3 <- rlang::warning_cnd(message = "This is a warning")
cat(format_warning(w3))
Output
<warning/rlang_warning>
Warning:
This is a warning
Code
w4 <- rlang::warning_cnd(message = "This is a warning")
cat(format_warning(w4))
Output
<warning/rlang_warning>
Warning:
This is a warning
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.