getf("araignee.sci");
//
// convergence vers 0
//
r = 0.8;
U0=[0.5,0.9]; n = 10;
xset("window",0); xbasc();
s=araignee_verhulst(r,U0,n);
//
// convergence vers (r-1)/r
//
r = 2.8;
U0=[0.2,0.5,0.9]; n = 10;
xset("window",1); xbasc();
s=araignee_verhulst(r,U0,n);
//
// periode 2
//
r = 3.2;
U0=0.25; n = 20;
xset("window",2); xbasc();
s=araignee_verhulst(r,U0,n);
//
// periode 4
//
r = 3.455;
U0=0.2; n = 100;
xset("window",3); xbasc();
s=araignee_verhulst(r,U0,n);
//
// chaotique
//
r = 4;
U0=0.2; n = 100;
xset("window",4); xbasc();
s=araignee_verhulst(r,U0,n);

   
