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 A211408 #23 Oct 26 2024 22:57:34 %S A211408 0,1,2,3,4,5,6,7,8,9,10,11,14,22,33,34,35,38,41,43,44,45,48,53,54,55, %T A211408 58,66,67,69,76,77,79,83,84,85,88,96,97,99,101,102,103,104,105,106, %U A211408 107,108,109,111,112,113,115,118,121,122,123,124,125,126,127,128,129 %N A211408 Numbers k such that the number of letters, excluding spaces and hyphens, in the English names of k and its reversal are the same. %C A211408 All base-10 palindromes occur in this sequence. %H A211408 Robert G. Wilson v, <a href="/A211408/b211408.txt">Table of n, a(n) for n = 0..23885</a> %F A211408 {n such that A005589(n) = A005589(A004086(n))}. %e A211408 10 is in the sequence because "ten" has three letters, and so does "one" which is the name of the digital reverse of 10, which is 1 (because the leading 0 is truncated in 01). %e A211408 14 is in the sequence because "fourteen" and "fortyone" both have 8 letters. %t A211408 lst= {(* copy the words from https://oeis.org/A000027/a000027.txt *)}; f[n_] := StringLength@ ToString@ lst[[n + 1]]; fQ[n_] := f@ n == f@ FromDigits@ Reverse@ IntegerDigits@ n; Select[Range[0, 130], fQ] (* _Robert G. Wilson v_, Feb 12 2013 *) %Y A211408 Subsequences: A002113. %Y A211408 Cf. A000027, A004086, A005589, A107322. %K A211408 nonn,base,easy,word %O A211408 0,3 %A A211408 _Jonathan Vos Post_, Feb 09 2013 %E A211408 Corrected and extended by _Robert G. Wilson v_, Feb 12 2013