OFFSET
1,3
LINKS
Alois P. Heinz, Table of n, a(n) for n = 1..10000
MATHEMATICA
Reap[For[n = 0, n < 3000, n++, If[MatchQ[PowersRepresentations[n, 5, 6], {Table[_, 5], ___}], Print[n]; Sow[n]]]][[2, 1]] (* Jean-François Alcover, Oct 30 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
More terms from Alois P. Heinz, Sep 16 2016
STATUS
approved