OFFSET
1,1
COMMENTS
When n is prime sigma(n)-phi(n) is 2, so that case is trivial.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
sigma(399) - phi(399) = 424.
MATHEMATICA
pg2Q[n_]:=With[{c=DivisorSigma[1, n]-EulerPhi[n]}, PalindromeQ[c]&&c>2]; Select[ Range[700], pg2Q] (* Harvey P. Dale, Jan 16 2023 *)
PROG
(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
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Giovanni Resta, Feb 13 2006
STATUS
approved