Question: Maple - Bifurcations

I have the command;

> restart: Digits:=20: N:=10000: M:=100: x_max:=1: r_min:=2.5:
> 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:=r*x*(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);

 

This plots the bifurcation diagram for the logistic model f(x) = r*x*(1-x).

How do i plot the bifurcation diagram for f(x) = r*(8 - 2*x^2). 

I've tried just replacing the function but it does not work.

 

Please Wait...