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 A161950 #17 Feb 16 2025 08:33:10 %S A161950 1,2,3,4,5,6,7,8,9,10,11,12,17,45,85,98,136,160,793,794,854,1968,8194, %T A161950 62481,167544,167545,294094,320375,323612,325471,325713,350131,365914, %U A161950 2412003,4861352,21710514,43757311,43757312,46299414,51798568,52994053 %N A161950 Base-13 Armstrong or narcissistic numbers (written in base 10). %H A161950 Joseph Myers, <a href="/A161950/b161950.txt">Table of n, a(n) for n = 1..201</a> (the full list of terms, from Winter) %H A161950 Henk Koppelaar and Peyman Nasehpour, <a href="https://arxiv.org/abs/2008.08187">On Hardy's Apology Numbers</a>, arXiv:2008.08187 [math.NT], 2020. %H A161950 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/NarcissisticNumber.html">Narcissistic Number</a> %H A161950 D. T. Winter, <a href="http://ftp.cwi.nl/dik/Armstrong">Table of Armstrong Numbers</a> %t A161950 Select[Range[10^7], # == Total[IntegerDigits[#, 13]^IntegerLength[#, 13]] &] (* _Michael De Vlieger_, Nov 04 2020 *) %Y A161950 In other bases: A010344 (base 4), A010346 (base 5), A010348 (base 6), A010350 (base 7), A010354 (base 8), A010353 (base 9), A005188 (base 10), A161948 (base 11), A161949 (base 12), A161951 (base 14), A161952 (base 15), A161953 (base 16). %K A161950 base,fini,full,nonn %O A161950 1,2 %A A161950 _Joseph Myers_, Jun 22 2009