3. Default rate. You are told that there are an average of 10 defaults in a loan portfolio each month. Assume that the number of monthly defaults follows a Poisson distribution.

Simulate a time series of monthly defaults for 48 periods using rpois(n, lambda).