Conditional Colors and Shapes in plot() with ifelse()