Compute_Slepian_ModifiedEmbedded.m
6e883b19735amaster

Compute_Slepian_ModifiedEmbedded.m
View Options

			function [Slep,Xi] = Compute_Slepian_ModifiedEmbedded(U,Lambda,W,S)

			% Trims the basis
			U = U(:,1:W);
			Lambda = Lambda(1:W,1:W);

			MC = Lambda^(0.5) * U' * S * U * Lambda^(0.5);

			MC = (MC+MC')/2;

			[V,Xi] = eig(MC);

			[Xi,idx] = sort(diag(Xi),'ascend');
			V = V(:,idx);

			Slep = U*V;
			end