Get best of the week

Pemalsuan keacakan dan transformasi dengan menyortir urutan pseudo-acak

Pemalsuan keacakan dan transformasi dengan menyortir urutan pseudo-acak


Tujuan: untuk membuktikan kemungkinan pemalsuan keacakan dan kenyataan mengatasi pemalsuan keacakan.

Keacakan alami, dibagi menjadi spektra logaritmik integral, dapat diprediksi menunjukkan jarak pengulangan pendek dan jarak pengulangan yang panjang tidak ada secara besar-besaran, tetapi pengurutan urutan membawa spektrum pemisahan ke dalam bentuk teoritis.

Kesenjangan Pencerahan Rusia dan Uni Soviet dan CIS: integral dan logaritma di tingkat yang lebih rendah tidak dipelajari dan kemudian mempertimbangkan yang paling sederhana yang dianggap kompleks.



Sebutan yang digunakan harus dipahami secara harfiah: keacakan adalah alami - alami, dibuat tanpa komputer.



Program "Peluang Salah 1"

Urutan meningkatkan jumlah identik dalam satu baris.

' dafalse11.bas qbasic
OPEN "da11.txt" FOR OUTPUT AS #1
FOR d = 1 TO 5: FOR s = 1 TO 100
FOR i = 1 TO s: PRINT #1, 1: NEXT
FOR i = 1 TO s: PRINT #1, 0: NEXT
NEXT: NEXT: CLOSE



Kolom G menunjukkan distribusi yang tidak masuk akal dengan rata-rata 0,5.
Kolom A - nama percobaan;
B1 = AVERAGE (C1: C50000) - nilai rata-rata dari urutan;
Kolom C ... F - studi kuantitas dalam satu baris;
Kolom J - acak untuk permutasi;
Kolom K - urutan setelah permutasi;
M1 = AVERAGE (N1: N50000) - nilai rata-rata dari urutan;
Kolom N ... R - studi kuantitas dalam satu baris.

Dengan mengeksplorasi kriteria lain, dimungkinkan untuk menerapkan formula lain, tetapi metode yang diterangi tersedia untuk pemahaman di kelas bawah sekolah.

Sebelum permutasi 500 sel: tidak memuaskan



Setelah permutasi 500 sel: normal.



Kesimpulan: tiruan yang jelas dari spesies terungkap: jumlah yang sama dari spesies yang sama berturut-turut dan berubah.

Program "False Chance 2"

Urutan meningkatkan jumlah identik dalam satu baris, terutama mengingat algoritma verifikasi.

' dafalse22.bas qbasic
OPEN "da22.txt" FOR OUTPUT AS #1
FOR k = 1 TO 100: FOR s = 1 TO 7
FOR d = 1 TO 2^(7-s)
FOR i = 1 TO s: PRINT #1, 1: NEXT
FOR i = 1 TO s: PRINT #1, 0: NEXT
NEXT: NEXT: NEXT: CLOSE



Sebelum permutasi 500 sel: tidak memuaskan



Setelah permutasi 500 sel: normal



Kesimpulan: palsu pintar terdeteksi, karena semua opsi yang mungkin tidak diprogram dan distorsi terlihat karena algoritma sintesis.

Urutan acak dikocok berubah menjadi urutan acak.

Kesimpulan: mengidentifikasi urutan palsu secara realistis.

Program dataov.bas dan dataov.cs mengatur ulang elemen array sumber dengan menyortir array terbalik.

Program permutasi Qbasic

' datasov.bas
DIM a(55000), d(55000)
OPEN "aa.txt" FOR INPUT AS #1
OPEN "dd.txt" FOR OUTPUT AS #2

FOR i = 1 TO 55000
    INPUT #1, a(i): d(55000 - i + 1) = a(i):NEXT

FOR i = 1 TO 54999: FOR j = i TO 55000
        IF d(i) > d(j) THEN SWAP d(i), d(j): SWAP a(i), a(j)
NEXT: NEXT

FOR i = 1 TO 55000: PRINT #2, a(i): NEXT: CLOSE

Program permutasi C #

// datasov.cs
using System; using System.Linq;
using System.Collections.Generic;
using System.Text; using System.IO;
namespace tasov
{ class Program
    { static long[] a; static long[] d;
        static void Main(string[] args)
        { a = new long[55500]; d = new long[55500]; 
var inpFile = new StreamReader("aa.txt");
for (int i = 1; i <= 55000; i++) 
{ a[i] = Convert.ToInt64(inpFile.ReadLine());
d[55000-i+1] = a[i]; }
for (int i = 1; i <= 54999; i++) 
for (int j = i; j <= 55000; j++) 
if (d[i] > d[j])
{ var temp = d[i]; d[i] = d[j]; d[j] = temp;
temp = a[i]; a[i] = a[j]; a[j] = temp; }
var outFile = new StreamWriter("vv.txt");
for (int i = 1; i <= 55000; i++) 
outFile.WriteLine(a[i]);
Console.ReadKey();}}}

Algoritma tanpa built-in RND membaca array sumber dan segera membuat array terbalik dan kemudian menyortir array terbalik mengocok array asli dan urutannya normal.

Kesimpulan: keacakan dapat diandalkan - keacakan integral 2-sisi.

P.E.


Hadiah Nobel itu sendiri menerima

kelanjutan yang mungkin:

Angka-angka penelitian dari
percobaan pi yang menyelidiki
kemungkinan acak secara acak
Perkembangan logaritmik 2020 Pemikiran asing

More articles:


All Articles