1,2

C. Deugau and F. Ruskey, Complete k-ary Trees and Generalized Meta-Fibonacci Sequences

g.f.: P(z) = z / (1-z) * (1 + sum(z^(m^4) * (1 + 1 / (1 - z^(m^4))), m=0..infinity))

p := proc(n)

if n=1 then return 1; end if;

for j from p(n-1)+1 to infinity do

if A120508(j) = n then return j; fi; od;

end proc;

Cf. A120508, A120530.

Adjacent sequences: A120516 A120517 A120518 this_sequence A120520 A120521 A120522

Sequence in context: A021747 A105020 A112594 this_sequence A100614 A127427 A047205

nonn

Frank Ruskey (http://www.cs.uvic.ca/~ruskey/) and Chris Deugau (deugaucj(AT)uvic.ca), Jun 20 2006