login
Engel expansion for (negative) constant defined in A078756.
0

%I #3 Mar 31 2012 13:21:55

%S -1,-2,-3,-4,-9,-11,-17,-82,-86,-89,-259,-1031,-1493,-3088,-18107,

%T -3128320,-4245574,-4430458,-6692218,-6908807,-20282631,-55597679,

%U -73203786,-80410013,-92821351,-192936649,-5039379072,-30234138756,-55272287466,-202248991637

%N Engel expansion for (negative) constant defined in A078756.

%F See A006784 for definition of Engel expansion

%o (PARI) x=vector(31); a=vector(30); x[1]=-0.62923321313860758778445822033246963679442280615921 for (i=1,30,a[i]=ceil(1/x[i]); x[i+1]=x[i]*a[i]-1); x

%Y Cf. A006784, A078756, A080320.

%K sign

%O 1,2

%A _Jon Perry_, Feb 08 2003