dlsegments(c(-3, 3), c(1, 1000),
r = c("o", "o"), l = c("c", "o"), COL = COL[4]
)
dlsegments(c(-3, 3), c(1, 1000),
r = c("o", "o"), l = c("c", "o"), type = "un", COL = COL[4]
)
dlsegments(c(-3, 3), c(1, 1000),
r = c("o", "o"), l = c("c", "o"), type = "in", COL = COL[4]
)
Run the code above in your browser using DataLab