|
|
A230006
|
|
Numbers n such that sigma(n) + phi(n) = reversal(n) + 1.
|
|
5
|
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
If p=4*10^m-3 is prime then p is in the sequence.
|
|
LINKS
|
|
|
EXAMPLE
|
sigma(37)+phi(37)=38+36=73+1=reversal(37)+1.
|
|
MATHEMATICA
|
r[n_] := FromDigits[Reverse[IntegerDigits[n]]]; Do[If[DivisorSigma[1, n] + EulerPhi[n] == r[n]+1, Print[n]], {n, 1000000000}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|