Profiling: Example function

If your app is spending a lot of time calculating, you next need to figure out which calculation is slow.

library(profvis)

f <- function() {
  pause(2)
  g()
  h()
  10
}
g <- function() {
  pause(1)
  h()
}
h <- function() {
  pause(3)
}