roads(color=grep("dark", colors(), value=TRUE), lwd=2:3)
waves(color=grep("wheat", colors(), value=TRUE), lwd=2)
waves01(color=grep("orchid", colors(), value=TRUE), lwd=2:5)
waves02(color=colors(), lwd=2)
# one color only
sticks(color="violet", lwd=2)
Run the code above in your browser using DataLab