A164738 Triangle read by rows. Row 0 = {2}; left half of row n+1 = row n, right half = row n reversed with each term replaced by the next prime.

2, 2, 3, 2, 3, 5, 3, 2, 3, 5, 3, 5, 7, 5, 3, 2, 3, 5, 3, 5, 7, 5, 3, 5, 7, 11, 7, 5, 7, 5, 3, 2, 3, 5, 3, 5, 7, 5, 3, 5, 7, 11, 7, 5, 7, 5, 3, 5, 7, 11, 7, 11, 13, 11, 7, 5, 7, 11, 7, 5, 7, 5, 3, 2, 3, 5, 3, 5, 7, 5, 3, 5, 7, 11, 7, 5, 7, 5, 3, 5, 7, 11, 7, 11, 13, 11, 7, 5, 7, 11, 7, 5, 7, 5, 3, 5, 7, 11, 7

Offset: 0

Author

Gary W. Adamson, Aug 23 2009

Keywords

• nonn
• tabf

Comments

Row n has 2^n terms.

Row sums = (2, 5, 13, 33, 83, 205, 495,...) = A007443, the binomial transform of the primes.

Examples

			The triangle begins:
  2;
  2, 3;
  2, 3, 5, 3;
  2, 3, 5, 3, 5, 7, 5, 3;
  2, 3, 5, 3, 5, 7, 5, 3, 5, 7, 11, 7, 5, 7, 5, 3;
  ...
		

Links

• Alois P. Heinz, Rows n = 0..13, flattened

Crossrefs

Cf. A000040, A007443, A088696.

Programs

Mathematica

Flatten[NestList[Join[ #, NextPrime[Reverse[ # ]]] &, {2}, 7]] (* Zak Seidov, Aug 24 2009 *)

Extensions

More terms from Zak Seidov, Aug 24 2009

Edited by Zak Seidov and N. J. A. Sloane, Aug 25 2009

Offset 0 from Alois P. Heinz, Oct 31 2023