login
A383359
Integers m such that m^4 is the sum of squares of two or more consecutive positive integers.
3
13, 295, 330, 364, 1085, 5005, 6305, 15516, 415151, 1990368, 34011252, 42016497, 79565281, 139107722, 254801664, 418093065, 667378972, 1214995500, 3609736702, 4353556896
OFFSET
1,1
COMMENTS
a(21) > 10^10. - Xianwen Wang, May 08 2025
Terms of A383653 such that the consecutive integers are all positive.
From David A. Corneth, May 04 2025: (Start)
The sum of the first m positive squares is f(m) = m*(m + 1)*(2*m + 1) / 6.
The sum of consecutive squares m^2 + (m+1)^2 + ... + t^2 where 0 < m <= t may be written as f(t) - f(m-1) for some t and m.
From there we can factor out t - m - 1 and solve the system of equations going over divisors of 6*m^4.
To get divisors of 6*m^4 we need to factor 6*m^4 which can be done using the factors of 6 and the factors of m. Doing so makes we need to factorize smaller numbers. (End)
EXAMPLE
295 is a term because 295^4 = 6453^2 + 6454^2 + ... + 6628^2 + 6629^2.
MATHEMATICA
d[m_] := Select[Divisors[6 m^4], 1 < # < Floor@ CubeRoot[3 m^4] &&
IntegerQ[1/6 (-3 (1 + #) + Sqrt[3 (12 m^4/# + 1 - #^2)])] &];
Do[If[Length@d[m] > 0, Print[m]], {m, 1, 10000}]
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Zhining Yang, May 01 2025
EXTENSIONS
a(11)-a(18) from Xianwen Wang, May 04 2025
a(19)-a(20) from Xianwen Wang, May 08 2025
STATUS
approved