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 A297000 #23 Feb 16 2025 08:33:52 %S A297000 5,7,10,14,15,20,25,28,30,35,45,49,50,56,60,63,70,75,80,88,90,91,92, %T A297000 98,100,105,112,115,125,126,140,147,150,160,161,175,180,182,196,200, %U A297000 207,210,224,225,230,240,245,250,252,264,273,276,294,300,315,320,322,343 %N A297000 Numbers k such that A296992(k) = 1. %H A297000 Amiram Eldar, <a href="/A297000/b297000.txt">Table of n, a(n) for n = 1..2000</a> %H A297000 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/TauFunction.html">Tau Function</a>. %t A297000 1 + Position[Table[-1 + SelectFirst[Range[0, 5], ! Divisible[RamanujanTau@ n, n^#] &], {n, 2, 350}], 1][[All, 1]] (* _Michael De Vlieger_, Dec 23 2017 *) %o A297000 (PARI) isok(k) = if(k == 1, 0, valuation(ramanujantau(k), k) == 1); \\ _Amiram Eldar_, Jan 09 2025 %Y A297000 Cf. A000594, A063938, A296992, A297001. %K A297000 nonn %O A297000 1,1 %A A297000 _Seiichi Manyama_ and _Robert G. Wilson v_, Dec 23 2017