For Loop Coin Toss In R, there is two-coins thrown in each test.