OFFSET
1,2
COMMENTS
Add one to the previous term, square, and reverse the digits in base 10 to obtain the next term.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..14
MAPLE
read("transforms") ;
A193914 := proc(n) option remember; if n = 1 then 1 ; else digrev((1+procname(n-1))^2) ; end if; end proc: # R. J. Mathar, Aug 28 2011
PROG
(Magma) [n lt 2 select 1 else Seqint(Reverse(Intseq((1+Self(n-1))^2))): n in [1..8]]; // Bruno Berselli, Aug 29 2011
CROSSREFS
KEYWORD
nonn,base,less
AUTHOR
Jaley H Dholakiya, Aug 09 2011
STATUS
approved