please use R

Type into R x=rbinom (20,size=3,prob= 75) Suppose you expect that this data x is distributed as a Binomial(3,p) where p is an uknown parameter with the prior that, S(p) & (1-P)(p-1) supported on (1,1) Write code below that can easy be copy-and-pasted directly into R which will draw the posterior distribution. Make sure that your posterior is correctly normalized. Draw this plot by sub-dividing the interval [0.5, 1.0) into 50 sub-intervals and computing the pos- terior at each of those individual points. Together all these points Type into R x=rbinom (20,size=3,prob= 75) Suppose you expect that this data x is distributed as a Binomial(3,p) where p is an uknown parameter with the prior that, S(p) & (1-P)(p-1) supported on (1,1) Write code below that can easy be copy-and-pasted directly into R which will draw the posterior distribution. Make sure that your posterior is correctly normalized. Draw this plot by sub-dividing the interval [0.5, 1.0) into 50 sub-intervals and computing the pos- terior at each of those individual points. Together all these points