Фальсификация случайности

Исследуя возможность фальсификации случайных
за час были созданы программы qbasic qb64
и таблица использующая формулы

=СЛУЧМЕЖДУ(0;1)
=ЕСЛИ(B3=B2;C2+1;0)
=СЧЁТЕСЛИ(C$3:C$55000;D2)
=СУММ(E2:E10)
=E2/E3



идея: фальсифицировать вероятность 50%

результаты: 

исследование E зелёным чисто excel:
случайные распределились закономерно

исследование 0 жёлтым qb 0:
случайные распределились закономерно

исследование 1 красным qb 1:
явная подделка равное число подряд

исследование 2 лиловым qb 2:
умная подделка но не запрограммированы все возможные
и виден перекос из-за алгоритма

вывод: определить фальшивые случайные реально


' 0.bas
OPEN "0.txt" FOR OUTPUT AS #1
FOR s = 1 TO 50000: PRINT #1, (INT(RND * 1000) MOD 2): NEXT
CLOSE

' 1.bas
OPEN "1.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

' 2.bas
OPEN "2.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

последовательность фальшивая перетасованная
превращается в последовательность случайную

и стала соответствовать распределениям

причём эксцель нагляднее программ
зато возможны программы синтеза c# онлайн

используя программу синтеза случайных
и разделив на малые 0 и большие 1
синтезированы 55000 случайных и проверены

несмотря на нормальность количества подряд 0...7
большее число подряд невозможно
поэтому последовательность хуже обычного rnd

'rndxx.bas
OPEN «rndxxx.txt» FOR OUTPUT AS #1

FOR i = 1 TO 55555: r = Rand
    IF r < 0.5 THEN PRINT #1, 0 ELSE PRINT #1, 1
    'IF r <= 0.5 THEN PRINT #1, 0 ELSE PRINT #1, 1
    'IF r <= 0.7 THEN PRINT #1, 0 ELSE PRINT #1, 1
NEXT: CLOSE

FUNCTION Rand: STATIC Seed
x1 = (Seed * 214013 + 2531011) MOD 2 ^ 24
Seed = x1: Rand = x1 / 2 ^ 24
END FUNCTION



на языке C# случайность тоже маломощная
предполагаю понимаемая людьми как якобы нормальная

using System; // 01.cs
namespace Rextester { public class Program
    { public static void Main(string[] args)
        { Random rand = new Random();
for (int i = 1; i < 5555; i++)
{ var d = rand.Next(2);
if (d<0.5)
    Console.WriteLine("0");
     else Console.WriteLine("1");
}}}}

rextester.com/WXH62544

достоверная случайность: перетасованная
то бишь 2-сторонняя то бишь интегральная вероятность



Программа peretas.bas создаёт последовательность
случайные a: 0 и 1 алгоритмом ручным из интернета

и программа создаёт случайные d: 0 ... 77777
для перетасовки и сортируя массив d упорядочили массив a
и возможно против повторения лучше тасуемых 1000000


'peretas.bas
DIM a(55555), d(55555)

OPEN "aa.txt" FOR OUTPUT AS #1: OPEN "dd.txt" FOR OUTPUT AS #2
OPEN "aaaa.txt" FOR OUTPUT AS #3: OPEN "dddd.txt" FOR OUTPUT AS #4

FOR i = 1 TO 55555: r = Rand: a(i) = INT(r * 2): PRINT #1, a(i): NEXT
FOR i = 1 TO 55555: r = Rand: d(i) = INT(r * 77777): PRINT #2, d(i): NEXT

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

FOR i = 1 TO 55555: PRINT #3, a(i): PRINT #4, d(i): NEXT
CLOSE

FUNCTION Rand
STATIC Seed
x1 = (Seed * 214013 + 2531011) MOD 2 ^ 24
Seed = x1
Rand = x1 / 2 ^ 24
END FUNCTION


Теоретические значения в эксцель excel через формулы

=C3/2
=D3+C4
=D4*55000

показывают: из 55000 за 7 шагов охватывается 54570
номеров в своих последовательностях
и вероятно отклонение выдаёт фальшивую случайность

и перетасовав задействовано 54885 близко к теории

Тема предсказуемо развивается на форумах США
csharpforums.net/threads/falsification-of-probability.5109
dev.to/andreydanilin/falsification-of-randomness-and-transformation-by-sorting-of-pseudorandom-sequences-priority-of-russia-30fi
dev.to/andreydanilin/research-and-sorting-transformation-pseudo-random-sequences-priority-of-russia-37ah
bytes.com/topic/c-sharp/answers/973498-falsification-probability


где дарят программы расчёта случайных
referencesource.microsoft.com/#mscorlib/system/random.cs,56

и осталось объединить мой дизайн

ideone.com/lgxbXJ

using System; // 01.cs
namespace Rextester { public class Program
    { public static void Main(string[] args)
        { Random rand = new Random();
for (int i = 1; i < 55; i++)
{ double d = rand.Next(2);
Console.WriteLine(Math.Ceiling(d));
}}}}

и расчёты
для вычисления 55000 случайных через онлайн компиляторы

американцы подарили ссылку про случайность цифр числа пи pi

Анализ первых 10 миллионов цифр числа pi
blogs.sas.com/content/iml/2015/03/12/digits-of-pi.html

переводится через яндекс переводчик translate.yandex.ru/translate
переводится через гугл переводчик translate.google.ru/

Проверка на случайность цифр числа ПИ

Используя 55000 цифр числа пи
сначала в Word переведено в столбик заменой
в Excel составлены формулы разделения на:
чётные \ нечётные и малые \ большие

и далее использованы мои таблицы
заодно сравнивая с теоретическим разделением 

Результаты: среднее у обоих разделений: 0,5
и разделение соответствует случайности истинной
и ещё возможно перетасовать
и ещё возможно исследовать другие константы и корни

Смысл задачи: истинная случайность для людей неестественна
и возможно синтезировать маломощные человеческие вероятности

Зато если речь о преодолении случайности
понимающий волны вероятности повышает надёжность

Волны вероятности повышают надёжность:
моя разработка минувшего 10-летия

Придуманный мной наобум алгоритм гсч
где используется тригонометрия

'rndsin.bas
OPEN "rndsin.txt" FOR OUTPUT AS #1
c = 0: a = SIN(TIMER) * 100 + 200
PRINT #1, "a= ", a

FOR k = 1 TO 10 ^ 3 + a * 10 ^ 3: NEXT

FOR i = 1 TO 100
    FOR j = 1 TO a
        x = SIN(TIMER) * 1000 + 2000
        b = COS(x): c = c + b
        LOCATE 1, 1: PRINT j
    NEXT

    d = (ABS(c)) - INT(ABS(c))
    PRINT #1, d
    FOR k = 1 TO 10000 + a * b * c * 10 ^ 2: NEXT
NEXT

проверка показывает распределение плохое
сравнивая чётные\нечётные и малые\большие
зато перетасовка превращает массив в нормальный

я придумал алгоритм Вьюга в школе в прошлом веке
ещё при старом режиме и в нашем веке обнаружил
примерно тоже то же иностранное с названием вихрь

алгоритм вьюга: номер 1-й случайный и прибавляется
случайное приращение и контролируется диапазон
и если нужно контролируется повтор номеров

'VYUGA.bas
DIM a(55555)
RANDOMIZE TIMER: CLS
OPEN "VYUGA.txt" FOR OUTPUT AS #1
d=37
a(1) = INT(RND*d)+1
PRINT #1, a(1)
FOR i = 2 TO 55555
    a(i) = a(i-1) + INT(RND*3*d)+1
    22 IF a(i) > d THEN a(i) = a(i)-d: GOTO 22
    PRINT #1, a(i)
NEXT

ideone.com/cPYZad


using System; // VYUGA.cs
namespace VYUGA { public class Program
    { static double w;
    static void Main(string[] args)
        { Random rand = new Random();
int d=37;
double s = rand.Next(5000000);
double a = Math.Round(d*s/5000000)+1;
Console.WriteLine(a);

for (int i = 1; i < 255; i++)
{ w = rand.Next(3000000)+1;
double v = Math.Round(w*d/1000000)+1;
a=a+v;
da: if (a>d)
{ a=a-d; goto da; }
Console.WriteLine(a);}
Console.ReadKey(); }}}

проверка показывает распределение хорошее
сравнивая чётные\нечётные и малые\большие

посему ищу алгоритм вида Мерсенна вихрь

Копия темы вызвала ответ из США:
As for your C# code above, why not just change this:

a=a+v;
da: if (a>d)
{ a=a-d; goto da; }

to
a=(a+v) % (d+1);

конец цитат из США и я применил
ideone.com/lQzPTg

на нижеследующий вопрос ответ в заглавии главы:
фальсификация случайности

ведь реальная случайность людям неестественна
и реально разгадывание случайности фальшивой
хотя именно визуально определить невозможно

и вьюга вдруг сделает нормальной случайность тригонометрическую

Ближайший шаг: перетасовка слабым алгоритмом
случайности слабой делает ли случайность нормальной

Взята последовательность плохая
и вставлена в эксцель в 2 столбца на расстоянии
и слева впритык 2-го столбца столбец чисел подряд
и сортированы столбцы впритык от максимума к минимуму

Группируются вместе: последовательности обратная и прямая
и далее сортировка обоих упорядочивая обратную
одновременно перетасовывается последовательность прямая 

Проверка показывает нормальность в перетасованной
последовательности чёт\нечет и больших\малых

Автоматический алгоритм без rnd считывает массив прямой
и сразу есть массив обратный: ... это же компьютер ...

'tasov.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

using System; // tasov.cs
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();}}}

Сортировка обратного массива перетасовывает прямой массив
и получается последовательность нормальная

моя программа реализует равное для каждого: excel & basic & c#

я проверяю идею: гсч тригонометрический

создал массив плохой не проходящий проверку
двоичных чётно\нечётных и малые\болшие

поэтому тасуем одинаково реально в эксцель & basic & c#
всего лишь используя данный плохой массив

значит: последовательность слабая
перетасованая через последовательность слабую
превращает в последовательность нормальную

по результатам данной темы

что и требовалось доказать
лат. QED quod erat demonstrandum
греч. ΟΕΔ ὅπερ ἔδει δεῖξαι
ru.wikipedia.org/wiki/Q.E.D.

Нобелевская премия сама себя не получит

Волны вероятности повышают надёжность

Теория и Практика 0 и 1

* Теория из моих тем АнтиИгроМаниЯ *

Математические законы справедливы во всех вероятностях и
важно знать дюжину пределов подобных случаев подряд наизусть.

Умножение постоянных вероятностей C+р^N=1
олицетворяет вероятность вероятности и создаёт формулу
N = LOG(1-C)/LOG(1-p)
С - вероятность выигрыша гарантированного
р - вероятность выигрыша события.

Например: с вероятностью 99% для вероятности 48,65%
число подобных случаев подряд N = LOG(1-0,99)/LOG(1-0,4865) = 7
и значит на вероятности около 50% легко неугадать 7 раз подряд

Упрощённо возможно рассчитывать по формуле N = 7+(5*(1/x-2))
например х=0,1 N= 47 нормально и х=0,78 N= 4 нормально.
Те же формулы справедливы и для вероятностей выше 50%.

Геометрические прогрессии содержащие в условии или в решении
смысл "в какую степень надо возвести" решаются через логарифм.


* Начало *

Используя предел подобных случаев подряд в таблицах
обнаруживается волна или период угадываний 2-х видов:
1-й вид: волна или период - как сама вероятность
через количество тиражей и там где вероятность 1/3
там волна или период угадывания через 3 тиража;
2-й вид: волна или период - как предел подобных случаев подряд
и там где вероятность 1/3 там волна или период угадывания
через 12 тиражей и возможно несколько ставок при сигнале


* Ставки *

Виртуально повышаем ставки при проигрыше
и понижаем ставки при выигрыше до минимальной ставки

Реально ставим только соблюдая Квадрат Экономии Данилиных


* Практика *

Синтезируем 50 номеров 0 и 1 контролируя сумму 25
=случмежду(0;1)

случ: 00111000000011111101010011111000001010111010000111
специально назначены 7 подряд проигрышей 0000000

получаем 4 результата вида:
предполагали выигрыш/проигрыш и угадали/неугадали:

А - угадан выигрыш - 1-1 - участие и выигрыш
Б - угадан проигрыш - 0-0 - неучастие
В - неугадан выигрыш - 0-1 - неучастие
Г - неугадан проигрыш - 1-0 - участие и проигрыш


* Практика: 001 *

идея: пропущены несколько бывших бы проигрышными
и пропущен единственный бывший бы выигрышным

обозначения: "!" = сигнал и "." = ожидание 

случ: 00111000000011111101010011111000001010111010000111
коды: ..!А........!А..........!А........!Г...........!А.

обособим коды А&Г = АААГА = выигрышно: А > Г
без повышения ставок и возможны 2 ставки подряд
после сигнала и проигрыша и остановка при выигрыше


* Практика: 1-я волна *

сопоставим с идеальным распределением

идея: 01010101010101010101010101010101010101010101010101
случ: 00111000000011111101010011111000001010111010000111
коды: БГВАВГБГБГБГВАВАВАБАБАБГВАВАВГБГБГВГВГВАВГВГБГБАВА

обособим коды А&Г = ГАГГГГАААААГААГГГГГАГГГАА

видим 5 проигрышей подряд и баланс цел
т.к. по простейшей системе у-2-ения ставок при проигрыше
требуется 7 проигрышей подряд до обнуления баланса
начав с минимальной ставки 1%: = 2^7 = 128 процентов баланса 

идеи сплошь одинаковых признаков будут повторять
картину совпадений с тем же числом подобных случаев подряд

идея: 00110011001100110011001100110011001100110011001101
случ: 00111000000011111101010011111000001010111010000111
коды: ББААВБГГББГГВВААВВГАБВГГВВААВБГГББАГВБААВБАГББГАВА

обособим коды А&Г = ААГГГГААГАГГААГГАГАААГГАА
видим 5 подряд проигрышей и баланс цел


* Практика: 2-я волна *

обозначения: "!" = сигнал и "." = ожидание 

идея: пропускаем 7 подряд как 0000000
и ставим максимум 2-жды подряд или до выигрыша

случ: 00111000000011111101010011111000001010111010000111
коды: ...........!А.....................................

в примере мог быть проигрыш и видим 1 выигрыш редкий
поэтому важно следить за всеми признаками

идея: упрощённо пропускаем 4 подряд как 0000
и ставим максимум 2-жды подряд или до выигрыша
та же формула включающая логарифм и надёжность ниже

случ: 00111000000011111101010011111000001010111010000111
коды: ........!ГГ.....................!ГА...........!А..

обособим коды А&Г = ГГГАА
видим 3 подряд проигрышей и баланс цел
зато пропуская 3 подряд как 000 было бы рискованнее
 

* Практика: 2-ые волны *

совпадения на 2-й волне от предыдущего совпадения
прибавляем шаг как расчётный предел подобных случаев подряд

обозначения: "!" = сигнал и "." = ожидание 

случ: 00111000000011111101010011111000001010111010000111
коды: ...123456!Г......123456!А...123456!Г..............
коды: ....123456!Г......123456!А...123456!А.............
коды: .....123456!А.......123456!А.......123456!А.......
коды: .............123456!Г.123456!Г.......123456!Г.....
коды: ..............123456!А...123456!Г......123456!Г...
коды: ...............123456!Г...123456!Г......123456!А..
коды: ................123456!Г...123456!А......123456!А.

обособим коды А&Г = ГГАГАГГАААГГГАГААГГАА
видим 3 подряд проигрышей и баланс цел

* Практика: 2 волны и больше волн *

идея 001: пропущены несколько бывших бы проигрышными
и пропущен единственный бывший бы выигрышным

обозначения: "!" = сигнал и "." = ожидание

случ1: 00111000000011111101010011111000001010111010000111
коды1: ..!А........!А..........!А........!Г...........!А.

случ2: 11100001011101010000011111001010111111000000011100
коды2: .......!Г...........!A......!Г...............!А...

где случ2 обратная последовательность от случ1 для эксперимента

обособим коды А&Г = АГАААГГАА = выигрышно: А > Г
без повышения ставок и возможны 2 ставки подряд
после сигнала и проигрыша и остановка при выигрыше

видим 2 подряд проигрыша и баланс цел

предположим сложились ситуации независимые все возможные:

случ3: 0001000010000110000011
коды3: ...!Г...!Г...!А.....!A

случ4: 0001000011000100000011
коды4: ...!Г...!A...!Г.....!А

одновременно: ГГ / ГА / АГ / АА
значит были: 1 выигрыш и 1 проигрыш и 2 возврата

вероятность выигрыша 1/4 = 25 %
вероятность проигрыша 1/4 = 25 %
вероятность возврата 1/2 = 50 %

всё с целью: деление подобных случаев подряд
и тоже то же для 3-х и более независимых признаков
и для идей про шаг свыше предела подобных случаев подряд

* Вывод *

Волны вероятности повышают надёжность
 

Нобелевская премия сама себя не получит
Nobel Prize will not receive itself
Nobelpreis wird sich nicht erhalten
Le prix Nobel ne se recevra pas
Il Premio Nobel non ricevera se stesso

Волны вероятности повышают надёжность

Инверсия последовательности предыдущей
соблюдает те же закономерности выигрышей

Теория и Практика 0 и 1

* Теория из моих тем АнтиИгроМаниЯ *

Математические законы справедливы во всех вероятностях и
важно знать дюжину пределов подобных случаев подряд наизусть.

Умножение постоянных вероятностей C+р^N=1
олицетворяет вероятность вероятности и создаёт формулу
N = LOG(1-C)/LOG(1-p)
С - вероятность выигрыша гарантированного
р - вероятность выигрыша события.

Например: с вероятностью 99% для вероятности 48,65%
число подобных случаев подряд N = LOG(1-0,99)/LOG(1-0,4865) = 7
и значит на вероятности около 50% легко неугадать 7 раз подряд

Упрощённо возможно рассчитывать по формуле N = 7+(5*(1/x-2))
например х=0,1 N= 47 нормально и х=0,78 N= 4 нормально.
Те же формулы справедливы и для вероятностей выше 50%.

Геометрические прогрессии содержащие в условии или в решении
смысл "в какую степень надо возвести" решаются через логарифм.

* Начало *

Используя предел подобных случаев подряд в таблицах
обнаруживается волна или период угадываний 2-х видов:
1-й вид: волна или период - как сама вероятность
через количество тиражей и там где вероятность 1/3
там волна или период угадывания через 3 тиража;
2-й вид: волна или период - как предел подобных случаев подряд
и там где вероятность 1/3 там волна или период угадывания
через 12 тиражей и возможно несколько ставок при сигнале

* Ставки *

Виртуально повышаем ставки при проигрыше
и понижаем ставки при выигрыше до минимальной ставки

* Практика *

Синтезируем 50 номеров 0 и 1 контролируя сумму 25
=случмежду(0;1)

случ: 11000111111100000010101100000111110101000101111000
специально назначены 6 подряд проигрышей 000000

получаем 4 результата вида:
предполагали выигрыш/проигрыш и угадали/неугадали:

А - угадан выигрыш - 1-1 - участие и выигрыш
Б - угадан проигрыш - 0-0 - неучастие
В - неугадан выигрыш - 0-1 - неучастие
Г - неугадан проигрыш - 1-0 - участие и проигрыш

* Практика: 001 *

идея: пропущены несколько бывших бы проигрышными
и пропущен единственный бывший бы выигрышным

обозначения: "!" = сигнал и "." = ожидание  

случ: 11000111111100000010101100000111110101000101111000
коды: !А...!А...........!Г.........!А..........!Г.......

обособим коды А&Г = ААГАГ = выигрышно: А > Г
без повышения ставок и возможны 2 ставки подряд
после сигнала и проигрыша и остановка при выигрыше

* Практика: 2-ые волны *

совпадения на 2-й волне от предыдущего совпадения
прибавляем шаг как расчётный предел подобных случаев подряд

обозначения: "!" = сигнал и "." = ожидание  

случ: 11000111111100000010101100000111110101000101111000
коды: .123456!А..123456!А...........123456!А....123456!Г
коды: ..123456!А..123456!Г...........123456!Г...........
коды: ......123456!Г.....123456!Г.....123456!Г..........
коды: .......123456!Г......123456!Г....123456!Г.........
коды: ........123456!Г.......123456!А...123456!А........
коды: .........123456!Г.......123456!А....123456!А......
коды: ..........123456!Г............123456!А123456!А....

обособим коды А&Г = ААГГГГГАГГГААААГГГАААГ
видим 5 подряд проигрышей и баланс цел

* Практика: 1-я волна *

сопоставим с идеальным распределением

идея: 01010101010101010101010101010101010101010101010101
случ: 11000111111100000010101100000111110101000101111000
коды: ВАБГБАВАВАВАБГБГБГВГВГВАБГБГБАВАВАБАБАБГБАБАВАВГБГ

обособим коды А&Г = АГААААГГГГГАГГАААААГАААГГ

видим 5 проигрышей подряд и баланс цел
т.к. по простейшей системе у-2-ения ставок при проигрыше
требуется 7 проигрышей подряд до обнуления баланса
начав с минимальной ставки 1%: = 2^7 = 128 процентов баланса  

идеи сплошь одинаковых признаков будут повторять
картину совпадений с тем же числом подобных случаев подряд

идея: 00110011001100110011001100110011001100110011001101
случ: 11000111111100000010101100000111110101000101111000
коды: ВВГГБВААВВААББГГББАГВБААББГГБВААВВГАБВГГБВГАВВАГБГ

обособим коды А&Г = ГГААААГГАГААГГААГАГГГААГГ
видим 3 подряд проигрышей и баланс цел

* Практика: 2-я волна *

обозначения: "!" = сигнал и "." = ожидание  

идея: пропускаем 6 подряд как 0000000
и ставим максимум 2-жды подряд или до выигрыша

случ: 11000111111100000010101100000111110101000101111000
коды: ..................!Г..............................

в примере мог быть выигрыш и видим 1 проигрыш редкий
поэтому важно следить за всеми признаками

идея: упрощённо пропускаем 4 подряд как 0000
и ставим максимум 2-жды подряд или до выигрыша
та же формула включающая логарифм и надёжность ниже

случ: 11000111111100000010101100000111110101000101111000
коды: ...............!ГГ.........!ГА....................

обособим коды А&Г = ГГГА
видим 3 подряд проигрышей и баланс цел
зато пропуская 3 подряд как 000 было бы рискованнее  

* Практика: 2 волны и больше волн *

идея 001: пропущены несколько бывших бы проигрышными
и пропущен единственный бывший бы выигрышным

обозначения: "!" = сигнал и "." = ожидание

случ1: 11000111111100000010101100000111110101000101111000
коды1: .....!А...........!Г.........!А..........!Г.......

случ2: 00011110100010101111100000110101000000111111100011
коды2: ...!А.......!Г............!A..........!А........!А

где случ2 обратная последовательность от случ1 для эксперимента

обособим коды А&Г = АГАГ & АГААА = выигрышно: А >= Г
без повышения ставок и возможны 2 ставки подряд
после сигнала и проигрыша и остановка при выигрыше

видим 2 подряд проигрыша и баланс цел

предположим сложились ситуации независимые все возможные:

случ3: 0001000010000110000011
коды3: ...!Г...!Г...!А.....!A

случ4: 0001000011000100000011
коды4: ...!Г...!A...!Г.....!А

одновременно: ГГ / ГА / АГ / АА
значит были: 1 выигрыш и 1 проигрыш и 2 возврата

вероятность выигрыша 1/4 = 25 %
вероятность проигрыша 1/4 = 25 %
вероятность возврата 1/2 = 50 %

всё с целью: деление подобных случаев подряд
и тоже то же для 3-х и более независимых признаков
и для идей про шаг свыше предела подобных случаев подряд

* Вывод *

Волны вероятности повышают надёжность

Нобелевская премия сама себя не получит

Falsification of probability

exploring possibility of falsification of random
qbasic qb64 programs were created in an hour
and a table using formulas

= CASEBETWEEN(0;1)
= IF (B3 = B2; C2 + 1; 0)
= COUNTIF (C$3: C$55000; D2)
= SUM(E2:E10)
= E2 / E3

idea: fake a 50% chance

results:

research E green pure excel:
randomly distributed naturally

research 0 yellow qb 0:
randomly distributed naturally

research 1 in red qb 1:
explicit fake equal number in a row

research 2 violet qb 2:
smart fake but not all programmed
and skew due to algorithm

Conclusion: identify fake random real

' 0.bas
OPEN "0.txt" FOR OUTPUT AS #1
FOR s = 1 TO 50000: PRINT #1, (INT(RND * 1000) MOD 2): NEXT
CLOSE

' 1.bas
OPEN "1.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

' 2.bas
OPEN "2.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

Conclusion: identify fake random real

sequence fake shuffled
turns into a random sequence

and began to correspond to distributions

and excel more clearly than programs
but c# synthesis programs are possible online

using a random synthesis program
and dividing into small 0 and large 1
synthesized 55000 random and tested

despite normality of number of consecutive 0...7
a larger number in a row is not possible
therefore sequence is worse than usual rnd


'rndxx.bas
OPEN "rndxxx.txt" FOR OUTPUT AS #1

FOR i = 1 TO 55555: r = Rand
    IF r < 0.5 THEN PRINT #1, 0 ELSE PRINT #1, 1
    'IF r <= 0.5 THEN PRINT #1, 0 ELSE PRINT #1, 1
    'IF r <= 0.7 THEN PRINT #1, 0 ELSE PRINT #1, 1
NEXT: CLOSE

FUNCTION Rand: STATIC Seed
x1 = (Seed * 214013 + 2531011) MOD 2 ^ 24
Seed = x1: Rand = x1 / 2 ^ 24
END FUNCTION



in C# randomness is also low-power
I suppose understood by people as supposedly normal

using System; // 01.cs
namespace Rextester { public class Program
    { public static void Main(string[] args)
        { Random rand = new Random();
for (int i = 1; i < 5555; i++)
{ var d = rand.Next(2);
if (d<0.5)
    Console.WriteLine("0");
     else Console.WriteLine("1");
}}}}

rextester.com/WXH62544

significant reliable probability: shuffled
that is: 2-sided and that is: integraly probability


Program peretas.bas creates a sequence
random a: 0 and 1 by manual algorithm from Internet

and program creates random d: 0 ... 77777
for shuffling and sorting an array d array a is ordered
and perhaps against repetition it is better to shuffle cards 1000000


'peretas.bas
DIM a(55555), d(55555)

OPEN "aa.txt" FOR OUTPUT AS #1: OPEN "dd.txt" FOR OUTPUT AS #2
OPEN "aaaa.txt" FOR OUTPUT AS #3: OPEN "dddd.txt" FOR OUTPUT AS #4

FOR i = 1 TO 55555: r = Rand: a(i) = INT(r * 2): PRINT #1, a(i): NEXT
FOR i = 1 TO 55555: r = Rand: d(i) = INT(r * 77777): PRINT #2, d(i): NEXT

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

FOR i = 1 TO 55555: PRINT #3, a(i): PRINT #4, d(i): NEXT
CLOSE

FUNCTION Rand
STATIC Seed
x1 = (Seed * 214013 + 2531011) MOD 2 ^ 24
Seed = x1
Rand = x1 / 2 ^ 24
END FUNCTION


Theoretical values in Excel Excel via formulas

=C3/2
=D3+C4
=D4*55000

show: out of 55000 for 7 steps covered 54570
numbers in their sequences
and probably deviation betrays a false accident

and shuffling involved 54885 close to theory

Theoretical values in Excel Excel via formulas
 

This topic is developing predictably in USA forums
where do they give random calculation programs
referencesource.microsoft.com/#mscorlib/system/random.cs,56

and it remains to combine my design

ideone.com/lgxbXJ

using System; // 01.cs
namespace Rextester { public class Program
    { public static void Main(string[] args)
        { Random rand = new Random();
for (int i = 1; i < 55; i++)
{ double d = rand.Next(2);
Console.WriteLine(Math.Ceiling(d));
}}}}

and calculations
for calculation of 55000 randomly through online compilers

Check for randomness of digits of number of PI

Using 55,000 digits of pi
first in Word translated to column by replacement
Excel compiles formulas for dividing into:
even \ odd and small \ big

and then my tables are used
at same time comparing with theoretical separation

Results: average for both divisions: 0.5
and separation matches chance by true
and it’s still possible to shuffle
and it’s still possible to explore other constants and roots

Meaning of task: true chance for people is unnatural
and it is possible to synthesize low-power human probabilities

But if we are talking about overcoming chance
understanding wave of probability increases reliability

Probability waves increase reliability:
my development of past 10th anniversary

Invented by me at random algorithm of RNG
where is trigonometry used

check shows distribution is bad
comparing even\odd and small\large
but shuffling turns array into a normal one

I came up with an algorithm Blizzard at school
in last century even under old regime and in our century
about same too foreign called vortex

Blizzard algorithm: number 1 is random and is added
random increment and control range
and if necessary controlled repetition of numbers

'VYUGA.bas
DIM a(55555)
RANDOMIZE TIMER: CLS
OPEN "VYUGA.txt" FOR OUTPUT AS #1
d=37
a(1) = INT(RND*d)+1
PRINT #1, a(1)
FOR i = 2 TO 55555
    a(i) = a(i-1) + INT(RND*3*d)+1
    22 IF a(i) > d THEN a(i) = a(i)-d: GOTO 22
    PRINT #1, a(i)
NEXT

ideone.com/cPYZad


using System; // VYUGA.cs
namespace VYUGA { public class Program
    { static double w;
    static void Main(string[] args)
        { Random rand = new Random();
int d=37;
double s = rand.Next(5000000);
double a = Math.Round(d*s/5000000)+1;
Console.WriteLine(a);

for (int i = 1; i < 255; i++)
{ w = rand.Next(3000000)+1;
double v = Math.Round(w*d/1000000)+1;
a=a+v;
da: if (a>d)
{ a=a-d; goto da; }
Console.WriteLine(a);}
Console.ReadKey(); }}}

check shows distribution is good
comparing even\odd and small\large

and a Blizzard suddenly makes normal randomness trigonometric

therefore I am looking
for an algorithm of form Mersenne twister c# & qbasic


Nearest step: shuffling by weak algorithm
weak randomness is randomness of normal

Sequence is bad
and inserted into Excel in 2 columns at a distance
and to left end-to-end of 2nd column is a column of numbers in a row
and columns are sorted end to end from maximum to minimum

Grouped together: reverse and forward sequences
and then sort both by ordering reverse
sequence is shuffled simultaneously. 

test shows normality of a shuffled
sequences of even\odd and large\small

An automatic algorithm without rnd reads array straight
and immediately there is an array reverse: ... it's a computer ...

'tasov.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

using System; // tasov.cs
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();}}}

Sorting reverse array shuffles forward array
and it turns out sequence is normal

my program implements equal for each: excel & basic & c#

I'm testing idea: RNG trigonometric

created a bad array that doesn't pass validation
binary even\odd and small\large

therefore, we shuffle equally real in Excel & basic & c#
just using this bad array

means: sequence is weak
shuffled through a sequence of weak
turns into a normal sequence

based on results of this topic

Nobel Prize will not receive itself

Waves of probability increase reliability

Theory and Practice 0 and 1

* Theory of my Anti-Game-Mania Topics *

Mathematical laws are valid in all probabilities and it
is important to know a dozen of similar cases limits in a row.

Investigating logarithm is obtained:
formula including logarithm follows from calculation
probabilities of guessing consecutive events

For example, simplest: 0.7*0.7*0.7 = 0.7^3 = 0.343
degree to which it is necessary to build 0.7 to get 0.343
and in 20th century formula was restored by Andrey Danilin
N = LOG(0.343)/LOG(0.7) = 3
and corresponding formula for not guessing

Multiplication of constant probabilities C+p^N = 1
and in 20th century formula was restored by Andrey Danilin
N = LOG(1-C)/LOG(1-p)
C — probability of winning guaranteed
p — probability of winning event.

Example task: number of similar cases in a row
with a probability of 99% for a probability of 48.65%
and in 20th century formula was restored by Andrei Danilin
N = LOG(1-0,99)/LOG(1-0,4865) = 7
and that means about 50% probability
easy to guess 7 times in a row

Easily possible to count:
formula was discovered by Andrey Danilin N = 7+(5*(1/x-2))
and for example, x=0.1 N=47 is normal and x=0.78 N=4 is normal.

same formulas are valid for probabilities above 50%.

Geometric progression contained in condition or in solution
meaning of “degree to which it is necessary to build”
is solved through logarithm


* Start *

Using similar cases limit in a row in tables
a wave or a period of guessing of 2 types is detected:

1st type: wave or period — as probability itself
through number of runs and where probability is 1/3
there is a wave or guessing period after 3 runs;

2nd type: wave or period — as limit of discrepancies in a row
and where probability is 1/3 there is a wave or guessing period
in 12 draws and possibly several bets on signal


* Rates *

Virtually raise stakes when you lose
and lower stakes when winning to minimum bet

Really set only observing Quadrat Economy Danilins


* Practice *

We synthesize 50 numbers 0 and 1 controlling amount of 25

case: 00111000000011111101010011111000001010111010000111
specially assigned 7 consecutive losses 0000000

we get 4 results of form:
assumed a win / loss and guessed / failed to guess:

A — guess win — 1-1 — participation and win
E — guess loss — 0-0 — non-participation
I — not won — 0-1 — non-participation
U — loosing — 1-0 — participation and loss


* Practice: 001 *

idea: missing a few ex
and missed only former would be winning

notation: "!" = signal and "." = waiting

case: 00111000000011111101010011111000001010111010000111
code: ..!A........!A..........!A........!U...........!A.

isolate codes A&U = AAAUA = advantageous: A>U
no rate increase and 2 consecutive bids possible
after signal and loss and stop when winning


* Practice: 1st wave *

comparable to perfect distribution

idea: 01010101010101010101010101010101010101010101010101
case: 00111000000011111101010011111000001010111010000111
code: EUIAIUEUEUEUEAIAIAEAEAEUIAIAIUEUEUIUIUIAIUIUEUEAIA

isolate codes A&U = UUUUUAAAAAUAAUUUUUAUUUA

see 5 losses in a row and balance is intact
because according to simplest system of betting on losing
7 consecutive losses are required until balance is reset
starting with minimum rate of 1%: = 2^7 = 128 percent of balance

ideas are completely identical signs will repeat
picture of coincidence with same number of similar cases in a row

idea: 00110011001100110011001100110011001100110011001101
case: 00111000000011111101010011111000001010111010000111
code: EEAAIEUUEEUUIIAAIIUAEIUUIIAAIEUUEEAUIEAAIEAUEEUAIA

isolate codes A&U = AAUUUUAAUAUUAUAUUAUAAAUUAA
see 5 consecutive losses and balance is intact


* Practice: 2nd wave *

notation: "!" = signal and "." = waiting

idea: skip 7 consecutive as 0000000
and put a maximum of 2 in a row or before winning

case: 00111000000011111101010011111000001010111010000111
code: ...........!A.....................................

in example there could be a loss and see 1 win rare
therefore it is important to monitor all signs

Idea: simply skip 4 in a row like 0000
and put a maximum of 2 in a row or before winning
same formula including logarithm and reliability below

case: 00111000000011111101010011111000001010111010000111
code: ........!U......................!UA...........!A..

isolate codes A&U = UUAA
see 3 consecutive losses and balance is intact
but skipping 3 in a row as 000 would be more risk


* Practice: 2nd waves *

matches on 2nd wave from previous match
we add a step as a calculated limit of similar cases in a row

notation: "!" = signal and "." = waiting

case: 00111000000011111101010011111000001010111010000111
code: ...123456!U......123456!A...123456!U..............
code: ....123456!U......123456!A...123456!A.............
code: .....123456!A.......123456!A.......123456!A.......
code: .............123456!U.123456!U.......123456!U.....
code: ..............123456!A...123456!U......123456!U...
code: ...............123456!U...123456!U......123456!A..
code: ................123456!U...123456!A..... 123456!A.

isolate codes A&U = UUAUAUUAAAUUUAAUAUUAA
see 3 consecutive losses and balance is intact

* Practice: 2 waves and more waves *

idea 001: missing some ex would be losing
and missed only former would be winning

notation: "!" = signal and "." = waiting

case1: 00111000000011111101010011111000001010111010000111
code1: ..!U........!A..........!A........!U...........!A.

case2: 11100001011101010000011111001010111111000000011100
code2: .......!U...........!A......!U...............!A...

where case2 is reverse sequence from case1 for experiment

isolate codes A&U = UUAAAUUAA = advantageous: A>U
no rate increase and 2 consecutive bids possible
after signal and loss and stop when winning

see 2 consecutive losses and balance is intact

let us assume that all possible situations are independent:

case3: 0001000010000110000011
code3: ...!U...!U...!A.....!A

case4: 0001000011000100000011
code4: ...!U...!A...!U.....!A

at same time: UU / UA / AU / AA
so were: 1 win and 1 loss and 2 return

probability of winning 1/4 = 25 %
probability of losing 1/4 = 25 %
probability of return 1/2 = 50 %

everything with goal: division not coincidence in row
and also same for 3 or more independent signs
and for ideas about a step over limit of similar cases in a row

* Conclusion *

Waves of probability increase reliability

Nobel Prize will not receive itself

фальсификация случайности

Волны вероятности повышают надёжность и МЫ

Инь и Ян вероятности и МЫ

WarCraft2 всепоглощающие новые миры: стратегии и киберспорт и МЫ

Квадрат Экономии Данилиных

Русская сортировка половинами интегралов ставок и МЫ

Пиковая Дама Управление рисками Queen Spades Risk Management

Русская сортировка половинами: человеческая сортировка быстрее в 4 раза и МЫ

явный фаворит и НЕ обе забьют и МЫ

скушно выиграли датчинг и фаворит нечет и МЫ

датчинг скушно выигрывает и МЫ

НЕЧЕТ 72% кыф 2 чф18 и МЫ

визуально УБЫТКИ после ПОВЫШЕНИЯ ставок и МЫ

График баланса EXCEL и МЫ

БЕЗ проигрышей ВЫИГРЫВАЮ во ВСЕХ матчах ЧФ18 и МЫ

Лекция Букмекеры и Математика и МЫ

Комбинаторика и Математика Жизни и МЫ

логарифм жизни и МЫ

обе команды забьют НЕТ и МЫ

объяснение убытков после повышения ставок и МЫ

4-жды призёр ЭпоЭ и книга АнтиИгроМаниЯ за 78 рублей и МЫ

датчинг dutching единственная тема и МЫ

футбол фаворит нечет чаще и МЫ

коэффициенты и деление подобных случаев подряд и МЫ

Квадрат Экономии Данилиных ЯНВАРЬ и МЫ

Интеграл побеждает Логарифм и Логарифм побеждает Интеграл

Квадрат Экономии Данилиных повышающий вероятность выиграть и МЫ

ЧАЩЕ забивают в будни опять опережаю тему зазнаек

Квадрат Экономии Данилиных и Победа и МЫ

Квадрат Экономии Данилиных и нечет и МЫ

Квадрат Экономии Данилиных и МЫ

Доказательство выгодности тотал НЕЧЕТ

НЕЧЕТ и МЫ

Нобелевский и Эксперты и Игроки

давно пиЩу: обезабьют и ТБ1,5 и МЫ

Анти Букмекер аудио и ютюб 6 минут и МЫ

победоносный коэффициент ТБ0,5 кыф 1,3 и МЫ

математика против проигрунищенства и МЫ

графики баланса бывшего моря ставок и МЫ

математика против фантазёров и МЫ

карьера лже-прогнозиста и лже-эксперта и МЫ

Статья Анти Игромания Данилин

Забавные коэффициенты и МЫ

Анти Букмекер Анти Азарт

Aнти ИГРОМАНИЯ статья Данилин

догон: рассчитываем множитель ставки под коэффициент и МЫ

таблица расчёта прибыльности коэффициентов: сделай сам и МЫ

ВИЛКИ простейшая формула расчёта в уме и МЫ

футбол live ТБ0,5 кыф 1,2 и МЫ

обезабьют и ТБ1,5 и единичные и экспрессы и график и картинка и МЫ

легальный букмекер и ставки КЕНО как рулетка и МЫ

футбол до матч обе забьют и ТБ1,5 и МЫ

паттерн устойчивое сочетание признаков с целью разрыва подобных случаев подряд

догон многопоточный догон многоканальный догон

чёт-нечет щщёта и обезабьют-необезабьют и МЫ

психиатрия ставок ТБ и ТМ в надежде забьют или не забьют

Интеграл интИГРАаль

системы Фибоначчи не существует есть повышение ставок в 1,6 раза для догона кыфа 3 с вероятностью около 1/3

Обучение EXCEL за 6 минут Learning

очередное подтверждение выгодности эффективных коэффициентов

КЕНО виртуально у букмекеров

футбол ТБ2,5 или ТМ2,5 коэффициенты 2,1...2,2