here is my simulation
r
here is my simulation