A063042 Collatz-2 (A063041) trajectory starting at 3.

3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9, 3, 7, 36, 18, 9

Offset

0,1

Comments

a(0) = a(5) = 3

Links

Table of n, a(n) for n=0..104.

Formula

a(0) = 3 and a(n) = A063041(a(n-1)) for n > 0

Mathematica

NestList[If[PrimeQ[#], #*Prime[PrimePi[#]-1]+1, #/Min@@First/@FactorInteger[#]]&, 3, 104] (* Jayanta Basu, May 27 2013 *)

Crossrefs

A063041.

Sequence in context: A132102 A081555 A301341 * A108505 A047158 A221511

Adjacent sequences: A063039 A063040 A063041 * A063043 A063044 A063045

Keyword

nonn,easy

Author

Reinhard Zumkeller, Jul 07 2001

Status

approved