OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
1037 + sigma(1037) + phi(1037) = 3113.
MAPLE
ispali:= proc(n) local L, i;
L:= convert(n, base, 10);
andmap(t -> L[t] = L[-t], [$1..nops(L)/2]);
end proc:
select(n -> ispali(n + numtheory:-sigma(n) + numtheory:-phi(n)), [$1..10000]); # Robert Israel, Dec 20 2023
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Giovanni Resta, Feb 13 2006
STATUS
approved