|
%I #9 Aug 18 2020 09:47:09
%S 0,1,2,3,4,5,6,7,9,11,12,14,16,17,18,19,20,21,23,25,27,28,30,32,35,36,
%T 38,39,41,44,48,49,50,51,52,54,55,57,58,59,61,63,64,65,66,67,68,69,70,
%U 73,75,79,80,81,82,83,84,86,89,90,93,97,99,100,102,103,105,106,111,112,113,114,116,118
%N Numbers of the form x^2+2*y^3+3*z^4 for nonnegative x, y, z.
%H Robert Israel, <a href="/A337133/b337133.txt">Table of n, a(n) for n = 1..10000</a>
%p N:= 200: # for terms <= N
%p E1:= {seq(3*z^4,z=0..floor((N/3)^(1/4)))}:
%p E2:= map(t -> seq(t+2*y^3,y=0..floor(((N-t)/2)^(1/3))), E1):
%p E3:= map(t -> seq(t+x^2,x=0..floor(sqrt(N-t))), E2):
%p sort(convert(E3,list));
%Y Complement of A203322.
%K nonn
%O 1,3
%A _Robert Israel_, Aug 17 2020
|
