OFFSET
1,1
FORMULA
a(n) = A129150(n-2) for n>1. - Reinhard Zumkeller, Apr 01 2007
PROG
(Haskell)
a090636 n = a090636_list !! (n-1)
a090636_list = iterate a003415 15 -- Reinhard Zumkeller, Apr 29 2012
(PARI) A090636(n, a=15)={if(n<0, vector(-n, n, if(n>1, a=A003415(a), a)), for(n=2, n, a=A003415(a)); a)} \\ For n<0 return the vector a[1..-n]. - M. F. Hasler, Nov 27 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Dec 14 2003
EXTENSIONS
More explicit name from M. F. Hasler, Nov 27 2019
STATUS
approved