A275273 - OEIS

%I #6 Sep 29 2024 15:18:27

%S 4,5,7,13,17,19,37,37,31,41,19,59,109,71,179,73,59,73,113,53,47,127,

%T 149,263,107,241,59,103,317,241,317,113,197,127,109,647,397,67,281,67,

%U 211,163,109,107,439,521,709,101,383,337,397,223,337,601,281,311

%N p - n!, where p is the third smallest prime > n!.

%C Is every term except 4 a prime?

%H Clark Kimberling, <a href="/A275273/b275273.txt">Table of n, a(n) for n = 1..300</a>

%e For n = 4, we have n! = 24, so that p = 37, and a(4) = 13.

%t Table[NextPrime[n!, 3] - n!, {n, 1, 150}]

%t NextPrime[#,3]-#&/@(Range[60]!) (* _Harvey P. Dale_, Sep 29 2024 *)

%Y Cf. A275272, A000040.

%K nonn,easy

%O 1,1

%A _Clark Kimberling_, Jul 23 2016