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.

A109213 Product of a(n-2) and digit reversal of a(n-1).

This page as a plain text file.
%I A109213 #5 Jun 09 2017 13:57:33
%S A109213 1,2,2,4,8,32,184,15392,5400584,74651892640,25003708306137848,
%T A109213 6335942056759761366725617280,
%U A109213 20682199297864337408779128828731176793076928
%N A109213 Product of a(n-2) and digit reversal of a(n-1).
%C A109213 Cf. A000301 a(n) = a(n-1)*a(n-2), A004086 R(n) = digit reversal of n, A109214 a(n)=a(n-1)*R(a(n-2)).
%F A109213 a(n)=a(n-2)*R(a(n-1)).
%e A109213 a(5)=8, a(6)=32, R(32)=23, hence a(7)=8*23=184; R(184)=841, a(8)=32*841=15392, etc.
%t A109213 a[1]=1;a[2]=2;a[n_]:=a[n]=a[n-2]*FromDigits[Reverse[IntegerDigits[a[n-1]]]]; A109213=Table[a[n], {n, 13}]
%t A109213 nxt[{a_,b_}]:={b,a*IntegerReverse[b]}; NestList[nxt,{1,2},15][[All,1]] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Jun 09 2017 *)
%Y A109213 Cf. A000301, A004086, A109214.
%K A109213 base,nonn
%O A109213 1,2
%A A109213 _Zak Seidov_, Jun 22 2005