A288209 Numbers k such that prime(k) * prime(k+1) mod prime(k+2) is odd.

1, 2, 5, 7, 10, 14, 15, 23, 29, 46, 61

Offset

1,2

Comments

Finite? Full?

Next term, if it exists, is greater than 1026351685.

From Robert Israel, Jun 19 2017: (Start)

Numbers k such that floor(A001223(k+1)*A031131(k)/prime(k+2)) is odd.

Cramér's conjecture implies the sequence is finite. (End)

Links

Table of n, a(n) for n=1..11.

Wikipedia, Cramér's conjecture

Example

The first five primes are 2, 3, 5, 7, 11.
We see that 2 * 3 = 1 mod 5, so 1 (corresponding to the first prime, 2) is in the sequence.
We see that 3 * 5 = 1 mod 7, so 2 (corresponding to the second prime, 3) is in the sequence.
But 5 * 7 = 2 mod 11, so 3 (corresponding to the third prime, 5) is not in the sequence.

Maple

P:= select(isprime, [2, seq(i, i=3..10^6, 2)]):
select(n -> (P[n]*P[n+1] mod P[n+2])::odd, [$1..nops(P)-2]); # Robert Israel, Jun 19 2017

Mathematica

Select[Range[1000], OddQ[Mod[Prime[#] Prime[# + 1], Prime[# + 2]]] &] (* Alonso del Arte, Jun 06 2017 *)
Position[Partition[Prime[Range[70]], 3, 1], _?(OddQ[Mod[#[[1]]#[[2]], #[[3]]]]&), 1, Heads->False]//Flatten (* Harvey P. Dale, Aug 11 2017 *)

Prog

(PARI) isok(n) = (((prime(n) * prime(n + 1)) % prime(n + 2)) % 2); \\ Michel Marcus, Jun 07 2017

Crossrefs

Cf. A001223, A006094, A031131, A182126.

Sequence in context: A364451 A241510 A088947 * A071113 A071704 A267374

Adjacent sequences: A288206 A288207 A288208 * A288210 A288211 A288212

Keyword

nonn,more

Author

Zak Seidov, Jun 06 2017

Status

approved