This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A178168 #5 Mar 30 2012 17:22:56 %S A178168 1,2,153600,8,5120,921600,704889816350720000,64, %T A178168 2486851272085340160000,51200,4577206599680000,11059200,532480000, %U A178168 9868457428910080000,114523513552896000000000,1024,12238520320000,44763322897536122880000 %N A178168 Product of the numbers in the Collatz (3x+1) trajectory of n, including n. %C A178168 Row n of A070165 has the Collatz trajectory of n. It appears that all products are unique. This has been verified for all n < 10^6 and for the 12332052 values of n for which a(n) < 2^1081. %H A178168 T. D. Noe, <a href="/A178168/b178168.txt">Table of n, a(n) for n=1..500</a> %e A178168 The Collatz iteration starting with 3 is 3, 10, 5, 16, 8, 4, 2, 1. The product of these numbers is 153600. %t A178168 Collatz[n_] := NestWhileList[If[EvenQ[ # ], #/2, 3#+1] &, n, #>1 &]; Table[Times@@Collatz[n], {n, 100}] %Y A178168 Cf. A087226 (LCM of the trajectory), A178169, A178170 %K A178168 nonn %O A178168 1,2 %A A178168 _T. D. Noe_, May 21 2010