1,1
(PARI) for(n=1, 10^7, if(eulerphi(n+omega(n))==eulerphi(n)+numdiv(n), print(n)))
Cf. A000010, A000005, A001221.
Sequence in context: A044516 A015722 A103046 this_sequence A049012 A137187 A134037
Adjacent sequences: A063865 A063866 A063867 this_sequence A063869 A063870 A063871
more,nonn
Jason Earls (zevi_35711(AT)yahoo.com), Aug 26 2001
1239869 from Thomas Baruchel (baruchel(AT)users.sourceforge.net), Oct 19 2003
Search completed in 0.002 seconds