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

3, 9, 11, 17, 19, 25, 27, 33, 41, 43, 49, 57, 59, 67, 73, 81, 83, 89, 97, 105, 107, 113, 121, 129, 131, 137, 139, 145, 161, 163, 169, 177, 179, 185, 193, 201, 209, 211, 217, 225, 227, 233, 241, 243, 249, 251, 257, 281, 283, 289, 297, 305, 307, 313, 321, 329, 331, 337, 345, 347, 353, 361, 377, 379, 393, 401, 409, 417

Offset

1,1

Comments

Apparently, all terms are either of the form 8k+1 (in A017077) or 8k+3 (in A017101).

Links

Table of n, a(n) for n=1..68.

Mathematica

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

Prog

(PARI) A354938(n) = A354940sq(8, n);

Crossrefs

Row 8 of A354940.

Cf. A017077, A017101, A344005, A345992.

Sequence in context: A194401 A190238 A047471 * A365082 A201544 A225771

Adjacent sequences: A354935 A354936 A354937 * A354939 A354940 A354941

Keyword

nonn

Author

Antti Karttunen, Jun 15 2022

Status

approved