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.

A203015 Primes p such that p + 1 or p - 1 is in A066120.

This page as a plain text file.
%I A203015 #37 Apr 03 2023 10:36:12
%S A203015 2,3,23,8641,653184001,
%T A203015 1601591599167888308924824752807936000000000000001
%N A203015 Primes p such that p + 1 or p - 1 is in A066120.
%C A203015 What is the next prime? As of January 2012, there are no known primes ending in 9 with this property.
%H A203015 G. L. Honaker, Jr. and Chris Caldwell, <a href="https://t5k.org/curios/cpage/24439.html">Prime Curios! 8641</a>
%F A203015 a(n) are the prime values of p(0)# * (p(0)# * p(1)#) * (p(0)# * p(1)# * p(2)#) * (p(0)# * p(1)# * p(2)# * ... * p(n)#) +/- 1.
%e A203015 A002110(1)^3*A002110(2)^2*A002110(3) + 1 = 8641, which is prime.
%t A203015 Select[Flatten[Table[Product[Product[Product[Prime[i], {i, j}], {j, k}], {k, n}] - 1 + m, {n, 0, 7}, {m, 0, 2, 2}]], PrimeQ]
%Y A203015 Cf. A066120, A002110.
%K A203015 hard,nonn
%O A203015 1,1
%A A203015 _Arkadiusz Wesolowski_, Jan 06 2012