%I #11 Aug 03 2014 14:31:47
%S 342,504,702,936,1206,1512,1854,2196,2232,2646,2736,3096,3348,3582,
%T 4032,4104,4662,4788,5256,5616,5886,6516,6552,6858,7254,7488,7992,
%U 8532,8766,9234,9576,9648,10422,10584,10836,11304,12042,12096,12222,13176,13428
%N Numbers that are divisible by 6 (and 18) and are differences between two cubes in at least one way.
%C All terms in this sequence divisible by 3 are also divisible by 9.
%t Rest[Select[Union[Abs[#[[1]]^3 - #[[2]]^3]&/@Tuples[Range[50], {2}]], Divisible[#, 6] && Divisible[#, 18]&]] (* _Harvey P. Dale_, Dec 05 2010 *)
%K nonn
%O 1,1
%A _Jeff Burch_
%E Extended by _Ray Chandler_, Nov 30 2008