A240163 - OEIS

%I #12 Aug 04 2014 10:17:01

%S 1,2,3,4,6,8,9,10,12,15,16,18,20,22,24,25,27,28,30,32,33,35,36,38,40,

%T 42,44,45,46,49,51,52,56,58,60,63,65,66,68,70,72,74,78,80,81,82,84,85,

%U 87,88,91,92,95,96,100,102,104,105,106,108,112,114,115,116,117,120,121,123,124,126

%N Numbers n such that (k!+n)/k is prime for some k.

%C Complement of A245757.

%H Jens Kruse Andersen, <a href="/A240163/b240163.txt">Table of n, a(n) for n = 1..1000</a>

%o (PARI)

%o a(n)=for(k=1, n, s=(k!+n)/k; if(floor(s)==s, if(ispseudoprime(s), return(k))))

%o n=1;while(n<200,if(a(n),print1(n,", "));n++)

%Y Cf. A245757, A245756.

%K nonn

%O 1,2

%A _Derek Orr_, Aug 01 2014

%E Typo in PARI code fixed by _Colin Barker_, Aug 02 2014