OFFSET
0,3
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 0..10000
EXAMPLE
a(5) does not appear in A007599 until the 9th entry, keeping in mind the offset.
MATHEMATICA
a[n_Integer] := a[n] = (a[n - 1] + Nest[a, n - 2, Floor[n/2] ] ); a[0] = 1; a[1] = 0; b[n_Integer] := (k = 0; While[ a[k] != n, k++ ]; k); Table[ b[n], {n, 0, 75} ]
PROG
(Haskell)
import Data.List (elemIndex)
import Data.Maybe (mapMaybe)
a059983 n = a059983_list !! n
a059983_list = mapMaybe (`elemIndex` a007599_list) [0..]
-- Reinhard Zumkeller, Jan 05 2012
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Mar 07 2001
STATUS
approved