Euler/_functions.php

<?php

function isPrimary($number){
    $i=1;
    while(getPrimeNumber($i) <= sqrt($number)){
        if(fmod($i,getPrimeNumber($i))==0){
            return false;
        }
        $i=$i+2;
    }
    return true;
}

function getPrimeNumber($order){

    static $primeNumbersList=array(2,3);
    //if already finded:
    if(isset($primeNumbersList[$order-1])){
        return $primeNumbersList[$order-1];
    }
    
    $i=$primeNumbersList[count($primeNumbersList)-1] + 2;

    while (count($primeNumbersList) < $order){
        $isPrimaryNumber=true;
        $index=0;
        
        while(($primeNumbersList[$index]<=sqrt($i)) && $index < count($primeNumbersList)){
            if(fmod($i,$primeNumbersList[$index])==0){
                $isPrimaryNumber=false;
                break;
            }
            $index++;
        }
        if($isPrimaryNumber){
            $primeNumbersList[]=$i;
        }
        $i=$i+2;//sert à rien de tester les nombres pairs
    }
    return $i-2;
}

function getAllDivisors($n,$takeOne=true,$takeHimself=true){
  $divisors=array();
  if($takeOne){
    $divisors[]=1;
  }
  if($takeHimself){
    $divisors[]=$n;
  }
  
  for($i=2;$i<=sqrt($n);$i++){
    if(fmod($n,$i)==0){
      $divisors[]=$i;
      if($i <> $n/$i){
	$divisors[]=$n/$i;
      }
    }
  }
  sort($divisors);
  return $divisors;
}

function isAbundant($n){
  if(array_sum(getAllDivisors($n,true,false))>$n)
    return true;
  else
    return false;
}