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 A109879 #7 Jul 31 2015 01:24:22 %S A109879 7,19,91,127,721,919,999,1385,1727,3159,4376,5409,5831,6734,7271,9045, %T A109879 9513,10647,11824,12691,14491,15967,16939,19441,19621,25352,26973, %U A109879 27872,28737,29783,31213,35163,35929,36153,37962,37973,38656,38792,39636 %N A109879 Numbers n such that n and its digit reversal R(n) both are difference of positive cubes. %C A109879 Numbers n such that n and R(n) are both of the form a^3-b^3 with a > b > 0. %e A109879 19 = 3^3 - 2^3 and 91 = 6^3 - 5^3. %t A109879 t1 = Select[ Union[ Flatten[ Table[n^3 - m^3, {n, 185}, {m, 0, n - 1}]]], # < 10^5 && Mod[ #, 10] != 0 &]; t2 = FromDigits /@ Reverse /@ IntegerDigits /@ t1; Take[ Intersection[t1, t2], 40] (* _Robert G. Wilson v_, Jul 14 2005 *) %Y A109879 Cf. A109880. %K A109879 base,nonn %O A109879 1,1 %A A109879 _Amarnath Murthy_, Jul 10 2005 %E A109879 Edited and extended by _Robert G. Wilson v_, Jul 14 2005