source: altifloat/matlab_toolbox/twin1f.m @ 160

Last change on this file since 160 was 129, checked in by jbrlod, 10 years ago

last version of Varanth

  • Property svn:executable set to *
File size: 6.5 KB
Line 
1% 1 floater 2 pts
2close all
3figure(1)
4scale=1000000
5ls;
6load obs_float/obs_float_test.dat;
7whos;
8x=obs_float_test (1:2:40,4)
9y=obs_float_test (2:2:40,4)
10x=x+1;
11y=y+1;
12plot(x(1),y(1),'+')
13hold on;
14plot(x(20),y(20),'>')
15hold on;
16plot(x(1:20),y(1:20),'+');
17hold on;
18plot(x(1:20),y(1:20),'-r')
19hold on;
20
21load obs_float/rfloat_total.dat
22rfloat_total(:,:)
23x2=rfloat_total(:,4)
24y2=rfloat_total(:,3)
25x2=x2+1;
26y2=y2+1;
27[k,h]=size(x2);
28plot(x2(2),y2(2),'+')
29hold on;
30plot(x2(k-1),y2(k-1),'>')
31hold on;
32plot(x2(2:k-1),y2(2:k-1),'+')
33hold on;
34plot(x2(2:k-1),y2(2:k-1),'-g')
35hold on;
36
37load obs_float/uv_total.dat;
38whos;
39X1=uv_total(1:5046,end-3);
40Y1=uv_total(1:5046,end-2);
41
42%change si pas de temps change
43U1=zeros(5046,1);
44V1=zeros(5046,1)
45e=1;
46for r=1:1:19
47   
48    for count=1:5046
49        Unew(count)=uv_total(e,end-1);
50        Vnew(count)=uv_total(e,end);
51        e=e+1;
52    end
53    U1=U1+Unew';
54    V1=V1+Vnew';
55   
56   
57end
58X1=X1+1;
59Y1=Y1+1;
60U1=U1/19;
61V1=V1/19;
62quiver(X1,Y1,U1,V1,2,'r','Autoscale','off');
63
64load obs_float/uzero.dat;
65
66
67whos;
68X2=uzero(:,end-2);
69Y2=uzero(:,end-1);
70X2=X2;
71Y2=Y2;
72U2=uzero(:,end);
73load obs_float/vzero.dat
74
75V2=vzero(:,end);
76quiver(X2,Y2,U2,V2,2,'g','Autoscale','off');
77
78% % load uv_total.dat;
79% whos;
80% X=uv_total(:,end-3);
81% Y=uv_total(:,end-2);
82% U=uv_total(:,end-1);
83% V=uv_total(:,end);
84% quiver(X,Y,U,V,2);
85%
86load obs_float/utrue.dat;
87
88utrue=roundn(utrue,-6)
89whos;
90X3=utrue(:,end-2);
91Y3=utrue(:,end-1);
92X3=X3;
93Y3=Y3;
94U3=utrue(:,end);
95load obs_float/vtrue.dat
96vtrue=roundn(vtrue,-6)
97V3=vtrue(:,end);
98quiver(X3,Y3,U3,V3,2,'b','Autoscale','off');
99figure(2)
100
101load obs_float/vel_bck_all.dat
102it=find(vel_bck_all(:,1)==1);
103Tu=reshape(vel_bck_all(it,4),58,87);
104Tv=reshape(vel_bck_all(it,5),58,87);
105
106load obs_float/vel_true_all.dat
107it=find(vel_true_all(:,1)==1);
108Bu=reshape(vel_true_all(it,4),58,87);
109Bv=reshape(vel_true_all(it,5),58,87);
110
111F=(Bu-Tu).^2+(Bv-Tv).^2
112imagesc(F)
113 hold on
114 
115x=obs_float_test (1:2:40,4)
116y=obs_float_test (2:2:40,4)
117x=x+1;
118y=y+1;
119plot(x(1),y(1),'+')
120hold on;
121plot(x(20),y(20),'>')
122hold on;
123plot(x(1:20),y(1:20),'+');
124hold on;
125plot(x(1:20),y(1:20),'-r')
126hold on;
127
128figure(3)
129
130load obs_float/uv_total.dat
131it=find(uv_total(:,1)==0);
132Iu0=reshape(uv_total(it,4),58,87);
133Iv0=reshape(uv_total(it,5),58,87);
134it=find(uv_total(:,1)==1);
135Iu1=reshape(uv_total(it,4),58,87);
136Iv1=reshape(uv_total(it,5),58,87);
137it=find(uv_total(:,1)==2);
138Iu2=reshape(uv_total(it,4),58,87);
139Iv2=reshape(uv_total(it,5),58,87);
140it=find(uv_total(:,1)==3);
141Iu3=reshape(uv_total(it,4),58,87);
142Iv3=reshape(uv_total(it,5),58,87);
143it=find(uv_total(:,1)==4);
144Iu4=reshape(uv_total(it,4),58,87);
145Iv4=reshape(uv_total(it,5),58,87);
146it=find(uv_total(:,1)==5);
147Iu5=reshape(uv_total(it,4),58,87);
148Iv5=reshape(uv_total(it,5),58,87);
149it=find(uv_total(:,1)==6);
150Iu6=reshape(uv_total(it,4),58,87);
151Iv6=reshape(uv_total(it,5),58,87);
152it=find(uv_total(:,1)==7);
153Iu7=reshape(uv_total(it,4),58,87);
154Iv7=reshape(uv_total(it,5),58,87);
155it=find(uv_total(:,1)==8);
156Iu8=reshape(uv_total(it,4),58,87);
157Iv8=reshape(uv_total(it,5),58,87);
158it=find(uv_total(:,1)==9);
159Iu9=reshape(uv_total(it,4),58,87);
160Iv9=reshape(uv_total(it,5),58,87);
161it=find(uv_total(:,1)==10);
162Iu10=reshape(uv_total(it,4),58,87);
163Iv10=reshape(uv_total(it,5),58,87);
164it=find(uv_total(:,1)==11);
165Iu11=reshape(uv_total(it,4),58,87);
166Iv11=reshape(uv_total(it,5),58,87);
167it=find(uv_total(:,1)==12);
168Iu12=reshape(uv_total(it,4),58,87);
169Iv12=reshape(uv_total(it,5),58,87);
170it=find(uv_total(:,1)==13);
171Iu13=reshape(uv_total(it,4),58,87);
172Iv13=reshape(uv_total(it,5),58,87);
173it=find(uv_total(:,1)==14);
174Iu14=reshape(uv_total(it,4),58,87);
175Iv14=reshape(uv_total(it,5),58,87);
176it=find(uv_total(:,1)==15);
177Iu15=reshape(uv_total(it,4),58,87);
178Iv15=reshape(uv_total(it,5),58,87);
179it=find(uv_total(:,1)==16);
180Iu16=reshape(uv_total(it,4),58,87);
181Iv16=reshape(uv_total(it,5),58,87);
182it=find(uv_total(:,1)==17);
183Iu17=reshape(uv_total(it,4),58,87);
184Iv17=reshape(uv_total(it,5),58,87);
185it=find(uv_total(:,1)==18)
186Iu18=reshape(uv_total(it,4),58,87);
187Iv18=reshape(uv_total(it,5),58,87);
188% it=find(uv_total(:,1)==19)
189% Iu19=reshape(uv_total(it,4),58,87);
190% it=find(uv_total(:,1)==20);
191% I20=reshape(uv_total(it,4),58,87);
192% it=find(uv_total(:,1)==21);
193% I21=reshape(uv_total(it,4),58,87);
194% it=find(uv_total(:,1)==22);
195% I22=reshape(uv_total(it,4),58,87);
196% it=find(uv_total(:,1)==23);
197% I23=reshape(uv_total(it,4),58,87);
198% it=find(uv_total(:,1)==24);
199% I24=reshape(uv_total(it,4),58,87);
200% it=find(uv_total(:,1)==25);
201% I25=reshape(uv_total(it,4),58,87);
202% it=find(uv_total(:,1)==26);
203% I26=reshape(uv_total(it,4),58,87);
204% it=find(uv_total(:,1)==27);
205% I27=reshape(uv_total(it,4),58,87);
206% it=find(uv_total(:,1)==28);
207% I28=reshape(uv_total(it,4),58,87);
208% it=find(uv_total(:,1)==29);
209% I29=reshape(uv_total(it,4),58,87);
210% it=find(uv_total(:,1)==30);
211% I30=reshape(uv_total(it,4),58,87);
212% it=find(uv_total(:,1)==31);
213% I31=reshape(uv_total(it,4),58,87);
214% it=find(uv_total(:,1)==32);
215% I32=reshape(uv_total(it,4),58,87);
216% it=find(uv_total(:,1)==33);
217% I33=reshape(uv_total(it,4),58,87);
218% it=find(uv_total(:,1)==34);
219% I34=reshape(uv_total(it,4),58,87);
220% it=find(uv_total(:,1)==35);
221% I35=reshape(uv_total(it,4),58,87);
222% it=find(uv_total(:,1)==36);
223% I36=reshape(uv_total(it,4),58,87);
224
225Cu=(Iu0+Iu1+Iu2+Iu3+Iu4+Iu5+Iu6+Iu7+Iu8+Iu9+Iu10+Iu11+Iu12+Iu13+Iu14+Iu15+Iu16+Iu17+Iu18)/19;
226Cv=(Iv0+Iv1+Iv2+Iv3+Iv4+Iv5+Iv6+Iv7+Iv8+Iv9+Iv10+Iv11+Iv12+Iv13+Iv14+Iv15+Iv16+Iv17+Iv18)/19;
227
228F1=(Tu-Cu).^2+(Tv-Cv).^2;
229imagesc(F1)
230hold on
231x=obs_float_test (1:2:40,4)
232y=obs_float_test (2:2:40,4)
233x=x+1;
234y=y+1;
235plot(x(1),y(1),'+')
236hold on;
237plot(x(20),y(20),'>')
238hold on;
239plot(x(1:20),y(1:20),'+');
240hold on;
241plot(x(1:20),y(1:20),'-r')
242hold on;
243F2=(Bu-Cu).^2+(Bv-Cv).^2;
244figure(4)
245imagesc(F2)
246hold on
247x=obs_float_test (1:2:40,4)
248y=obs_float_test (2:2:40,4)
249x=x+1;
250y=y+1;
251plot(x(1),y(1),'+')
252hold on;
253plot(x(20),y(20),'>')
254hold on;
255plot(x(1:20),y(1:20),'+');
256hold on;
257plot(x(1:20),y(1:20),'-r')
258hold on;
259
260
261
262
263figure (5)
264imagesc(F)
265axis([70 77 38 46])
266hold on
267x=obs_float_test (1:2:40,4)
268y=obs_float_test (2:2:40,4)
269x=x+1;
270y=y+1;
271plot(x(1),y(1),'+')
272hold on;
273plot(x(20),y(20),'>')
274hold on;
275plot(x(1:20),y(1:20),'+');
276hold on;
277plot(x(1:20),y(1:20),'-r')
278hold on;
279
280
281figure (6)
282imagesc(F1)
283axis([70 77 38 46])
284hold on
285x=obs_float_test (1:2:40,4)
286y=obs_float_test (2:2:40,4)
287x=x+1;
288y=y+1;
289plot(x(1),y(1),'+')
290hold on;
291plot(x(20),y(20),'>')
292hold on;
293plot(x(1:20),y(1:20),'+');
294hold on;
295plot(x(1:20),y(1:20),'-r')
296hold on;
297
298
299sum=0;
300count=0;
301for r=70:77
302    for t=39:46
303        sum=sum+F(t,r);
304        count=count+1;
305    end
306end
307sum=sum/count
308
309sum3=0;
310count3=0;
311for r=70:77
312    for t=39:46
313        sum3=sum3+F1(t,r);
314        count3=count3+1;
315    end
316end
317sum3=sum3/count3
Note: See TracBrowser for help on using the repository browser.