OFFSET
1,1
EXAMPLE
244 is in the sequence since 1^5 + 3^5 = 244 and (1, 3) = 1.
PROG
(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
CROSSREFS
KEYWORD
nonn
AUTHOR
Arkadiusz Wesolowski, Aug 25 2013
STATUS
approved