Commit 8731ccabf9d7e8f5c44cdad7f622b443e4c10f37
1 parent
7d111340
Exists in
master
cree une png de la resolution et de la position de la georectification
Showing
1 changed file
with
37 additions
and
5 deletions
Show diff stats
r_interp_opc_UTM.m
... | ... | @@ -63,6 +63,10 @@ tifdir = [zonedir,'/tif']; |
63 | 63 | |
64 | 64 | %% Load the calibration file |
65 | 65 | load(calfile); |
66 | +% files for context image | |
67 | +S = shaperead('/home/nicp0003/LND_LSLE_line_UTM.shp'); | |
68 | +[res,Rr] = geotiffread([rootdir '/' estr(1:4) '/calib/resolution_' estr(1:4) '_UTM.tif']); | |
69 | +res = double(res); | |
66 | 70 | |
67 | 71 | %% Creation of the grid |
68 | 72 | |
... | ... | @@ -75,7 +79,7 @@ elseif zone == 2 % entree BHH + au large |
75 | 79 | llat = 5353902; ulat = 5358298; |
76 | 80 | |
77 | 81 | elseif zone == 3 % entree BHH |
78 | - llon = 51028; rlon = 512939; | |
82 | + llon = 510208; rlon = 512939; | |
79 | 83 | llat = 5353902; ulat = 5355976; |
80 | 84 | |
81 | 85 | % elseif zone == 4 % mouillage AWAC |
... | ... | @@ -97,8 +101,8 @@ end |
97 | 101 | |
98 | 102 | |
99 | 103 | % update grid with resolution |
100 | -str_resol = num2str(resol*100); | |
101 | -lon1 = llon ; lon2 = rlon; | |
104 | +%str_resol = num2str(resol*100); | |
105 | +%lon1 = llon ; lon2 = rlon; | |
102 | 106 | x1vec = llon:resol:rlon; |
103 | 107 | y1vec = llat:resol:ulat; |
104 | 108 | y1vec = y1vec'; |
... | ... | @@ -137,7 +141,35 @@ if iEnd == 0 |
137 | 141 | iEnd = nFiles; |
138 | 142 | end |
139 | 143 | |
140 | -% georect loop | |
144 | +%% plot context image | |
145 | +h = figure; set(h,'visible','off'); | |
146 | + | |
147 | +lev1 = [2:2:10]; | |
148 | +mapshow(res, Rr,'DisplayType', 'contour','LineStyle','--', ... | |
149 | + 'LevelList',lev1,'edgecolor', 'none','LineColor', 'black',... | |
150 | + 'ShowText', 'on'); | |
151 | + | |
152 | +hold on; | |
153 | +lev2 = [15,25,50,75,100]; | |
154 | +mapshow(res, Rr,'DisplayType', 'contour','LineStyle','--', ... | |
155 | + 'LevelList',lev2,'edgecolor', 'none','LineColor', 'black', ... | |
156 | + 'ShowText', 'on'); | |
157 | + | |
158 | +mapshow(S,'color',[0.3 0.3 0.3],'LineWidth',1); | |
159 | + | |
160 | +ylim([5353000, 5363000]); | |
161 | +xlim([506000, 515000]); | |
162 | + | |
163 | +line([rlon llon],[llat llat],'Color',[1 0 0]); | |
164 | +line([llon rlon],[ulat ulat],'Color',[1 0 0]); | |
165 | +line([rlon rlon],[llat ulat],'Color',[1 0 0]); | |
166 | +line([llon llon],[llat ulat],'Color',[1 0 0]); | |
167 | + | |
168 | +iname = [zonedir,'/georect_context_',estr,'.png']; | |
169 | +saveas(h,iname); | |
170 | + | |
171 | + | |
172 | +%% georect loop | |
141 | 173 | for n = iFirst:nSkip:iEnd |
142 | 174 | |
143 | 175 | imfilename = imfiles(n).name; |
... | ... | @@ -218,7 +250,7 @@ for n = iFirst:nSkip:iEnd |
218 | 250 | end |
219 | 251 | |
220 | 252 | %% write a README.txt with the georectification informations |
221 | -fidname = [zonedir,'/README.txt'] | |
253 | +fidname = [zonedir,'/README.txt']; | |
222 | 254 | fid = fopen(fidname,'w'); |
223 | 255 | |
224 | 256 | fprintf(fid,'%s\n','README.txt'); | ... | ... |