I am trying to replicate my data by generating some random data and putting it through a simulation in R. In this simulation, there is a weighted probability that certain si