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.

A130052 Numbers that are the sum of one or more consecutive squares in more than one way.

This page as a plain text file.
%I A130052 #34 Apr 01 2020 01:38:56
%S A130052 25,365,841,1405,1730,2030,3281,3655,3740,4510,4705,4760,4900,5244,
%T A130052 5434,5915,5929,7230,7574,8415,8464,9385,11055,11236,11900,12325,
%U A130052 12524,14905,16745,17484,18879,19005,19044,19855,20449,20510,21790,22806,23681
%N A130052 Numbers that are the sum of one or more consecutive squares in more than one way.
%H A130052 Paul Richards and David W. Wilson, <a href="/A130052/b130052.txt">Table of n, a(n) for n = 1..10000</a> (first 135 terms from Paul Richards)
%e A130052 25 = 3^2 + 4^2 = 5^2.
%e A130052 365 = 10^2 + 11^2 + 12^2 = 13^2 + 14^2.
%o A130052 (PARI) ok(n) = {my(i=sqrtint(n), m=0); while(i>0&&m<2, my(a=i^2, j=i); while(j>0&&a<=n, if(a==n, m+=1); j-=1; a=a+j^2); i-=1); return(m>1)}
%o A130052 {for(p=1, 24000, if(ok(p), print1(p,", ")))} \\ _Antonio Roldán_, Mar 09 2020
%Y A130052 Cf. A059255 (subsequence).
%K A130052 nonn
%O A130052 1,1
%A A130052 _Paul Richards_, May 03 2007
%E A130052 Extended by _Ray Chandler_, May 04 2007