A132078 Multiply previous term by 6 and reverse.
1, 6, 63, 873, 8325, 5994, 46953, 817182, 2903094, 46581471, 628884972, 2389033773, 83620243341, 640064127105, 362674830483, 8982898406712, 27204409379835, 10972654622361, 66143772953856, 631327736268693, 8512167146697873, 83278108820037015, 90222029256866994
Offset: 1
Examples
a(4) = reverse(6 * a(3)) = reverse(6 * reverse(6 * a(2))) = reverse(6 * reverse( 6 * reverse(6 * a(1)))) = reverse(6 * reverse(6 * reverse(6))) = reverse(6 * 63) = 873.
Links
- Andrew Howroyd, Table of n, a(n) for n = 1..200
- Vaclav Kotesovec, Plot of a(n)^(1/n) for n = 1..10000
Crossrefs
Programs
-
Magma
f:=func
; a:=[1]; for n in [2..25] do Append(~a,f(a[n-1])); end for; a; // Marius A. Burtea, Jan 03 2020 -
Mathematica
Nest[Append[#,IntegerReverse[6*#[[-1]]]]&,{1},22] (* James C. McMahon, Mar 03 2025 *)
Formula
a(n) = reverse(6 * a(n-1)) where a(1) = 1.
Extensions
Name clarified and terms a(16) and beyond from Andrew Howroyd, Jan 02 2020