Write the code in R!

Suppose we want to simulate an experiment that can take outcomes 1,...,n with probabilies P1, ...,Pn. To be specific, suppose the R-vector p=c(.1,.2,.3,.35, .02, .03) gives the desired probabilities. Write R code that produces a number from 1 to 6 with the given probabilities, without using if statements. I recommend using the R command cumsum to do this, though there many possible approaches. Try to do this with a single line of R code. You cannot use the sample function for this