![]()
MATH347 L18: Geometric applications of determinants
|
New concepts:
Simplicia - simplest geometric object in dimensions
Volumes of simplicia
Volumes of complicated objects
![]()
Application of determinants: lengths, areas, volumes
|
, define an interval by , with , , . The signed length of the interval is and can be computed as
, define a triangle by , with . The signed area is
, define a tetrahedron by . The signed volume is
![]()
Example: How big is the hide on that cow?
|
octave> |
cd ~/courses/MATH347/ply; |
octave> |
[x,tri]=ply_to_tri_mesh('cow.ply'); tri=transpose(tri); |
octave> |
trisurf(tri, x(1,:), x(2,:), x(3,:) ); print -dpng cow.png; |
octave> |
tri(:,100) |
ans =
88 87 101
![]()
How big is the hide on that cow?
|
octave> |
Area=0.; |
octave> |
for n=1:max(size(tri)) n1=tri(1,n); n2=tri(2,n); n3=tri(3,n); a1 = x(:,n2)-x(:,n1); a2 = x(:,n3)-x(:,n1); q1 = a1/norm(a1); h = a2 - (q1'*a2)*q1; base = norm(a1); height = norm(h); Area = Area + 0.5*base*height; end; |
octave> |
Area |
Ahide = 21.193
![]()
How big is that cow?
|
octave> |
tet=delaunay(x(1,:),x(2,:),x(3,:)); |
octave> |
Volume=0.; |
octave> |
for n=1:max(size(tet)) n1=tet(n,1); n2=tet(n,2); n3=tet(n,3); n4=tet(n,4); X = [x(:,n1) x(:,n2) x(:,n3) x(:,n4)]; A = [ones(1,4); X]; Volume = Volume + abs(det(A))/6.; end; |
octave> |
Volume |
Volume = 10.647
![]()
Less whimsical example
|
Medical imaging (CT-scans) leads to extensive geometrical information
Periodic high-resolution CT-scans are processed to evaluate brain volume as needed for instance in Alzheimer monitoring