A093870 Triangle read by rows: T(n,k) is the k-th prime = -1 (mod n), 1 <= k <= n.

2, 3, 5, 2, 5, 11, 3, 7, 11, 19, 19, 29, 59, 79, 89, 5, 11, 17, 23, 29, 41, 13, 41, 83, 97, 139, 167, 181, 7, 23, 31, 47, 71, 79, 103, 127, 17, 53, 71, 89, 107, 179, 197, 233, 251, 19, 29, 59, 79, 89, 109, 139, 149, 179, 199, 43, 109, 131, 197, 241, 263, 307, 373, 439, 461, 571

Offset

1,1

Links

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

Example

2;
3,5;
2,5,11;
3,7,11,19;
...

Mathematica

row[n_] := Reap[Module[{k, p}, For[k = 0; p = n - 1, k < n, p += n, If[PrimeQ[p], k++; Sow[p]]]]][[2, 1]];
Array[row, 12] // Flatten (* Jean-François Alcover, Jun 08 2020 *)

Crossrefs

Cf. A077316, A038700 (first column), A093871 (main diagonal).

Sequence in context: A102044 A370590 A125766 * A250445 A297996 A239692

Adjacent sequences: A093867 A093868 A093869 * A093871 A093872 A093873

Keyword

nonn,tabl

Author

Amarnath Murthy, Apr 20 2004

Extensions

Edited and extended by Franklin T. Adams-Watters, Aug 29 2006

Definition clarified by Zak Seidov, Apr 16 2013

Duplicate term 139 removed by Jean-François Alcover, Jun 08 2020

Status

approved