samer@4: function V=eigvecs(A,I)
samer@4: 	[V,D]=eig(A);
samer@4: 	V=fliplr(V);
samer@4: 	V=V(:,I);
samer@4: end