# Load data
p <- read.csv(file.choose())
colnames(p)
hist(p$Speed_during, xlab = "Speed in 2020", ylab = "Frequency",
main = "",breaks= 20, xlim= c(0, 120), w=20)
hist(p$Volume_during, xlab = "Volume in 2020", ylab = "Frequency", main = "",
breaks= 20, xlim= c(0, 120), w=20)
#breaks=beans
0 comments:
Post a Comment