login
A327763
Numbers k such that 4k - 1 divides 2^k + k^2.
0
1, 5, 2071, 33421, 58061, 1977071, 7011161, 10144571, 10189721, 166311841, 173618771, 215766701, 240623221, 341359721, 341455271, 389192441, 490814481, 524456461, 585387477, 888576461, 1123952441, 1276706071, 2005030751, 2244832943, 2863311531, 3104590331, 3904529471
OFFSET
1,2
COMMENTS
Primes: 5, 58061, 341455271,...
MATHEMATICA
Select[Range[10^5], Mod[PowerMod[2, #, 4*#-1] + #^2, 4*#-1] == 0 &] (* Giovanni Resta, Oct 09 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
a(10)-a(27) from Giovanni Resta, Oct 09 2019
STATUS
approved