A354939 - OEIS

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

%S 5,7,10,14,16,19,23,25,28,32,37,41,43,46,50,59,61,64,68,73,79,82,86,

%T 91,97,100,109,113,118,122,127,131,136,145,149,151,158,163,167,169,

%U 172,181,185,194,199,212,221,223,226,235,239,241,244,253,257,262,271,277,289,293,298,302,307,311,313,316,325,331,334

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

%C Apparently, all terms are either of the form 9k+1 (in A017173), or 9k+5 (in A017221), or 9k+7 (in A017245).

%t q[n_] := Module[{m = 1}, While[!Divisible[m*(m + 1), 9*n], m++]; GCD[9*n, m] == 9]; Select[Range[335], q] (* _Amiram Eldar_, Jun 17 2022 *)

%o (PARI) A354939(n) = A354940sq(9,n); \\ See the program in A354940.

%Y Row 9 of A354940.

%Y Cf. A017173, A017221, A017245, A344005, A345992.

%K nonn

%O 1,1

%A _Antti Karttunen_, Jun 15 2022