A256347 Moduli n for which A248218(n) = 7.

41, 123, 131, 287, 317, 393, 503, 547, 727, 779, 861, 917, 951, 1091, 1237, 1271, 1277, 1509, 1517, 1627, 1637, 1641, 1681, 1763, 2089, 2181, 2219, 2239, 2337, 2357, 2383, 2489, 2531, 2671, 2751, 2789

Offset

1,1

Comments

If x is a member, and y is a member of this sequence or A248219, then LCM(x,y) is a member. - Robert Israel, Mar 09 2021

Links

Robert Israel, Table of n, a(n) for n = 1..4000

Maple

filter:= proc(n) local x, k, R, p;
  x:= 0; R[0]:= 0;
  for k from 1 do
    x:= x^2+1 mod n;
    if assigned(R[x]) then return evalb(k-R[x] = 7)
    else R[x]:= k
    fi
  od;
end proc:
select(filter, [$1..10000]); # Robert Israel, Mar 09 2021

Prog

(PARI) for(i=1, 3000, A248218(i)==7&&print1(i", "))

Crossrefs

Cf. A248218, A248219, A256342 - A256349, A003095, A247981.

Sequence in context: A044673 A135793 A135792 * A232100 A195038 A067896

Adjacent sequences: A256344 A256345 A256346 * A256348 A256349 A256350

Keyword

nonn

Author

M. F. Hasler, Mar 25 2015

Status

approved