A354938 - OEIS

%I #9 Jun 17 2022 14:52:29

%S 3,9,11,17,19,25,27,33,41,43,49,57,59,67,73,81,83,89,97,105,107,113,

%T 121,129,131,137,139,145,161,163,169,177,179,185,193,201,209,211,217,

%U 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

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

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

%t 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 *)

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

%Y Row 8 of A354940.

%Y Cf. A017077, A017101, A344005, A345992.

%K nonn

%O 1,1

%A _Antti Karttunen_, Jun 15 2022