Chip cuadrado
Juan AriasApuntes11 de Mayo de 2017
600 Palabras (3 Páginas)235 Visitas
r0=input('introduzca el valor de la semilla: ');
a=input('introduzca el valor de a: ');
c=input('introduzca el valor de c: ');
m=input('introduzca el valor de m: ');
m1=m-1;
rs=zeros(50,1);
r1=mod((a+(c*r0)),m);
rs(1,1)=r1;
for i=2 : length(rs)
rs(i,1)=mod((a+(c*rs(i-1,1))),m);
if rs(i,1)==rs(1,1)
break
end
end
psudoalea=rs./m1
introduzca el valor de la semilla: 22.5
introduzca el valor de a: 25.9
introduzca el valor de c: 6.9
introduzca el valor de m: 22.5
psudoalea =
0.0535 | 0.1325 | 0.3759 |
0.5272 | 0.0256 | 0.6585 |
0.6563 | 0.3351 | 0.5159 |
0.5009 | 0.3772 | 0.5780 |
0.4748 | 0.6681 | 1.0070 |
0.2948 | 0.5820 | 0.8276 |
0.0994 | 1.0342 | 0.6360 |
0.8441 | 1.0152 | 0.3606 |
0.7498 | 0.8838 | 0.3769 |
0.0995 | 1.0239 | 0.6654 |
0.8446 | 0.9443 | 0.5634 |
0.7531 | 0.3947 | 0.9063 |
0.1218 | 0.7887 | 0.3554 |
0.9983 | 0.3674 | 0.5174 |
0.7675 | 0.6001 | 0.5883 |
0.2213 | 0.1131 | 0.0316 |
0.6384 | 0.9386 |
|
minimo=min(psudoalea)
minimo =
0.0256
maximo=max(psudoalea)
maximo =
1.0342
hist(psudoalea,7)
[pic 1]
[fo,mc]=hist(psudoalea,7)
fo = 8 2 8 10 6 8 8
mc = Columns 1 through 5
0.0977 0.2418 0.3859 0.5299 0.6740
Columns 6 through 7
0.8181 0.9622
anchoclase=mc(2)-mc(1)
anchoclase =
0.1441
li=mc-(anchoclase/2)
li = Columns 1 through 5
0.0256 0.1697 0.3138 0.4579 0.6020
Columns 6 through 7
0.7461 0.8901
ls=mc+(anchoclase/2)
ls = Columns 1 through 5
0.1697 0.3138 0.4579 0.6020 0.7461
...