This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A354936 #8 Jun 17 2022 14:52:20 %S A354936 7,13,19,25,31,37,43,49,61,67,73,79,97,103,109,121,127,139,151,157, %T A354936 163,169,181,193,199,211,223,229,241,271,277,283,289,307,313,331,337, %U A354936 343,349,361,367,373,379,397,409,421,433,439,457,463,487,499,523,529,541,547,571,577,601,607,613,619,625,631,643,661 %N A354936 Row 6 of A354940: Numbers k for which A345992(k) = 6, divided by 6. %t A354936 q[n_] := Module[{m = 1}, While[!Divisible[m*(m + 1), 6*n], m++]; GCD[6*n, m] == 6]; Select[Range[660], q] (* _Amiram Eldar_, Jun 17 2022 *) %o A354936 (PARI) A354936(n) = A354940sq(6,n); %Y A354936 Row 6 of A354940. %Y A354936 Apparently a subsequence of A016921. %Y A354936 Cf. A344005, A345992. %K A354936 nonn %O A354936 1,1 %A A354936 _Antti Karttunen_, Jun 15 2022