powered by
granplot(x, xc = 1, hist = TRUE, cum = TRUE, main = "", col.cum = "red", col.hist="gray")
data(granulo) granplot(granulo,xc=1,hist=TRUE,cum=TRUE,main="Grain-size Distribution", col.hist="grey",col.cum="black")
Run the code above in your browser using DataLab