Skrypt trafienia w liniach

Prosty skrypt z pomocą którego można sprawdzić które linie trafiają i ile trafień.

• Wstaw w pole "zakłady" swój zestaw lub wczytaj losowania dla zrobienia statystyki. Z menu Raporty->Lista ostatnich losowań. Lista będzie tak długa jaka wielkość jest w opcji [ Zakres Losowań ].
• W pole losowań wstaw np ostatnie losowanie lub swój zestaw liczb.
• Uruchom skrypt.
• W polu "Wyniki" otrzymasz posortowany wg trafień raport które linie trafiają. Zauważ że długość wierszy tworzy wykres w kształcie rozkładu normalnego tzw. dzwona Gaussa. Najwiecej trafień w kolejnych losowaniach wstecz jest w pobliżu 4 trafień. Wynika to wprost z rachunku prawdopodobieństwa 80/20=4. 

Tekst skryptu :

<?php
// ilość trafień zestawu z pola edycji w zestaw z pola zakłady
// wyswietlane są trafdienia sortowane opadajaco od najwyzszych 
// do najnizych i linie trafień
// hit 6 linie: 1 12 36
// hit 5 linie: 4  9 44
// ...
// hit 0 linie: 2  8 32 65

error_reporting(E_ALL);
require_once("include/class_Utils.php");

$sets=delphi_str_memoa();
$arrlines = Utils::parse_str_to_set_array($sets);
$mtable = preg_split("'[^0-9]+'", trim($mainedit));

$out=array();
foreach($arrlines as $nbrline=>$linearr) {
    $ht= count(array_intersect($linearr,$mtable));
    $out[$ht][]=1+$nbrline;
}

krsort($out);
foreach($out as $ht=>$line) {
echo sprintf("hit %2d line: %s\n",$ht,Utils::printTicket($line,'%3d '));
}

powodzenia Wojtek...