A235188 Integers n of the form square root ((4k + 3j) (4j + 3k)), 0 < j < k.

392, 504, 630, 770, 784, 924, 1008, 1092, 1176, 1260, 1274, 1365, 1470, 1512, 1540, 1568, 1680, 1785, 1848, 1890, 1904, 1960, 2016, 2142, 2184, 2261, 2310, 2352, 2394, 2520, 2548, 2660, 2730, 2744, 2772, 2793, 2940, 3024, 3080, 3136, 3150, 3220, 3234, 3276, 3360

Offset

1,1

Comments

Allowing j = 0 or j = k has the effect of introducing all multiples of 7. - Charles R Greathouse IV, Jan 09 2014

Links

Table of n, a(n) for n=1..45.

Mathematica

lst = {}; Do[a = Sqrt[(4k + 3j) (4j + 3k)]; If[ IntegerQ[ a], AppendTo[lst, a]], {j, 2, 1000}, {k, j - 1}]; Take[Union@ lst, 45]

Crossrefs

Cf. A083752.

Sequence in context: A160184 A187724 A035883 * A248022 A261379 A235313

Adjacent sequences: A235185 A235186 A235187 * A235189 A235190 A235191

Keyword

nonn,easy

Author

Robert G. Wilson v, Jan 04 2014

Status

approved