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.

A001388 Describe the previous term (in base 3)!.

This page as a plain text file.
%I A001388 #27 May 21 2024 01:16:26
%S A001388 1,11,21,1211,111221,1012211,1110112221,101102110211,
%T A001388 111021101221101221,1011012211011222110112211,
%U A001388 1110211011222110211022110212221,10110122110211022110122110222110121110211
%N A001388 Describe the previous term (in base 3)!.
%H A001388 John Cerkan, <a href="/A001388/b001388.txt">Table of n, a(n) for n = 1..23</a>
%H A001388 Greg Dresden and Jacob Siehler, <a href="https://arxiv.org/abs/2405.11103">Look, There's More to Say about Conway's Look and Say sequence</a>, arXiv:2405.11103 [math.CO], 2024.
%e A001388 To get the 6th term, for example, note that the 5th term has three (10 in ternary!) 1's, two (2) 2's and one (1) 1, giving 10 1 2 2 1 1.
%t A001388 a[1] := 1; a[n_] := a[n] = FromDigits[Flatten[{IntegerDigits[Length[#],3], First[#]}& /@ Split[IntegerDigits[a[n-1]]]]]; Map[a,Range[25]] (* _Peter J. C. Moses_, Mar 24 2013 *)
%Y A001388 Cf. A005150.
%K A001388 nonn,base,easy
%O A001388 1,2
%A A001388 _Thomas L. York_