ci sono degli sviluppi... ma nulla di buono!
il listato reale è questo:
function [Wr]=sred(mat,s)
clc
M=load (mat);
[T,L,D]=svd(M);
D=D';
Tr=T(:,1:s);
Dr=D( 1:s,: );
[x,y]=size(M);
Lr=[L(1:s,1:s);zeros(x-s,s)];
Lr=[Lr,zeros(x,y-s)];
[a,b]=size(Lr);
Wr=T*Lr*D;
Wr=rref(Wr);
Wr=Wr( 1:s,: );
Ho provato a creare la sorgente (il file matrice.*) con altri due modi:
- editing manuale di un file matrice.csv (ovviamente i numeri sono separati da virgole)
ESITO: Can't open file matrice.csv
- creazione di una matrice nxn e salvataggio del workspace matrice.mat
ESITO: Function 'svd' not defined for variables of class 'struct'.
Beh... non so proprio dove arrampicarmi!![]()