Run the following code in R: set.seed(1); x <- sort(rpois(365,rgamma(365,20,0.01))) The number of claims reported to an insurance company for a particular type of insurance policy have been recorded every day for the last 365 days. These are listed in the vector x. On average, one in every 100 claims is rejected by the insurer as it is deemed to be fraudulent, and this rate has been constant for many years. However, the insurer now expects that the number of fraudulent claims will increase by 4% next year. Estimate the skewness of the number of claims the insurer can expect to pay next year.
I didn't understand the solution for this. Can someone please explain?
I didn't understand the solution for this. Can someone please explain?