Edición Digital - Fundación Luis Chiozza

OBRAS COMPLETAS TOMO V 27
otros factores imprevistos), mientras que en la ventanilla 1B morirá sólo
1 y se salvarán 5. Esto es una “certeza” que no surge de un conocimiento
estadístico, sino de una deducción.
Pero ahora vamos a cambiar esta experiencia imaginaria, para huir de la
certeza y recurrir al conocimiento estadístico. Vamos a desestimar lo que pasa
con todas las personas excepto con una, a la cual llamaremos Pedro y que, a
los fi nes de nuestra experiencia, haremos resucitar cada vez que muera.
Al empezar el experimento imaginario haremos girar los tambores al
azar, para desconocer la posición inicial. Pondremos 5 personas frente a
cada ventanilla y luego, con un dado, sortearemos el orden en que Pedro,
la sexta persona, se colocará en la fi la. En primer término lo hará frente a la
ventanilla 5B y en segundo término, luego de “resucitado” o ileso, frente a
la ventanilla 1B. Una vez terminado este ciclo, lo volveremos a repetir tal
cual, tantas veces como queramos.
Para realizar este experimento imaginario, y ahorrarnos trabajo con
dados y anotaciones, escribimos, con estas prescripciones, un programa
de computadora 4 . Ensayamos 4 variantes: se repite el ciclo 100 veces, 50
4 Adjuntamos un programa escrito en BASIC.
0 PRINT “COMPROBACIÓN
ESTADÍSTICA”
15 PRINT “La estadística no se aplica al
caso individual”
20 PRINT
21 PRINT “El caso de la ruleta rusa”
22 PRINT “R.5B=Revólver 5B”;
“R.1B=Revólver 1B”
23 PRINT “R.5B=5 balas”; “R.1B=1 bala”
24 PRINT “El tambor recargado gira al azar
luego de seis disparos”
25 PRINT “Pedro ocupa un lugar al azar en
una fi la de seis personas”
26 PRINT “SU.5B=suerte de Pedro con
R.5B”
27 PRINT “SU.1B=suerte de Pedro con
R.1B”
28 PRINT “0=vida”, “1=muerte”
29 PRINT
30 F=1
32 T=50
34 L=0
35 U=0
44 X=0
45 GOTO 60
46 REM Para comprobar sólo dos disparos
run 48.-
48 X=0
50 GOTO 80
60 FOR N=1 TO 50
70 GOTO 130
80 L=0
90 U=0
100 F=1
110 T=2
120 FOR N=1 TO 2
130 A= INT (RND) (1)X6+1)
140 B= INT (RND) (1)X6+1)
150 C= INT (RND) (1)X6+1)
160 D= INT (RND) (1)X6+1)
170 H=A+C
180 I=B+D
190 IF H>6 THEN H=H–6
200 IF H>6 THEN I=I–6
210 IF H=1 THEN H=0
220 IF H>1 THEN H=1
230 IF I>1 THEN I=0
240 PRINT N; “”A;C; “SU.5B=”;H; “”B;D;
“SU.1B=”;I
250 Z=(H/F)X100