%I #13 Nov 09 2024 16:46:31
%S 77,49,36,18,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,
%T 8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,
%U 8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8
%N a(1)=77; thereafter form the product of the digits of the previous term.
%D C. Pickover, Mazes for the Mind, St. Martin's Press, NY, 1992, p. 350.
%t NestList[Times@@IntegerDigits[#]&,77,150] (* _Harvey P. Dale_, Nov 09 2024 *)
%K nonn,base
%O 1,1
%A _N. J. A. Sloane_, Jul 14 2015