data(example3)
sym.data<-example3
sym.scatterplot(sym.var(sym.data,1),sym.var(sym.data,4),col='blue',
main='Main Title')
sym.scatterplot(sym.var(sym.data,1),sym.var(sym.data,4),labels=TRUE,col='blue',
main='Main Title')
sym.scatterplot(sym.var(sym.data,2),sym.var(sym.data,6),labels=TRUE,
col='red',main='Main Title',lwd=3)
data(oils)
sym.scatterplot(sym.var(oils,2),sym.var(oils,3),labels=TRUE,
col='red',main='Oils Data')
data(lynne1)
sym.scatterplot(sym.var(lynne1,2),sym.var(lynne1,1),labels=TRUE,
col='red',main='Lynne Data')
Run the code above in your browser using DataLab