|
|
A126251
|
|
a(n) = (p+2)!/p! where p is the n-th lesser twin prime, A001359(n).
|
|
2
|
|
|
20, 42, 156, 342, 930, 1806, 3660, 5256, 10506, 11772, 19182, 22650, 32580, 37056, 39402, 52212, 57840, 73170, 79806, 97656, 121452, 176820, 187056, 213906, 273006, 325470, 360600, 382542, 412806, 436260, 656910, 676506, 686412, 737022, 778806
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
ZL:=[]:for p from 1 to 1653 do if (isprime(p) and isprime(p+2)) then ZL:=[op(ZL), ((p+2)!/p!)]; fi; od; print(ZL);
|
|
MATHEMATICA
|
#[[2]]!/#[[1]]!&/@Select[Partition[Prime[Range[200]], 2, 1], #[[2]]-#[[1]] == 2&] (* Harvey P. Dale, Feb 16 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|