The OEIS is supported by the many generous donors to the OEIS Foundation.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #6 Jan 09 2014 17:30:09
%S 392,504,630,770,784,924,1008,1092,1176,1260,1274,1365,1470,1512,1540,
%T 1568,1680,1785,1848,1890,1904,1960,2016,2142,2184,2261,2310,2352,
%U 2394,2520,2548,2660,2730,2744,2772,2793,2940,3024,3080,3136,3150,3220,3234,3276,3360
%N Integers n of the form square root ((4k + 3j) (4j + 3k)), 0 < j < k.
%C Allowing j = 0 or j = k has the effect of introducing all multiples of 7. - _Charles R Greathouse IV_, Jan 09 2014
%t lst = {}; Do[a = Sqrt[(4k + 3j) (4j + 3k)]; If[ IntegerQ[ a], AppendTo[lst, a]], {j, 2, 1000}, {k, j - 1}]; Take[Union@ lst, 45]
%Y Cf. A083752.
%K nonn,easy
%O 1,1
%A _Robert G. Wilson v_, Jan 04 2014