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.

A344924 Numbers that are the sum of four fourth powers in eight or more ways.

This page as a plain text file.
%I A344924 #6 Jul 31 2021 18:22:10
%S A344924 13155858,26421474,35965458,39803778,98926434,128198994,143776179,
%T A344924 156279618,210493728,237073554,248075538,255831858,257931378,
%U A344924 269965938,270289698,292967619,293579874,295880274,300120003,301080243,302115843,305670834,309742434,328118259
%N A344924 Numbers that are the sum of four fourth powers in eight or more ways.
%H A344924 David Consiglio, Jr., <a href="/A344924/b344924.txt">Table of n, a(n) for n = 1..100</a>
%e A344924 13155858 is a term because 13155858 = 1^4 + 16^4 + 19^4 + 60^4  = 3^4 + 6^4 + 21^4 + 60^4  = 10^4 + 18^4 + 31^4 + 59^4  = 12^4 + 27^4 + 45^4 + 54^4  = 15^4 + 44^4 + 46^4 + 47^4  = 18^4 + 25^4 + 41^4 + 56^4  = 29^4 + 30^4 + 44^4 + 53^4  = 35^4 + 36^4 + 38^4 + 53^4.
%o A344924 (Python)
%o A344924 from itertools import combinations_with_replacement as cwr
%o A344924 from collections import defaultdict
%o A344924 keep = defaultdict(lambda: 0)
%o A344924 power_terms = [x**4 for x in range(1, 1000)]
%o A344924 for pos in cwr(power_terms, 4):
%o A344924     tot = sum(pos)
%o A344924     keep[tot] += 1
%o A344924 rets = sorted([k for k, v in keep.items() if v >= 8])
%o A344924 for x in range(len(rets)):
%o A344924     print(rets[x])
%Y A344924 Cf. A344737, A344922, A344925, A344926, A344944, A345152.
%K A344924 nonn
%O A344924 1,1
%A A344924 _David Consiglio, Jr._, Jun 02 2021