Diskrétní dynamické systémy

Histogram četnosti

<<Matematika`Histgr`

Typ I   -  ergodické chování

f[x_]=1.0-1.9999 Abs[x]

?Histgr

Histgr[f[x],{x,-1.0,1.0},0.1,50000,Points->200,Typ->1,PlotRange->{0,1000}]

f[x_]=1.0-1.401155 x*x

Histgr[f[x],{x,-1.0,1.0},0.1,50000,Points->200,Typ->2]

f[x_]=a x(1-x)

a=1.5;

Histgr[f[x],{x,0,1.0},0.1,1000,Points->100,Typ->2]

a=3.1;

Histgr[f[x],{x,0,1.0},0.1,1000,Points->100,Typ->2]

a=3.6;

Histgr[f[x],{x,0,1.0},0.1,50000,Points->100,Typ->2]

f[x_,a_,R_]=R x Exp[-a x];

Histgr[f[x,1,Exp[1/2]],{x,0,1.0},0.1,1000,Points->100,Typ->2]

Histgr[f[x,1,Exp[1]],{x,0.0,2},0.1,1000,Points->100,Typ->2]

Histgr[f[x,1,Exp[3]],{x,0.0,4},0.1,1000,Points->100,Typ->2]