Advertisement
apexsquirt

Still about Collatz conjecture

Nov 4th, 2017
225
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
PHP 0.42 KB | None | 0 0
  1. <?php
  2. for ($i = 1; $i > 0; $i++) {
  3.     $a[0] = $i;
  4.     $s .= $a[0] . " ";
  5.     for ($j = 1; $j > 0; $j++) {
  6.         $a[$j] = ($a[$j-1] % 2)*(3*$a[$j-1] + 1) + (1 - ($a[$j-1] % 2))*($a[$j-1] / 2);
  7.         $s .= $a[$j] . " ";
  8.         if ($a[$j-3] . $a[$j-2] . $a[$j-1] == "421") { $j = -1; }
  9.     }
  10.     $s .= "\n";
  11.     if ($i % 5000 == 0) {
  12.         file_put_contents(($i / 5000) . ".log", $s);
  13.         $s = "";
  14.     }
  15. }
  16. ?>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement