> > 3100
>
>
x <- read.csv("Hist1.csv")
y <- read.csv("Hist2.csv")
hist(x[,1], col = "#ff00ff40", border = "#ff00ff", breaks = 10)
hist(y[,1], col = "#0000ff40", border = "#0000ff", breaks = 10, add = TRUE)
!
> > 3100
>
>
x <- read.csv("Hist1.csv")
y <- read.csv("Hist2.csv")
hist(x[,1], col = "#ff00ff40", border = "#ff00ff", breaks = 10)
hist(y[,1], col = "#0000ff40", border = "#0000ff", breaks = 10, add = TRUE)
!