A066893 - OEIS

%I #19 Dec 10 2024 11:58:46

%S 1,2,6,21,25,32,174,400,918,960,971,987,2374,5928,5935,5942,5977,

%T 14838,37259,37282,94154,238309,1556445,4004112,10308825,10308837,

%U 10309843,10309906,26627152,68912912,68913663,68913687,68914102,68915077,68915098,68916054

%N Numbers k such that k divides (prime(3*k) - prime(2*k)).

%H Giovanni Resta, <a href="/A066893/b066893.txt">Table of n, a(n) for n = 1..51</a>

%t Select[Range[10^6], Mod[Prime[3 #] - Prime[2 #], #] == 0 &]

%o (PARI) isok(k) = { (prime(3*k)-prime(2*k)) % k == 0 } \\ _Harry J. Smith_, Apr 05 2010

%Y Cf. A000040, A255174.

%K nonn

%O 1,2

%A _Benoit Cloitre_, Jan 24 2002

%E More terms from _Robert G. Wilson v_, Jan 26 2002

%E a(23) from _Harry J. Smith_, Apr 05 2010

%E a(24)-a(36) from _Giovanni Resta_, Jun 18 2018