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.

A383241 a(n) = p(n)*p(n+1)*(p(n+1) - p(n)) - 1, where p(n) = prime(n).

This page as a plain text file.
%I A383241 #11 May 13 2025 23:11:55
%S A383241 5,29,69,307,285,883,645,1747,4001,1797,6881,6067,3525,8083,14945,
%T A383241 18761,7197,24521,19027,10365,34601,26227,44321,69063,39187,20805,
%U A383241 44083,23325,49267,200913,66547,107681,38085,207109,44997,142241,153545,108883,173345
%N A383241 a(n) = p(n)*p(n+1)*(p(n+1) - p(n)) - 1, where p(n) = prime(n).
%e A383241 a(n) = A383242(n) - 2.
%t A383241 z = 60; p[n_] := Prime[n];
%t A383241 f[n_] := p[n]*p[n + 1]*(p[n + 1] - p[n])
%t A383241 Table[f[n] - 1, {n, 1, z}]  (* A383241 *)
%t A383241 Table[f[n] + 1, {n, 1, z}]  (* A383242 *)
%Y A383241 Cf. A000042, A383242, A383243, A383244.
%K A383241 nonn
%O A383241 1,1
%A A383241 _Clark Kimberling_, May 07 2025