vignettes/fg.R

f <- function(x) {
   x <- x + 1
   y <- g(x)
   dbsmsg(y)
   x^2 + y^2
}

g <- function(t) {
   if (t > 0) return(5)
   6
}

Try the partools package in your browser

Any scripts or data that you put into this service are public.

partools documentation built on May 2, 2019, 5:14 a.m.