Sappiamo che exp(x) = 1 + x + x
2
/2 + x
3
/3! + x
4
/4! + ... (l'addendo
n-
esimo è x
n−1
/(n−1)!). Spiega che cosa calcolano i seguenti comandi di
R
, e perché.
A
<- function(n) sum( 1/factorial(seq(0,n,1)) )
for(n in 0:17) print(A(n), 15)