function variance ($a)
{
/** variable and initializations */
$the_variance = 0.0;
$the_mean = 0.0;
$the_array_sum = array_sum($a);
$number_elements = count($a); /** calculate the mean */
$the_mean = $the_array_sum / $number_elements; /** calculate the variance */
for ($i = 0; $i < $number_elements; $i++)
{
/** sum the array */
$the_variance = $the_variance + ($a[$i] - $the_mean) * ($a[$i] - $the_mean);
} $the_variance = $the_variance / ($number_elements - 1.0); /** return the variance */
return $the_variance;
}