Shuffle-with-solid-distribution

<?php

$data = [1,1,1,1,2,2,2,2,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4];

$chunks = array_count_values($data);
$values = array_keys($chunks);
$used = array_combine($values, array_fill(0, count($values), 0));

$new_distribution = [];
$previous = null;

for ($i=count($data); $i > 0; $i--) {
    $iterations = 0; // Prevent infinite loop
    do {
        $value = $values[mt_rand(0, count($values)-1)];
    } while($previous === $value && $iterations++ < 11);
    
    if ($used[$value] >= $chunks[$value]) {
        unset($values[array_search($value, $values)]);
        $values = array_values($values);
    }
    
    $new_distribution[] = $value;
    $used[$value]++;
    $previous = $value;
}

$avg_distribution = array_slice($new_distribution, 0, floor(count($data) / array_keys($chunks)));