Skip to contents

Run expressions with logging outputs

Usage

echo(exprs, to = stdout(), msg = TRUE)

Arguments

exprs

Expressions

to

Output locations

msg

If FALSE does not print results from message()

Details

Function is deprecated. Use echo::echo() instead.

Examples

if (package_available("echo")) {
  try(echo::echo({
    1 + 1
    Sys.sleep(2)
    print(head(mtcars))
    message(1)
    warning(2)
    stop(3)
  },
  level = 0
  ))
}
#> [2023-12-05 20:15:48] [EXP] 1 + 1
#> [2023-12-05 20:15:48] [EXP] Sys.sleep(2)
#> [2023-12-05 20:15:50] [EXP] print(head(mtcars))
#> [2023-12-05 20:15:50] [OUT] #>                    mpg cyl disp  hp drat
#> [2023-12-05 20:15:50] [OUT] #> Mazda RX4         21.0   6  160 110 3.90
#> [2023-12-05 20:15:50] [OUT] #> Mazda RX4 Wag     21.0   6  160 110 3.90
#> [2023-12-05 20:15:50] [OUT] #> Datsun 710        22.8   4  108  93 3.85
#> [2023-12-05 20:15:50] [OUT] #> Hornet 4 Drive    21.4   6  258 110 3.08
#> [2023-12-05 20:15:50] [OUT] #> Hornet Sportabout 18.7   8  360 175 3.15
#> [2023-12-05 20:15:50] [OUT] #> Valiant           18.1   6  225 105 2.76
#> [2023-12-05 20:15:50] [OUT] #>                      wt  qsec vs am gear
#> [2023-12-05 20:15:50] [OUT] #> Mazda RX4         2.620 16.46  0  1    4
#> [2023-12-05 20:15:50] [OUT] #> Mazda RX4 Wag     2.875 17.02  0  1    4
#> [2023-12-05 20:15:50] [OUT] #> Datsun 710        2.320 18.61  1  1    4
#> [2023-12-05 20:15:50] [OUT] #> Hornet 4 Drive    3.215 19.44  1  0    3
#> [2023-12-05 20:15:50] [OUT] #> Hornet Sportabout 3.440 17.02  0  0    3
#> [2023-12-05 20:15:50] [OUT] #> Valiant           3.460 20.22  1  0    3
#> [2023-12-05 20:15:50] [OUT] #>                   carb
#> [2023-12-05 20:15:50] [OUT] #> Mazda RX4            4
#> [2023-12-05 20:15:50] [OUT] #> Mazda RX4 Wag        4
#> [2023-12-05 20:15:50] [OUT] #> Datsun 710           1
#> [2023-12-05 20:15:50] [OUT] #> Hornet 4 Drive       1
#> [2023-12-05 20:15:50] [OUT] #> Hornet Sportabout    2
#> [2023-12-05 20:15:50] [OUT] #> Valiant              1
#> [2023-12-05 20:15:50] [EXP] message(1)
#> [2023-12-05 20:15:50] [MSG] #> 1
#> [2023-12-05 20:15:50] [EXP] warning(2)
#> [2023-12-05 20:15:50] [WRN] #> 2
#> [2023-12-05 20:15:50] [EXP] stop(3)
#> [2023-12-05 20:15:50] [ERR] #> 3
#> Error : Error in stop(3)
#>   3