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.
%I A228542 #14 Sep 08 2022 08:46:05 %S A228542 2,33,244,275,1025,1267,3126,3157,3368,4149,7777,10901,16808,16839, %T A228542 17050,17831,19932,24583,32769,33011,35893,49575,59050,59081,60073, %U A228542 62174,75856,91817,100001,100243,116807,159049,161052,161083,161294,162075,164176,168827 %N A228542 Numbers that are sums of two coprime positive fifth powers. %e A228542 244 is in the sequence since 1^5 + 3^5 = 244 and (1, 3) = 1. %o A228542 (Magma) lst:=[]; for m in [2..168827] do f:=func<k | exists(q){x: x in [1..Floor((m-1)^(1/5))] | IsPower(k-x^5, 5)} and exists(r){x: x in [Floor((m-1)^(1/5))..1 by -1] | IsPower(k-x^5, 5)} select [q, r] else [-1, -1]>; if f(m)[1] gt 0 and GCD(f(m)[1], f(m)[2]) eq 1 then Append(~lst, m); end if; end for; lst; // _Arkadiusz Wesolowski_, Dec 19 2020 %Y A228542 Supersequence of A228556. Cf. A002561, A055014. %K A228542 nonn %O A228542 1,1 %A A228542 _Arkadiusz Wesolowski_, Aug 25 2013