login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A338102 Prime terms of A338820. 3

%I #24 Nov 11 2020 11:58:19

%S 61,449,661,1987,7583,7817,8431,8779,9677,11003,11311,13033,18311,

%T 28411,44449,46327,72901,79153,89599,100403,101581,127423,148861,

%U 169789,207511,214657,287503,308303,333493,326251,365941,438887,461191,478679,503389,515923,563723,574127,613747,635639,673487

%N Prime terms of A338820.

%C Terms are in the order in which they occur in A338820, which is not numerical order: e.g. a(29) = 333493 > a(30) = 326251.

%H Robert Israel, <a href="/A338102/b338102.txt">Table of n, a(n) for n = 1..3700</a>

%F a(n) = A338820(PrimePi(A338821(n))).

%e a(3) = 661 is the third prime term in A338820. This is A338820(21) where prime(21) = 73 = A338821(3).

%p N:= 1000: # for terms in A338820(1)..A338820(N)

%p P:= [seq(ithprime(i), i=1..N)]:

%p R:= NULL:

%p for n from 1 to N do

%p v:= add(P[i]^2 mod P[n], i=1..n-1);

%p if isprime(v) then R:= R, v fi

%p od:

%p R;

%Y Cf. A338820, A338821.

%K nonn

%O 1,1

%A _J. M. Bergot_ and _Robert Israel_, Nov 10 2020

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 14:38 EDT 2024. Contains 371254 sequences. (Running on oeis4.)