R code for a binomial tree for financial mathematics. This is the formula I am trying to write into R markdown:

I believe i need a loop of some sort. the function given by part 1. needs to be only exercised when >0.

I will attach my code as well...

BlackScholes 0){print(G)} F

some more code i tried, I still need to add the summation though, and still I am not sure if it is correct

build_stock_tree 0){print((S*(U^j)*(D^(i-j))-K)*(factorial(i)/(factorial(j)*factorial(i-j)))*P^(j-1)*(1-P)^((i-1)-(j-1)))} } } return(tree) } firstExample by: fo = REK=of (k, n k)()p*K(1 p*)n-k, where: 1. f(k,n k) = f(Souk dn-K) = (Souk dn-k k)+ 2. u = eovat 3. d = e-ovat R-d 4. p* u-d 5. R=en eh