login
A083551
Least common multiple of 2 consecutive prime differences, of two successive terms of A001223.
3
2, 2, 4, 4, 4, 4, 4, 12, 6, 6, 12, 4, 4, 12, 6, 6, 6, 12, 4, 6, 12, 12, 24, 8, 4, 4, 4, 4, 28, 28, 12, 6, 10, 10, 6, 6, 12, 12, 6, 6, 10, 10, 4, 4, 12, 12, 12, 4, 4, 12, 6, 10, 30, 6, 6, 6, 6, 12, 4, 10, 70, 28, 4, 4, 28, 42, 30, 10, 4, 12, 24, 24, 6, 12, 12, 24, 8, 8, 40, 10, 10, 10, 6, 12
OFFSET
1,1
LINKS
FORMULA
a(n) = lcm(A001223(n), A001223(n+1)).
MATHEMATICA
f[x_] := Prime[x+1]-Prime[x]; Table[LCM[f[w+1], f[w]], {w, 1, 128}]
Table[LCM[(Prime[n + 1] - Prime[n]), Prime[n + 2] - Prime[n + 1]], {n, 100}] (* Vincenzo Librandi, Mar 15 2018 *)
LCM@@#&/@Partition[Differences[Prime[Range[90]]], 2, 1] (* Harvey P. Dale, Oct 11 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, May 22 2003
STATUS
approved