Does the equation below have a name, or is it similar to some other well-known process/ equation?
Equation of interest:
$$S_c = S_{c-1} + S_{c-1}\omega_c\delta_c$$ $\delta\sim\mathcal{N}(0,1)$ is a standard normal shock
$\omega\sim\mathcal{B}(1,~0.5)$ is a coin flip with a 50% chance of being 1 (0 otherwise)
$c=(1,~2,~\dots,~C^{\ast})$ is sequence of coin flips ($C^{\ast}$ total flips)
$S_0\sim\mathcal{N}(0,1)$ initializes the process
$S_{C^{\ast}}$ is the value of $S_c$ at the end of the iterations, and is the value of interest.
Note that the $c^{th}$ coin flip dictates whether or not the $c^{th}$ standard normal shock occurs, and thus whether or not $S_c$ is different from $S_{c-1}$.
Below is some R code that will generate one value of $S_{C^{\ast}}$ when $C^{\ast}$ is 4. It's set up to make the omegas and deltas the same each time, but to allow the order in which they accumulate to be random. Note that the order of accumulation for a given set of omegas and deltas does not affect the value of $S_{C^{\ast}}$.
set.seed(2) # set the RNG seed so that all the shocks and coin flips are the same
Cstar <- 4 # number of coin flips/ number of iterations
S0 <- rnorm(1) # initial standard normal shock
Sc <- c(S0, rep(NA, Cstar)) # vector to hold the shocks as they accumulate
deltas <- rnorm(Cstar) # standard normal shocks
omegas <- rbinom(Cstar, 1, 0.5) # coin tosses
rm(.Random.seed, envir=globalenv()) # remove the non-random seed, so the order in which the shocks/ coin flips are accumulated is random
c.2.Cstar <- sample(1:Cstar, Cstar) # a scrambled sequence from c=1 to C*
ctr <- 1 # the counter used for indexing Sc (but not the omegas and deltas)
for(i in c.2.Cstar){
ctr <- ctr+1
Sc[ctr] <- Sc[ctr-1] + Sc[ctr-1]*omegas[i]*deltas[i]
}
SCstar <- Sc[ctr]
print(c.2.Cstar)
print(SCstar)