close all; clc; clear; 

% Problem EPage 46
% 
A = [ 8, -1, -5; -4, 4, -2; 18, -5, -7 ] ;

[V,D] = eig(A) % the right eigenvectors 
( A * V ) ./ repmat( diag(D).', [3,1] ) % check that V gives a matrix with the eigenvectors as columns

[V,D] = eig(A') % the left eigenvectors 
( ( V' * A )' ) ./ repmat( diag(D).', [3,1] 

v_1_book = [ 0.0484 + 0.4446 * i ; -0.3962 + 0.493 * i ; 0.493 + 0.3962 * i ];
A * v_1_book