Cut and paste the following code into R:
barplot(c(4,0,13,2),c(4,4,2,5),space=0, col="blue", main="Dividend Earnings in 1986", xlab="hundreds of dollars", ylab="Density % per 100$") axis(1)The histogram of dividend earnings in 1986 for a sample of 180 persons is given in the figure produced by the code above. There are no persons in the sample having dividend earnings in excess of $1,500. The block over the interval from $400 to $800 is missing. The height of this missing block is closest to...