cp's OEIS Frontend

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.

A083273 a(n) is the quotient of lcm of first n consecutive prime differences and A001223(n), the n-th difference between consecutive primes.

This page as a plain text file.
%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