OFFSET
1,2
COMMENTS
A symmetric matrix [[a,c],[c,b]] is positive definite if and only if a > 0 and ab - c^2 > 0. So a(n) is also the number of triples (a,b,c) satisfying these inequalities with a,b,c having absolute value at most n.
LINKS
MAPLE
a:=proc(n)
local x, y, z, count;
count:=0;
for x from 1 to n do
for y from 1 to n do
for z from -n to n do
if x>0 and x*y > z^2 then count:=count+1; fi;
od:
od:
od:
count;
end:
MATHEMATICA
Table[cnt = 0; Do[If[a*b > c^2, cnt++], {a, n}, {b, n}, {c, -n, n}]; cnt, {n, 40}] (* T. D. Noe, Nov 26 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
W. Edwin Clark, Nov 25 2012
STATUS
approved