A185242 Successive integers produced by Conway's PRIMEGAME, starting with 3 rather than 2.

3, 165, 145, 385, 455, 85, 78, 66, 58, 154, 182, 34, 2, 15, 825, 725, 1925, 2275, 425, 390, 330, 290, 770, 910, 170, 156, 132, 116, 308, 364, 68, 4, 30, 225, 12375, 10875, 28875, 25375, 67375, 79625, 14875, 13650, 2550

Offset: 1

Author

Alonso del Arte, Jan 24 2012

Keywords

• nonn

Comments

2 is nevertheless reached fairly soon, and after that the sequence proceeds exactly the same as A007542.

Examples

			After 3, we have 3 * 55 = 165 because none of the other fractions give an integer. Then we can use 29/33, and thus 165 * 29/33 = 145, and so on and so forth.
		

Links

• Wikipedia, Conway's PRIMEGAME

Crossrefs

Cf. A007542, A203907, A273091.

Programs

Haskell

a185242 n = a185242_list !! (n-1)
a185242_list = iterate a203907 3
-- Reinhard Zumkeller, Jan 25 2012

Mathematica

(* First run the program for A203907 to define conwayProc *) NestList[conwayProc, 3, 50]

Formula

a(n+12) = A007542 (n) for n > 0. - Charles R Greathouse IV, Jan 24 2012

a(n+1) = A203907(a(n)), a(1) = 3. - Reinhard Zumkeller, Jan 25 2012