Untitled

<!DOCTYPE html>
<html>
<head>
    <title>Identifier table</title>
    <script src="main.js"></script>
</head>
<body style="background-color: black; color: grey;">
    <?php

    $parent = array();
    $solution = array();

    for($i = 0; $i < 20; $i++) {
        $parent[$i] = rand(0, 20) * 180;
        //$parent[$i] = 1800;
    }

    print_individual('numb', array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20));
    print_individual('parents', $parent);

    for($i = 0; $i < 20; $i++) {
        $solution[$i] = 4 * sin(deg2rad($parent[$i] / 20)) + 10;
    }

    print_individual('solutions', $solution);

    $rate = survival_rate($solution);
    $sum = array_sum($rate);

    for($i = 0; $i < 20; $i++) {
        $rate[$i] = ($rate[$i] / $sum) * 100;
    }

    print_individual('survival rates', $rate);

    $pairs = generate_pairs($rate);
    print_individual_arr('pairs', $pairs);

    $new_generation = array();
    for($i = 0; $i < 20; $i++){
        $new_generation[$i] = one_point_cross($parent[$pairs[$i][0]], $parent[$pairs[$i][1]]);
    }
    print_individual('new_gen', $new_generation);

    for($i = 0; $i < 50; $i++){
        echo '<div style="clear: left;"></div>';
        print_individual('parents', $new_generation);
        $solution = array();

        for($j = 0; $j < 20; $j++) {
            $solution[$j] = 4 * sin(deg2rad($new_generation[$j] / 20)) + 10;
        }

        print_individual('solutions', $solution);

        $rate = survival_rate($solution);
        $sum = array_sum($rate);

        for($j = 0; $j < 20; $j++) {
            $rate[$j] = ($rate[$j] / $sum) * 100;
        }
        print_individual('survival rates', $rate);

        $pairs = generate_pairs($rate);
        print_individual_arr('pairs', $pairs);

        $old_gen = $new_generation;
        $new_generation = array();
        for($j = 0; $j < 20; $j++){
            $new_generation[$j] = one_point_cross($old_gen[$pairs[$j][0]], $old_gen[$pairs[$j][1]]);
        }
        print_individual('new_gen', $new_generation);
    }

    ?>
</body>
</html>

<?php

function print_individual_arr($name, $ind) {
    echo '<table style="float: left;">';
    echo '<th>' . "$name" . '<th>';

    for($i = 0; $i < count($ind); $i++) {
        echo '<tr>' .
            '<td>';
        print_r($ind[$i]);
        echo '</td>' .
            '</tr>';
    }

    echo '</table>';
}

function survival_rate($sol) {
    $rate = array();

    for($i = 0; $i < 20; $i++) {
        $rate[$i] = (100 - (abs($sol[$i] - 14) / 14) * 100);
    }

    return $rate;
}

function print_individual($name, $ind) {
    echo '<table style="float: left;">';
    echo '<th>' . "$name" . '<th>';

    for($i = 0; $i < count($ind); $i++) {
        echo '<tr>' .
            '<td>' . $ind[$i] . '</td>' .
            '</tr>';
    }

    echo '</table>';
}

function generate_pairs($input)
{
    $sum = array_sum($input);
    //echo '<br>'.$sum.'<br>';
    $pairs = array();

    for($j = 0; $j < count($input); $j++){
        $rand[0] = rand(0,$sum);
        $elem_sum = 0;
        $i[0] = 0;

        do {
            $elem_sum += $input[$i[0]];
            $i[0]++;
        } while ($elem_sum < $rand[0]);

        do {
            $rand[1] = rand(0,$sum);
            $elem_sum = 0;
            $i[1] = 0;

            do {
                $elem_sum += $input[$i[1]];
                $i[1]++;
            } while ($elem_sum < $rand[1]);
        } while($i[1] === $i[0]);

        $pairs[$j] = array($i[0], $i[1]);
    }

    return $pairs;
}

function one_point_cross($arg1, $arg2) {
//Float 2 string
    $strfir = $arg1 . "";
    $strsec = $arg2 . "";

    //Amount of nums after coma
    $amcolfir = strlen(substr(strrchr($strfir, "."), 1));
    $amcolsec = strlen(substr(strrchr($strsec, "."), 1));
    $maxofam = max($amcolfir, $amcolsec);

    //Doin' nums in dec sys
    $barg1 = $arg1 * pow(10, $maxofam);
    $barg2 = $arg2 * pow(10, $maxofam);

    //Convert a num dec to bin
    $binfir = base_convert($barg1, 10, 2);
    $binsec = base_convert($barg2, 10, 2);

    //REZAT' SUKU!!!!!111!!
    $strfir = $binfir . "";
    $strsec = $binsec . "";

    $lenfir = strlen($strfir);
    $lensec = strlen($strsec);

    //$accufir = substr($strfir, $acc);
    //$accusec = substr($strsec, 0, $acc);

    //comparison of the number of digits in numbers & adding of a holes & XOR

    $i = 0; //counter
    $holelessarr = "";
    $biggerarr = "";

    $answarr = "";
    $answarrs = "";

    $bigger = max($lenfir, $lensec);
    //if($bigger == $countfir)
    $less = min($lenfir, $lensec);
    $diff = ($bigger - $less);
    //Holes
    if ($diff>0) {
        for (; $i< $diff; $i++) {
            $holelessarr = $holelessarr . "0";
        }
        if($bigger == $lenfir) {
            //$holelessarr = $holelessarr . $strsec;
            $strsec = $holelessarr . $strsec;
            //$biggerarr = $strfir;
        } else {
            //$holelessarr = $holelessarr . $strfir;
            $strfir = $holelessarr . $strfir;
            //$biggerarr = $strsec;
        }
    } else {
        $holelessarr = $strfir;
        $biggerarr = $strsec;
    }

    // Одноточечный кроссинговер
    $randnum = rand(1, $bigger);

    for ($i = 0; $i < $randnum; $i++) {
        $answarr = $answarr . $strfir[$i];
        $answarrs = $answarrs . $strsec[$i];
    }

    for ($i = $randnum; $i < $bigger; $i++) {
        $answarr = $answarr . $strsec[$i];
        $answarrs = $answarrs . $strfir[$i];
        //echo $i;
    }

    $answer = base_convert($answarr, 2, 10) / pow(10, $maxofam);
    $answers = base_convert($answarrs, 2, 10) / pow(10, $maxofam);

    if(4 * sin(deg2rad($answer / 20)) + 10 < 4 * sin(deg2rad($answers / 20)) + 10) {$answer = $answers;}

    return mutation(base_convert($answer, 10, 2), 0);
}

function mutation($binary, $chanse) {

    $rand_numb = rand(0, 100);

    if($rand_numb <= $chanse) {
        echo "BITCH";
        $bit_numb = rand(0, strlen($binary) -1);

        if($binary[$bit_numb] == "0") {
            $binary[$bit_numb] = "1";
        } else {
            $binary[$bit_numb] = "0";
        }
    }

    return base_convert($binary, 2, 10);
}