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.

A051954 a(n) = smallest palindrome > a(n-1) such that a(1)*a(2)*...*a(n) - 1 is a prime.

This page as a plain text file.
%I A051954 #17 Oct 14 2021 15:58:28
%S A051954 3,4,5,6,8,9,11,22,88,232,272,303,333,383,434,454,555,787,797,848,999,
%T A051954 1331,3663,6666,10201,14041,15951,17271,21912,22122,24442,26662,33433,
%U A051954 35053,40504,40804,44344,44644,44844,45754,55955,67976,72227,72627
%N A051954 a(n) = smallest palindrome > a(n-1) such that a(1)*a(2)*...*a(n) - 1 is a prime.
%H A051954 Harvey P. Dale, <a href="/A051954/b051954.txt">Table of n, a(n) for n = 1..100</a>
%t A051954 nxt[{p_,a_}]:=Module[{k=a+1},While[!PalindromeQ[k]||!PrimeQ[p*k-1],k++];{p*k,k}]; NestList[nxt,{3,3},50][[All,2]] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, May 22 2021 *)
%Y A051954 Cf. A051896, A051934.
%Y A051954 Subsequence of A002113.
%K A051954 nice,nonn,base
%O A051954 1,1
%A A051954 _Felice Russo_, Dec 21 1999