factorial_r <- function(n) { if (n <= 1) { return(1) } n * factorial_r(n - 1) } factorial_r(5)
Click Run to execute this code.