A138327 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A138327

Nonsquares not representable as p+g, where p is a prime and g is a primitive root of p.

2, 6, 11, 14, 26, 35, 41, 45, 51

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

This is sequence is probably complete.

There are no more terms below 10^5. - Amiram Eldar, Oct 09 2021

LINKS

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

MATHEMATICA

seq[m_] := Module[{p = Select[Range[m], PrimeQ], s}, s = Complement[Range[m], p + PrimitiveRootList[p] // Flatten]; Select[s, !IntegerQ @ Sqrt[#] &]]; seq[100] (* Amiram Eldar, Oct 09 2021 *)

CROSSREFS

Cf. A060749 (primitive roots), A138326.

Sequence in context: A323044 A057976 A140486 * A057244 A241672 A376359

Adjacent sequences: A138324 A138325 A138326 * A138328 A138329 A138330

KEYWORD

nonn,more

AUTHOR

T. D. Noe, Mar 14 2008

STATUS

approved