cp's OEIS Frontend

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.

A320041 Primes that are values of A215240.

This page as a plain text file.
%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