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 A099226 #9 Feb 13 2021 01:14:03
%S A099226 27,248,2194,32763
%N A099226 Numbers that can be represented as both a^x+x and b^y-y, for some a, b, x, y > 1.
%C A099226 No other terms < 10^15. The intersection of A057897 and A099225. The representation question leads to a Pillai-like exponential Diophantine equation a^x-b^y = x+y for y > x > 1 and b > a > 1.
%e A099226 27 = 25^2+2 = 32^5-5, 248 = 7^3+3 = 2^8-8, 2194 = 3^7+7 = 13^3-3 and 32763 = 181^2+2 = 8^5-5.
%t A099226 nLim=40000; lst1={}; Do[k=2; While[n=m^k-k; n<=nLim, AppendTo[lst1, n]; k++ ], {m, 2, Sqrt[nLim]}]; lst2={}; Do[k=2; While[n=m^k+k; n<=nLim, AppendTo[lst2, n]; k++ ], {m, 2, Sqrt[nLim]}]; Intersection[lst1, lst2]
%Y A099226 Cf. A074981 (n such that there is no solution to Pillai's equation).
%K A099226 nonn,more
%O A099226 1,1
%A A099226 _T. D. Noe_, Oct 06 2004