code for graph

> plot(-x*(x-1)^2*(x-3),x=0..3,xtickmarks=[0,1,2,3], ytickmarks=[0,1,2,3],title=`y = f(x)`, titlefont=[TIMES,BOLD,18],axesfont=[TIMES,BOLD,16],view=[0..3,0..3],thickness=3);

>