This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A153428 #26 Aug 27 2014 13:58:15
%S A153428 1,14611,141152,2831112,113216152,419521121,5342121213,7112216125,
%T A153428 11191442171,11371542112,12192256111,12327134121,12432712113,
%U A153428 13161313512,14132133215,113335111416,127131142512,133412214117,196112145112,311721152134,312118111536,312127213125,322631161151,411111553831,432122133312
%N A153428 Numbers n such that phi(n) = p^3, where p is product of digits of n.
%H A153428 Hiroaki Yamanouchi, <a href="/A153428/b153428.txt">Table of n, a(n) for n = 1..404</a> (terms a(1)-a(48) from _Max Alekseyev_)
%e A153428 phi(113216152) = (1*1*3*2*1*6*1*5*2)^3, so 113216152 is in the sequence.
%t A153428 Do[If[Apply[Times,IntegerDigits[n]]^3==EulerPhi[n],Print[n]],{n,300000000}]
%Y A153428 Cf. A068572, A153427.
%K A153428 base,nonn
%O A153428 1,2
%A A153428 _Farideh Firoozbakht_, Jan 02 2009
%E A153428 a(6)-a(18) from _Donovan Johnson_, Nov 01 2010
%E A153428 a(19)-a(22) from _Donovan Johnson_, Aug 15 2013
%E A153428 a(23)-a(48) from _Max Alekseyev_, Aug 18 2013