login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A138143
Triangle read by rows in which row n lists p(1), p(2), ..., p(n), p(n-1), ..., p(1), where p(i) = i-th prime.
3
2, 2, 3, 2, 2, 3, 5, 3, 2, 2, 3, 5, 7, 5, 3, 2, 2, 3, 5, 7, 11, 7, 5, 3, 2, 2, 3, 5, 7, 11, 13, 11, 7, 5, 3, 2, 2, 3, 5, 7, 11, 13, 17, 13, 11, 7, 5, 3, 2, 2, 3, 5, 7, 11, 13, 17, 19, 17, 13, 11, 7, 5, 3, 2, 2, 3, 5, 7, 11, 13, 17, 19, 23, 19, 17, 13, 11, 7, 5, 3, 2, 2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 23, 19, 17, 13, 11, 7, 5, 3, 2
OFFSET
1,1
COMMENTS
Row n contains 2n-1 terms and each column lists the prime numbers A000040.
Triangle of primes mentioned in A061802.
EXAMPLE
Triangle begins:
.............. 2
........... 2, 3, 2
........ 2, 3, 5, 3, 2
..... 2, 3, 5, 7, 5, 3, 2
.. 2, 3, 5, 7,11, 7, 5, 3, 2
MATHEMATICA
nn=10; Module[{pr=Prime[Range[nn]], e}, Flatten[Table[e=Take[pr, n]; Join[ e, Reverse[Most[e]]], {n, nn}]]] (* Harvey P. Dale, Mar 14 2015 *)
CROSSREFS
KEYWORD
easy,nonn,tabf
AUTHOR
Omar E. Pol, Mar 09 2008
EXTENSIONS
Edited by N. J. A. Sloane, Apr 07 2008, Nov 15 2008
STATUS
approved