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^3) * (2 + 1 / (1 - z^(m^3))), 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 A120505(j) = n then return j; fi; od;

end proc;

Cf. A120505, A120527.

Sequence in context: A128891 A093667 A030415 this_sequence A116026 A115915 A007536

Adjacent sequences: A120513 A120514 A120515 this_sequence A120517 A120518 A120519

nonn

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