Effective rank of the TT-tensor [ER]=ERANK(TT) TT-Toolbox 2.2, 2009-2012 This is TT Toolbox, written by Ivan Oseledets et al. Institute of Numerical Mathematics, Moscow, Russia webpage: http://spring.inm.ras.ru/osel For all questions, bugs and suggestions please mail ivan.oseledets@gmail.com ---------------------------
0001 function [er]=erank(tt) 0002 %Effective rank of the TT-tensor 0003 % [ER]=ERANK(TT) 0004 % 0005 % 0006 % TT-Toolbox 2.2, 2009-2012 0007 % 0008 %This is TT Toolbox, written by Ivan Oseledets et al. 0009 %Institute of Numerical Mathematics, Moscow, Russia 0010 %webpage: http://spring.inm.ras.ru/osel 0011 % 0012 %For all questions, bugs and suggestions please mail 0013 %ivan.oseledets@gmail.com 0014 %--------------------------- 0015 0016 n=tt.n; d=tt.d; r=tt.r; 0017 sz=dot(n.*r(1:d),r(2:d+1)); 0018 er=sz./sum(n); er=sqrt(er); 0019 return 0020 end