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 A320041 #11 Oct 05 2018 03:53:38 %S A320041 3,13,6163,8311,12097,13159,14957,18433,21061,23627,24571,27061,29863, %T A320041 35617,40897,44221,45307,45737,45821,67421,68113,69313,71237,75377, %U A320041 82903,89227,89269,89671,94543,100483,101533,101833,113683,114827,118903,121763,122167,125933,131581,131617,143461,144061 %N A320041 Primes that are values of A215240. %C A320041 Values of A215240(A320061), sorted. %H A320041 Robert Israel, <a href="/A320041/b320041.txt">Table of n, a(n) for n = 1..594</a> %e A320041 a(3) = 6163 is in the sequence because it is prime and A215240(264) = 6163. %p A320041 N:= 10^5: # to get all terms <= N %p A320041 f:= n -> convert(numtheory:-invphi(n),`+`): %p A320041 Res:= {}: %p A320041 for n from 1 to N do %p A320041 v:= f(n); %p A320041 if isprime(v) and v <= N then %p A320041 Res:= Res union {v} %p A320041 fi %p A320041 od: %p A320041 Res; %Y A320041 Cf. A215240, A320061. %K A320041 nonn %O A320041 1,1 %A A320041 _Robert Israel_ and _J. M. Bergot_, Oct 03 2018