root/applications/dual/SIDP/smc29/my_sample.m
@
1255
Revision 1255, 175 bytes (checked in by zimamiro, 14 years ago) |
---|
Rev | Line | |
---|---|---|
[1255] | 1 | function x_0=my_sample(vahy,x_1) |
2 | N=size(vahy,2); | |
3 | F= (vahy*triu(ones(N,N),0)); | |
4 | u=rand(1,N)'; | |
5 | index=min(N-sum((ones(1,N)'*F-u*ones(1,N))>0,2)+1,N); | |
6 | x_0=x_1(:,index); | |
7 | end |
Note: See TracBrowser
for help on using the browser.