Use ggplot2 instead of base