#276 Plot in R

png(file="D:/projects/wordpress/ex276/ex276.png",width=600, height=350)
f=function(x){x^3-3*x^2-9*x+2}
curve(f,-4,6,lwd=2,col="red")
grid(NULL,NULL,col="black")
dev.off()