I would like to use the function abline to plot several lines which should be made transparent but I am stuck.
Currently I have this code:
plot(x=NA, type="n", ylim=c(1, 9), xlim=c(1, 4), xlab="x-value",
ylab="y-value", cex.axis = 1, cex.lab = 1)
for (i in 1:nrow(one_hundred_regressions)) {abline(coef=one_hundred_regressions[i,],
col = "red")}

