A354934 Row 4 of A354940: Numbers k for which A345992(k) = 4, divided by 4.

5, 9, 13, 17, 21, 25, 29, 37, 41, 49, 53, 57, 61, 73, 81, 85, 89, 93, 97, 101, 109, 113, 117, 121, 125, 129, 137, 149, 157, 169, 173, 181, 185, 193, 197, 201, 217, 229, 233, 237, 241, 253, 257, 269, 277, 281, 289, 293, 297, 301, 309, 313, 317, 337, 341, 349, 353, 361, 373, 381, 389, 397, 401, 409, 413, 417, 421, 425

Offset: 1

Author

Antti Karttunen, Jun 15 2022

Keywords

• nonn

Comments

Apparently a subsequence of A016813.

Crossrefs

Row 4 of A354940.

Cf. A016813, A344005, A345992.

Programs

Mathematica

q[n_] := Module[{m = 1}, While[!Divisible[m*(m + 1), 4*n], m++]; GCD[4*n, m] == 4]; Select[Range[425], q] (* Amiram Eldar, Jun 17 2022 *)

PARI

A354934(n) = A354940sq(4,n);