A337133 - OEIS

%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