function stat_features=features_extractor(U,sample_vectors,data_with_mean,mean_face_vector)

if data_with_mean==1
    sample_vectors=removing_mean(sample_vectors,mean_face_vector);
end;

n_vectors=size(sample_vectors,2);

for i=1:n_vectors
    stat_features(:,i)=(sample_vectors(:,i)'*U)';
end;