xxxxxxxxxx
print(r.eval("""
library('MASS'); data(Boston); n<-dim(Boston)[1]
svg(filename='Rplots.svg',width=6.5,height=5,pointsize=12,
onefile=T,family='courier',bg='whitesmoke',
antialias=c('default','none','gray','subpixel'))
plot(Boston[,'lstat'],col='#3636ff',type='o',pch=13,cex=.5)
grid(); dev.off()"""))
No comments:
Post a Comment