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 A299157 #30 Feb 16 2025 08:33:53 %S A299157 2,3,5,6,7,11,13,17,19,20,22,23,27,29,31,41,45,47,53,55,59,68,71,76, %T A299157 77,79,83,87,89,91,97,104,107,114,127,137,139,149,160,167,171,177,179, %U A299157 183,191,195,199,209,223,229,239,240,243,251,269,275,293,297,321,343 %N A299157 Numbers k such that k+1 divides tau(k), where tau(k) = A000594(k) is Ramanujan's tau function. %C A299157 Numbers k such that A299163(k) = 0. %H A299157 Seiichi Manyama, <a href="/A299157/b299157.txt">Table of n, a(n) for n = 1..500</a> %H A299157 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/TauFunction.html">Tau Function</a>. %t A299157 q[k_] := Divisible[RamanujanTau[k], k+1]; Select[Range[350], q] (* _Amiram Eldar_, Jan 08 2025 *) %o A299157 (PARI) isok(n) = (ramanujantau(n) % (n+1)) == 0; \\ _Michel Marcus_, Feb 05 2018 %Y A299157 Cf. A000594, A063938, A079334, A296991, A299158, A299163. %K A299157 nonn %O A299157 1,1 %A A299157 _Seiichi Manyama_, Feb 04 2018