A072469 Right diagonal of triangle in A072467.

2, 3, 7, 29, 61, 157, 239, 521, 739, 1021, 1277, 2221, 2731, 3851, 4651, 5857, 7039, 9343, 10831, 14561, 15919, 18481, 20563, 25321, 27551, 32371, 35803, 40993, 44371, 53551, 55987, 66721, 72733, 80207, 87151, 97453, 101603, 116471, 123787

Offset

1,1

Links

Table of n, a(n) for n=1..39.

Mathematica

a = {2}; k = 3; Do[i = 1; While[i < n + 1, If[ PrimeQ[k] && Mod[k, n] == 1, a = Append[a, k]; i++ ]; k++ ], {n, 2, 40}]; Table[ a[[n(n - 1)/2 + 1]], {n, 1, 40}]

Crossrefs

Cf. A072467, A072468.

Sequence in context: A019435 A061092 A084435 * A004062 A037151 A326358

Adjacent sequences: A072466 A072467 A072468 * A072470 A072471 A072472

Keyword

nonn

Author

Amarnath Murthy, Jun 19 2002

Extensions

Edited by Robert G. Wilson v, Jun 28 2002

Status

approved