A256346 Moduli n for which A248218(n) = 6.

10, 17, 18, 20, 30, 34, 36, 40, 49, 50, 51, 54, 55, 60, 68, 70, 72, 73, 80, 85, 90, 98, 99, 100, 102, 108, 110, 115, 118, 119, 120, 126, 136, 140, 144, 145, 146, 147, 150, 153, 160, 165, 170, 180, 187, 190, 194, 196, 198, 199, 200, 204, 207, 210, 211, 216, 219, 220, 230, 236, 238, 240, 245, 250

Offset

1,1

Comments

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

Links

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

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] = 6)
    else R[x]:= k
    fi
  od;
end proc:
select(filter, [$1..1000]); # Robert Israel, Mar 09 2021

Prog

(PARI) for(i=1, 250, A248218(i)==6&&print1(i", "))

Crossrefs

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

Sequence in context: A255531 A157159 A176664 * A079630 A175389 A350779

Adjacent sequences: A256343 A256344 A256345 * A256347 A256348 A256349

Keyword

nonn

Author

M. F. Hasler, Mar 25 2015

Status

approved