OFFSET
1,4
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
a(1) = 3-2*1=1. a(2) =5-2*2=1. a(3)=7-2*3=1. a(4)=11-2*4=3.
MATHEMATICA
Module[{tp=Union[Flatten[Select[Partition[Prime[Range[150]], 2, 1], #[[2]]- #[[1]] == 2&]]]}, #[[1]]-#[[2]]&/@Thread[{tp, 2*Range[Length[tp]]}]] (* Harvey P. Dale, Feb 03 2022 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Jun 06 2009
EXTENSIONS
Entries confirmed by R. J. Mathar, Jun 23 2009
STATUS
approved