A087667 Records in A087664.
0, 2, 4, 5, 9, 12, 16, 24, 29, 30, 31, 32, 36, 37, 42
Offset: 1
Programs
-
PARI
A087664(n)={ local(x,s) ; x=n/4 ; s=0 ; while( type(x)!="t_INT", x *= floor(x) ; s++ ; ) ; return(s) ; } { rec=-1 ; for(n=8,1000000, a=A087664(n) ; if(a>rec, rec=a ; print(rec) ; ) ; ) ; } - R. J. Mathar, Nov 25 2006
Formula
Extensions
More terms from R. J. Mathar, Nov 25 2006
a(8)-a(15) from Max Alekseyev, Jul 30 2011
Comments