|
%I #4 Mar 27 2019 10:14:13
%S 0,1,4,7,8,9,11,14,15,16,18,23,25,28,29,30,32,35,36,37,39,43,44,49,50,
%T 51,53,56,57,60,63,64,65,67,70,71,72,74,77,78,79,81,84,86,88,91,92,95,
%U 99,100,105,106,107,109,112,113,114,116,119,120,121
%N Numbers of the form x^2+7*y^2+7*z^2.
%C Complement of A306296
%t Take[Union[Flatten[Table[a^2 + 7 b^2 + 7 c^2, {a, 0, 20}, {b, 0, 20},{c, 0, 20}]]], 200]
%Y Cf. A306296.
%K nonn
%O 1,3
%A _Vincenzo Librandi_, Mar 27 2019
|
