powered by
data(SIC)
data(SIC) points(sic.100, borders=sic.borders)
Run the code above in your browser using DataLab