It's desired to model the random variable X with a shape that rises to a peak near x=6 and whose possible values are integers 1-6. Copy paste the following lines of code into R: x

Extracted text: It's desired to model the random variable X with a shape that rises to a peak near x=6 and whose possible values are integers 1-6. Copy paste the following lines of code into R: x <- 1:10="" shape=""><- x*(12-x)="" barplot(shape,="" names.="" arg="x)" this="" "shape"="" isn't="" a="" valid="" pmf="" because="" the="" numbers="" don't="" sum="" to="" 1.="" convert="" the="" numbers="" in="" "shape"="" to="" valid="" probabilities="" and="" report="" p(x-5).="" copy/paste="" all="" digits="" from="" r="" into="" your="" answer="">