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 A078773 #13 Dec 05 2017 21:20:01
%S A078773 0,0,2,2,3,2,5,3,5,3,7,3,11,5,7,7,13,5,17,7,11,7,19,7,19,11,17,11,23,
%T A078773 7,29,13,19,13,23,11,31,17,23,13,37,11,41,19,23,19,43,13,41,19,31,23,
%U A078773 47,17,37,23,31,23,53,13,59,29,31,31,47,19,61,31,43,23,67,23,71,31,37,31
%N A078773 a(n) is the largest prime less than or equal to phi(n), a(1) = a(2) = 0.
%C A078773 The original name was: "Prime preceding phi(n)". However, this is true only for n >= 7 from which onward phi(n) is guaranteed to get only composite values. For n = 3, 4 and 6 for which phi(n) = 2, a(n) = 2 also.
%H A078773 Antti Karttunen, <a href="/A078773/b078773.txt">Table of n, a(n) for n = 1..16384</a>
%F A078773 a(1) = a(2) = 0 (by convention), and for n >= 3, a(n) = A007917(A000010(n)). - _Antti Karttunen_, Dec 05 2017
%e A078773 phi(10)=4, hence a(10)=3.
%t A078773 If[#<0,0,#]&/@Table[NextPrime[EulerPhi[n]+1,-1],{n,80}] (* _Harvey P. Dale_, Aug 10 2012 *)
%o A078773 (PARI) for (n=1,100, print1(precprime(eulerphi(n))","))
%Y A078773 Cf. A000010, A007917, A070800.
%K A078773 nonn
%O A078773 1,3
%A A078773 _Jon Perry_, Jan 09 2003
%E A078773 Name changed by _Antti Karttunen_, Dec 05 2017