A087667 Records in A087664.

0, 2, 4, 5, 9, 12, 16, 24, 29, 30, 31, 32, 36, 37, 42

Offset: 1

Author

N. J. A. Sloane, Sep 27 2003

Keywords

• nonn
• more

Crossrefs

Cf. A087664, A087668.

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

a(n)=A087664(A087668(n)). - R. J. Mathar, Nov 25 2006

Extensions

More terms from R. J. Mathar, Nov 25 2006

a(8)-a(15) from Max Alekseyev, Jul 30 2011