OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..200
EXAMPLE
3*(2*3*5-2*3)-1=71 3*(2*3*5-2*3)+1=73; 71 and 73 twin primes so k(2)=3
MATHEMATICA
ktp[n_]:=Module[{k=1}, While[!PrimeQ[k*n-1]||!PrimeQ[k*n+1], k++]; k]; With[ {prmrls=#[[2]]-#[[1]]&/@Partition[FoldList[Times, Prime[Range[ 70]]], 2, 1]}, ktp/@prmrls] (* Harvey P. Dale, Mar 31 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Pierre CAMI, Mar 03 2007
STATUS
approved