From 0070fcd07f5666b03a99fa45121865def05aa2f7 Mon Sep 17 00:00:00 2001
From: Gnieark <gnieark@free.fr>
Date: Thu, 19 Nov 2015 19:43:31 +0100
Subject: [PATCH] 14

---
 euler14.php | 37 +++++++++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)
 create mode 100644 euler14.php

diff --git a/euler14.php b/euler14.php
new file mode 100644
index 0000000..9471f3b
--- /dev/null
+++ b/euler14.php
@@ -0,0 +1,37 @@
+<?php
+/*
+* Gnieark's anwser to euler problem 14
+* https://projecteuler.net/problem=14
+*/
+$longestSequence=0;
+$startOfLongestSequence=0;
+for($i=1;$i<1000000;$i++){
+  //echo $i."\n";
+  $long=countCollatzSequence($i);
+  if($long>$longestSequence){
+   $longestSequence=$long;
+   $startOfLongestSequence=$i;
+  }
+}
+echo $startOfLongestSequence;
+
+function countCollatzSequence($start){
+  $count=1;
+  $number=$start;
+  $next=nextCollatzNumber($number);
+  while($number<>1){
+    $number=nextCollatzNumber($number);
+    $count++;
+  }
+  return $count;
+}
+
+function nextCollatzNumber($previous){
+  if(fmod($previous,2)==0){
+    //odd
+    return $previous/2;
+  }else{
+    //even
+    return 3 * $previous + 1;
+  }
+}
\ No newline at end of file