# NOT RUN {
V2
mean(with(V2, rep(hits, times = ofreq)))
 var(with(V2, rep(hits, times = ofreq)))
 sum(with(V2, rep(hits, times = ofreq)))
# }
# NOT RUN {
 barplot(with(V2, ofreq),
          names.arg = as.character(with(V2, hits)),
          main = "London V2 rocket hits",
          col = "lightgreen", las = 1,
          ylab = "Frequency", xlab = "Hits") 
# }
Run the code above in your browser using DataLab