powered by
Product of a function
prodf(f, var, lower, upper, doit = TRUE)
Function to take product of
Variable to take product for (either string or caracas_symbol)
caracas_symbol
Lower limit
Upper limit
Evaluate the product immediately (or later with doit())
doit()
# NOT RUN { if (have_sympy()) { x <- symbol("x") p <- prodf(1/x, "x", 1, 10) p as_r(p) prod(1/(1:10)) n <- symbol("n") prodf(x, x, 1, n) } # }
Run the code above in your browser using DataLab