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 A131934 #26 Nov 02 2023 02:06:47 %S A131934 2,3,4,5,6,10,11,17,21,31,34,37,38,49,54,72,98,126,129,176,178,247, %T A131934 276,281,331,359,399,441,454,525,558,692,718,734,764,1023,1138,1485, %U A131934 1755,2008,2166,2590,2702,2733,3169,3687,3802,4133,4604,5025,5841,6019,6311 %N A131934 Records in A014197. %H A131934 Jud McCranie, <a href="/A131934/b131934.txt">Table of n, a(n) for n = 1..109</a> (terms 1..79 from T. D. Noe, terms 80..86 from Donovan Johnson) %F A131934 a(n) = A014197(A097942(n)). - _R. J. Mathar_, Nov 07 2007 %p A131934 # For the function HighlyTotientNumbers see A097942. %p A131934 A131934_list := n -> seq(s[2], s = HighlyTotientNumbers(n)); %p A131934 A131934_list(500); # _Peter Luschny_, Sep 01 2012 %o A131934 (Sage) %o A131934 # For the function HighlyTotientNumbers see A097942. %o A131934 A131934_list = lambda n: [s[1] for s in HighlyTotientNumbers(n)] %o A131934 A131934_list(500) # _Peter Luschny_, Sep 01 2012 %Y A131934 Cf. A000010, A014197, A097942. %K A131934 nonn %O A131934 1,1 %A A131934 _N. J. A. Sloane_, Nov 05 2007 %E A131934 More terms from _R. J. Mathar_, Nov 07 2007 %E A131934 Deleted my csh program which is unstable at high indices - _R. J. Mathar_, Mar 17 2010 %E A131934 Corrected and extended by _T. D. Noe_, Mar 16 2010