A327763 Numbers k such that 4k - 1 divides 2^k + k^2.

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

Author

Juri-Stepan Gerasimov, Sep 24 2019

Keywords

• nonn

Comments

Primes: 5, 58061, 341455271,...

Crossrefs

Cf. A001580, A327636, A123047, A327943.

Programs

Mathematica

Select[Range[10^5], Mod[PowerMod[2, #, 4*#-1] + #^2, 4*#-1] == 0 &] (* Giovanni Resta, Oct 09 2019 *)

Extensions

a(10)-a(27) from Giovanni Resta, Oct 09 2019