A071582 Powers of 4 written backwards.
1, 4, 61, 46, 652, 4201, 6904, 48361, 63556, 441262, 6758401, 4034914, 61277761, 46880176, 654534862, 4281473701, 6927694924, 48196897171, 63767491786, 449609778472, 6777261159901, 4011156408934, 61444068129571
Offset: 0
Links
- Alois P. Heinz, Table of n, a(n) for n = 0..1000
Programs
-
Maple
a:= n-> (s-> parse(cat(s[-i]$i=1..length(s))))(""||(4^n)): seq(a(n), n=0..50); # Alois P. Heinz, Apr 09 2015 -
Mathematica
FromDigits[Reverse[IntegerDigits[#]]]&/@(4^Range[0,30]) (* Harvey P. Dale, Jan 28 2013 *)
-
PARI
for(i=1,50,n=4^i; s=ceil(log(n)/log(10)); print1(sum(i=0,s,10^(s-i-1)*(floor(n/10^i)-10*floor(n/10^(i+1)))),","))