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.

A219634 a(n) is the smallest number > a(n-1) such that 1 + a(1)^2 + a(2)^2 + ... + a(n)^2 is a prime.

This page as a plain text file.
%I A219634 #8 Sep 14 2017 03:53:27
%S A219634 1,3,6,12,30,54,60,72,120,126,144,174,198,210,294,300,318,354,408,420,
%T A219634 426,432,480,498,522,564,588,594,600,624,630,648,666,714,720,852,864,
%U A219634 978,1002,1050,1056,1080,1098,1122,1146,1152,1170,1176,1200,1206,1458
%N A219634 a(n) is the smallest number > a(n-1) such that 1 + a(1)^2 + a(2)^2 + ... + a(n)^2 is a prime.
%C A219634 The corresponding primes are 2, 11, 47, 191, 1091, 4007, 7607, 12791, 27191, 43067, ...
%e A219634 a(1) = 1 because 1 + 1^2 = 2 is prime;
%e A219634 a(2) = 3 because 1 + 1^2 + 2^2 = 6 is not prime, but 1 + 1^2 + 3^2 = 11 is prime;
%e A219634 a(3) = 6 because neither 1 + 1^2 + 3^2 + 4^2 = 27 nor 1 + 1^2 + 3^2 + 5^2 = 36 is prime, but 1 + 1^2 + 3^2 + 6^2 = 47 is prime.
%t A219634 p=1;lst={p};Do[If[PrimeQ[p+n^2],AppendTo[lst,n];p=p+n^2],{n,1,1500}];lst
%Y A219634 Cf. A051935.
%K A219634 nonn
%O A219634 1,2
%A A219634 _Michel Lagneau_, Nov 24 2012