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 A145747 #2 Mar 30 2012 17:37:44 %S A145747 3,2,14,26,55,30,56,329,626,366,340,558,288,552,828,3496,6928,2430, %T A145747 81809,3920,3432,8680,48380,23430,2520,144020,435056,21384,728096, %U A145747 188376,11802175,97320,54057938,89700,349752,1143492,11286632,490752 %N A145747 a(n) is the smallest number m such that phi(m)+sigma(m)=n*pi(m). %C A145747 a(47) is greater than 4*10^8. %t A145747 a[n_]:=(For[m=1,DivisorSigma[1,m]+EulerPhi[m]!=n EulerPhi[m],m++ ];m);Do[Print[a[n]],{n,3,46}] %Y A145747 Cf. A015704. %K A145747 nonn %O A145747 3,1 %A A145747 _Farideh Firoozbakht_, Oct 30 2008