%I #8 Feb 15 2016 04:55:49
%S 62,155,434,496,713,775,1054,1240,1333,1457,1581,1674,2232,2325,2604,
%T 2883,3224,3410,3472,3503,3689,3782,3968,4061,4185,4402,4929,5394,
%U 5580,5704,5921,6200,6572,6758,6913,7750,8091,8370,8432,8494,9083,9827,9920
%N Numbers which are the sum of three positive cubes and divisible by 31.
%H Chai Wah Wu, <a href="/A104054/b104054.txt">Table of n, a(n) for n = 1..10000</a>
%e a(1)=62 because 62=2^3+3^3+3^3.
%e a(2)=155 because 155=3^3+4^3+4^3.
%e a(3)=434 because 434=3^3+4^3+7^3......
%t cbQ[n_]:=Module[{prs=Select[PowersRepresentations[n,3,3], First[#]>0&]}, Length[ prs]>0]; Select[31Range[320],cbQ] (* _Harvey P. Dale_, Jul 27 2011 *)
%Y Cf. A003072.
%K nonn
%O 1,1
%A Jun Mizuki (suzuki32(AT)sanken.osaka-u.ac.jp), Mar 02 2005
|