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 A116030 #9 Jan 16 2023 11:34:33 %S A116030 4,8,9,18,25,27,28,57,62,72,85,123,128,176,184,189,192,218,220,234, %T A116030 243,246,252,256,258,259,261,278,282,306,309,316,322,332,338,339,356, %U A116030 375,380,388,399,403,490,495,505,512,518,544,590,597,622,632,655,662 %N A116030 sigma(n) - phi(n) is a palindrome greater than 2. %C A116030 When n is prime sigma(n)-phi(n) is 2, so that case is trivial. %H A116030 Harvey P. Dale, <a href="/A116030/b116030.txt">Table of n, a(n) for n = 1..1000</a> %e A116030 sigma(399) - phi(399) = 424. %t A116030 pg2Q[n_]:=With[{c=DivisorSigma[1,n]-EulerPhi[n]},PalindromeQ[c]&&c>2]; Select[ Range[700],pg2Q] (* _Harvey P. Dale_, Jan 16 2023 *) %o A116030 (Magma) [n: n in [1..1000] | Intseq(d) eq Reverse(Intseq(d)) and d gt 2 where d is DivisorSigma(1,n)-EulerPhi(n)]; // _Bruno Berselli_, Sep 09 2015 %Y A116030 Cf. A115897, A116031. %K A116030 nonn,base %O A116030 1,1 %A A116030 _Giovanni Resta_, Feb 13 2006