A258249 Lexicographically smallest sequence of primes such that Legendre symbol (a(1)*...*a(n-1) / a(n)) = 1 for all n.

2, 7, 3, 11, 43, 5, 13, 17, 47, 19, 23, 61, 29, 41, 59, 31, 53, 67, 71, 79, 37, 83, 73, 101, 89, 103, 127, 97, 107, 113, 131, 139, 109, 151, 149, 137, 163, 157, 173, 197, 167, 179, 181, 191, 193, 223, 227, 199, 233, 211, 229, 239, 241, 263, 251, 269, 257, 271, 277, 281, 283, 311, 293, 307, 317, 331

Offset

1,1

Links

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

Prog

(PARI) { P=1; for(n=1, 100, p=2; while( kronecker(p, P)!=1, p=nextprime(p+1)); print1(p, ", "); P*=p) }

Crossrefs

Cf. A167604

Sequence in context: A332363 A353408 A365966 * A256448 A056756 A120861

Adjacent sequences: A258246 A258247 A258248 * A258250 A258251 A258252

Keyword

nonn

Author

Max Alekseyev, May 24 2015

Status

approved