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.

A129388 Primes that are equal to the mean of 5 consecutive squares.

This page as a plain text file.
%I A129388 #20 Feb 26 2024 01:59:18
%S A129388 11,83,227,443,1091,1523,2027,3251,6563,9803,11027,12323,13691,15131,
%T A129388 21611,29243,47963,50627,56171,59051,62003,65027,74531,88211,91811,
%U A129388 95483,103043,119027,123203,131771,136163,140627,149771,173891,178931
%N A129388 Primes that are equal to the mean of 5 consecutive squares.
%C A129388 The sum of 5 consecutive squares starting with k^2 is equal to 5*(6 + 4*k + k^2) and the mean is (6 + 4*k + k^2) = (k+2)^2 + 2. Hence a(n)= A056899(n+2).
%H A129388 Vincenzo Librandi, <a href="/A129388/b129388.txt">Table of n, a(n) for n = 1..1000</a>
%e A129388 11 = (1^2 + ... + 5^2)/5;
%e A129388 83 = (7^2 + ... + 11^2)/5;
%e A129388 227 = (13^2 + ... + 17^2)/5.
%t A129388 Select[Table[n^2 + 2 n + 3, {n, 1, 600}], PrimeQ] (* _Vincenzo Librandi_, Mar 22 2013 *)
%o A129388 (Magma) [a: n in [1..600] | IsPrime(a) where a is  n^2 + 2*n + 3 ]; // _Vincenzo Librandi_, Mar 22 2013
%o A129388 (SageMath)
%o A129388 A102305=[n^2+2*n+3 for n in range(1,1001)]
%o A129388 [n^2+2*n+3 for n in (1..600) if is_prime(A102305[n-1])] # _G. C. Greubel_, Feb 03 2024
%Y A129388 Cf. A056899, A067201, A102305, A129389.
%K A129388 nonn,easy
%O A129388 1,1
%A A129388 _Zak Seidov_, Apr 12 2007