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.

A059983 First occurrence of n in A007599.

This page as a plain text file.
%I A059983 #8 Jul 13 2013 12:02:37
%S A059983 1,0,6,7,8,9,12,13,14,15,18,19,22,23,24,25,28,29,32,33,36,37,40,41,42,
%T A059983 43,46,47,50,51,54,55,58,59,62,63,66,67,70,71,74,75,76,77,80,81,84,85,
%U A059983 88,89,92,93,96,97,100,101,104,105,108,109,112,113,116,117,120,121,124
%N A059983 First occurrence of n in A007599.
%H A059983 Reinhard Zumkeller, <a href="/A059983/b059983.txt">Table of n, a(n) for n = 0..10000</a>
%e A059983 a(5) does not appear in A007599 until the 9th entry, keeping in mind the offset.
%t A059983 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} ]
%o A059983 (Haskell)
%o A059983 import Data.List (elemIndex)
%o A059983 import Data.Maybe (mapMaybe)
%o A059983 a059983 n = a059983_list !! n
%o A059983 a059983_list = mapMaybe (`elemIndex` a007599_list) [0..]
%o A059983 -- _Reinhard Zumkeller_, Jan 05 2012
%Y A059983 Cf. A007599.
%K A059983 nonn
%O A059983 0,3
%A A059983 _Robert G. Wilson v_, Mar 07 2001