cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A132078 Multiply previous term by 6 and reverse.

This page as a plain text file.
%I A132078 #17 Mar 04 2025 07:34:32
%S A132078 1,6,63,873,8325,5994,46953,817182,2903094,46581471,628884972,
%T A132078 2389033773,83620243341,640064127105,362674830483,8982898406712,
%U A132078 27204409379835,10972654622361,66143772953856,631327736268693,8512167146697873,83278108820037015,90222029256866994
%N A132078 Multiply previous term by 6 and reverse.
%H A132078 Andrew Howroyd, <a href="/A132078/b132078.txt">Table of n, a(n) for n = 1..200</a>
%H A132078 Vaclav Kotesovec, <a href="/A132078/a132078.jpg">Plot of a(n)^(1/n) for n = 1..10000</a>
%F A132078 a(n) = reverse(6 * a(n-1)) where a(1) = 1.
%e A132078 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.
%t A132078 Nest[Append[#,IntegerReverse[6*#[[-1]]]]&,{1},22] (* _James C. McMahon_, Mar 03 2025 *)
%o A132078 (Magma) f:=func<n|Seqint(Reverse(Intseq(6*n)))>; a:=[1]; for n in [2..25] do Append(~a,f(a[n-1]));  end for; a; // _Marius A. Burtea_, Jan 03 2020
%Y A132078 Cf. A036447 (*2), A163632 (*3), A132064 (*4), A045539 (*5), A132114 (*7), A132113 (*8), A133361 (*9).
%K A132078 base,nonn
%O A132078 1,2
%A A132078 Rachit Agrawal (rachit_agrawal(AT)daiict.ac.in), Oct 30 2007
%E A132078 Name clarified and terms a(16) and beyond from _Andrew Howroyd_, Jan 02 2020