????function?B?=??jadeR（Xm）
%?Blind?separation?of?real?signals?with?JADE.??Version?1.5?Dec.?1997.
%
%?Usage:?
%???*?If?X?is?an?nxT?data?matrix?（n?sensors?T?samples）?then
%?????B=jadeR（X）?is?a?nxn?separating?matrix?such?that?S=B*X?is?an?nxT
%?????matrix?of?estimated?source?signals.
%???*?If?B=jadeR（Xm）?then?B?has?size?mxn?so?that?only?m?sources?are
%?????extracted.??This?is?done?by?restricting?the?operation?of?jadeR
%?????to?the?m?first?principal?components.?
%???*?Also?the?rows?of?B?are?ordered?such?that?the?columns?of?pinv（B）
%?????are?in?order?of?decreasing?norm;?this?has?the?effect?that?the
%?????‘most?energetically?significant‘?components?appear?first?in?the
%?????rows?of?S=B*X.
%
%?Quick?notes?（more?at?the?end?of?this?file）
%
%??o?this?code?is?for?REAL-valued?signals.??An?implementation?of?JADE
%????for?both?real?and?complex?signals?is?also?available?from
%????http://sig.enst.fr/~cardoso/stuff.html
%
%??o?This?algorithm?differs?from?the?first?released?imp