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 A378162 #9 Nov 26 2024 02:20:56 %S A378162 0,2,3,6,8,11,14,15,18,20,24,27,30,32,35,36,39,42,44,47,48,54,59,60, %T A378162 62,63,66,68,71,72,74,75,80,83,84,86,87,90,92,95,96,98,102,104,107, %U A378162 108,110,114,116 %N A378162 Number k such that !k = A000166(k) is squarefree. %C A378162 0 and numbers k such that A378160(k) = A378161(k). %C A378162 If k is a term, then k-1 is squarefree (since (k-1) | A000166(k)). %C A378162 a(34) >= 83. %t A378162 Select[Range[0, 40], SquareFreeQ[Subfactorial[#]] &] %o A378162 (PARI) lista(kmax) = {my(s = 0); print1(0, ", "); for(k = 2, kmax, s = k * s + (-1)^k; if(issquarefree(s), print1(k, ", ")));} %Y A378162 Cf. A000166, A005117, A378160, A378161. %K A378162 nonn,more %O A378162 1,2 %A A378162 _Amiram Eldar_, Nov 18 2024 %E A378162 a(34)-a(49) from _Jinyuan Wang_, Nov 25 2024