A113167 Triangle read by rows; n-th row begins with n and contains n primes greater than n and not already used.
0, 1, 2, 2, 3, 5, 3, 7, 11, 13, 4, 17, 19, 23, 29, 5, 31, 37, 41, 43, 47, 6, 53, 59, 61, 67, 71, 73, 7, 79, 83, 89, 97, 101, 103, 107, 8, 109, 113, 127, 131, 137, 139, 149, 151, 9, 157, 163, 167, 173, 179, 181, 191, 193, 197, 10, 199, 211, 223, 227, 229, 233, 239, 241, 251
Offset: 0
Examples
0 1 2 2 3 5 3 7 11 13 4 17 19 23 29 5 31 37 41 43 47
Links
- Harvey P. Dale, Table of n, a(n) for n = 0..1000
- Chris Caldwell, The First 1000 primes.
Crossrefs
Cf. A113031.
Programs
-
Mathematica
With[{nn=10},Join[{0},Flatten[Thread[{Range[nn],TakeList[Prime[Range[(nn(nn+1))/2]],Range[nn]]}]]]] (* Harvey P. Dale, Jan 30 2025 *)
Extensions
More terms from R. J. Mathar, Aug 29 2007
Comments