A074862 Iccanartet sequence: a(n)=R[a(n-1)]+R[a(n-2)]+R[a(n-3)]+R[a(n-4)] where a(1)=a(2)=a(3)=a(4)=1 and R(n) (A004086) is the reverse of n.

1, 1, 1, 1, 4, 7, 13, 43, 76, 139, 1063, 4633, 7963, 11593, 50173, 83677, 157951, 314005, 774907, 1447279, 11097082, 39016342, 62877022, 84245371, 91872178, 150920986, 815588944, 1243396636

Offset: 1

Author

Felice Russo, Sep 11 2002

Keywords

• easy
• base
• nonn

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A000288.

Programs

Mathematica

Transpose[NestList[Join[Rest[#],{Total[FromDigits/@(Reverse/@ (IntegerDigits/@#))]}]&,{1,1,1,1},30]][[1]] (* Harvey P. Dale, May 02 2012 *)

Extensions

More terms from David Garber, Oct 23 2002