A115749 Numbers n such that sigma(n)=8*reversal(n).
861, 951, 2070, 8241, 900051, 8864151, 9000051, 82000041, 8200000041, 82000000041
Offset: 1
Examples
82000041 is in the sequence because sigma(82000041) =112000224=8*14000028=8*reversal(82000041).
Programs
-
Mathematica
Do[If[DivisorSigma[1,n]==8*FromDigits[Reverse[IntegerDigits[n]]],Print[n]],{n,130000000}]
Extensions
a(9)-a(10) from Donovan Johnson, Dec 21 2008
Comments