Question: Maple export to pdf

Hi, i am trying to export the following bifurcation diagram into a pdf.

 

Digits:=20: N:=10000: M:=100: x_max:=1: r_min:=0:
r_max:=4: for n from 0 to N do r:=r_min+n/N*(r_max-r_min):
x:=evalf(x_max*rand()/10^12):for m from 0 to M do x:=x*exp(r*(1 - x)): od:
X[n]:=x: od:
with(plots):
bifpoint:={seq([r_min+j/N*(r_max-r_min),X[j]],j=0..N)}:
pitchf:=pointplot(bifpoint,symbol=point):display(pitchf);

 

For some reason the graph is just blank, with just the axis when i export to pdf.

Please Wait...