This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A083273 #13 Feb 09 2025 02:49:17 %S A083273 1,1,1,1,2,1,2,1,2,6,2,3,6,3,2,2,6,2,3,6,2,3,2,3,6,12,6,12,6,12,42,28, %T A083273 84,84,420,140,140,210,140,140,420,84,420,210,420,70,70,210,420,210, %U A083273 140,420,84,140,140,140,420,140,210,420,84,60,210,420,210,60,140,84,420,210 %N A083273 a(n) is the quotient of lcm of first n consecutive prime differences and A001223(n), the n-th difference between consecutive primes. %H A083273 Amiram Eldar, <a href="/A083273/b083273.txt">Table of n, a(n) for n = 1..10000</a> %F A083273 a(n) = A080374(n)/A001223(n). %t A083273 ld[x_] := Apply[LCM, Table[Prime[w+1]-Prime[w], {w, 1, x}]]; Table[ld[j]/(Prime[j+1]-Prime[j]), {j, 1, 100}] %t A083273 seq[len_] := Module[{d = Differences[Prime[Range[len+1]]]}, FoldList[LCM, d]/d]; seq[70] (* _Amiram Eldar_, Feb 08 2025 *) %Y A083273 Cf. A001223, A080374, A080375, A080376. %K A083273 nonn %O A083273 1,5 %A A083273 _Labos Elemer_, May 15 2003