much at mat.uni.torun.pl escribi?:
> I try to force maxima to plot graphs of many constant functions
> without the description which line represents which function. Can I
> achieve this with wxMaxima interface? (I dont use XMaxima and I dont
> know graphics programming underlying gnuplot).
> Below is the code:
>
> reset(f,x);
> f(x):=4*x*(1-x); //dynamical system
> reset(aa,dll,dlls,Aa,Aalf);
> aa:0.745; //starting point
> dlls:400; //cut-off the beginning of orbit
> dll:480; //cut-off the infinite tail
> Aa[0]:aa;
> for i thru dll do Aa[i]:f(Aa[i-1]); //find the orbit
> Aalf:makelist(Aa[i],i,dlls,dll);
> plot2d(Aalf,[x,0,1],[y,0,1]); //this plots ,,the chaotic Balmer ;) lines"
> //to show the behavior of the orbit
>
You can try:
load(draw);
draw2d(points_joined=true, points(Aalf));
Here is another alternative for building and rendering list Aalf:
(w[1]:0.745, w[n]:= 4.0*w[n-1]*(1-w[n-1]))$
Aalf: makelist(w[k], k, dlls, dll)$
draw2d(points_joined=true,points(Aalf))$
Package draw needs gnuplot 4.2 or later.
hth
--
Mario Rodriguez Riotorto
www.biomates.net