26 lines
583 B
PHP
26 lines
583 B
PHP
<?php
|
|
function columns($uarr)
|
|
{
|
|
$n=$uarr;
|
|
if (count($n) == 0)
|
|
return array();
|
|
else if (count($n) == 1)
|
|
return array_chunk($n[0], 1);
|
|
array_unshift($uarr, NULL);
|
|
$transpose = call_user_func_array('array_map', $uarr);
|
|
return array_map('array_filter', $transpose);
|
|
}
|
|
function bead_sort($uarr)
|
|
{
|
|
foreach ($uarr as $e)
|
|
$poles []= array_fill(0, $e, 1);
|
|
return array_map('count', columns(columns($poles)));
|
|
}
|
|
echo 'Original Array : '.'
|
|
';
|
|
print_r(array(5,3,1,3,8,7,4,1,1,3));
|
|
echo '
|
|
'.'After Bead sort : '.'
|
|
';
|
|
print_r(bead_sort(array(5,3,1,3,8,7,4,1,1,3)));
|
|
?>
|