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 A065294 #17 Jun 21 2018 03:06:58 %S A065294 2,3,4,7,8,10,14,15,16,17,19,22,23,25,32,33,37,43,44,46,47,51,55,57, %T A065294 59,64,67,68,69,76,79,82,85,87,88,89,92,93,94,95,99,101,102,109,110, %U A065294 113,114,115,116,119,122,125,127,128,129,133,134,137,141,142,143,148 %N A065294 Values of k such that A065293(k) = 0. %H A065294 Michel Marcus, <a href="/A065294/b065294.txt">Table of n, a(n) for n = 1..1000</a> %t A065294 Position[Table[Count[Range[0, n - 1], _?(Mod[2^#, n] == # &)], {n, 150}], 0][[All, 1]] (* _Michael De Vlieger_, Jun 19 2018 *) %o A065294 (PARI) isok(n) = sum(s=0, n-1, Mod(2, n)^s == s) == 0; \\ _Michel Marcus_, Jun 19 2018 %Y A065294 Cf. A065293. %K A065294 nonn %O A065294 1,1 %A A065294 Jonathan Ayres (jonathan.ayres(AT)btinternet.com), Oct 28 2001 %E A065294 Incorrect term 1 removed by _Michel Marcus_, Jun 20 2018