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 A102018 #25 Feb 21 2020 20:56:27 %S A102018 21,291,2817,2991,4435,20617,45421,69271,75841,162619,176569,284029, %T A102018 400399,474883,732031,778669,783169,1014109,1288663,1504051,1514419, %U A102018 1924891,1956103,2006737,2044501,2094901,2239261,2710627,2868469,3582907,3689251,4198273,4696009 %N A102018 Numbers n>1 with the property that the decimal expansion of n is a permutation of the digits of the decimal expansion of phi(n) and the ratio n/phi(n) is a new record low value. %C A102018 Subsequence of A115921. - _Michel Marcus_, Jul 10 2015 %H A102018 Project Euler, <a href="https://projecteuler.net/problem=70">Problem 70: Investigate values of n for which phi(n) is a permutation of n.</a> %o A102018 (PARI) lista(nn) = {mre = 2; for (n=2, nn, en = eulerphi(n); if (vecsort(digits(n)) == vecsort(digits(en)), re = n/en; if (re < mre, print1(n, ", "); mre = re);););} \\ _Michel Marcus_, Jul 10 2015 %Y A102018 Cf. A000010, A115921. %K A102018 nonn,base %O A102018 1,1 %A A102018 Gunnar Arn Stefainsson (gos(AT)hell.is), Jun 19 2007 %E A102018 More terms from _Michel Marcus_, Jul 10 2015 %E A102018 Removed initial 1 and changed definition, following discussion in Sequence Fans Mailing List by _Michel Marcus_ and others. - _N. J. A. Sloane_, Jul 15 2015