[READ-ONLY] Mirror of https://github.com/jmrplens/EASEPostFile2Matlab. Representa los datos de historia temporal obtenidos con EASE 4 y calcula la teoría revisada corregida.
Pequeños arreglos
Arreglada la modificación del tamaño del plot en Matlab 2018a.
Corregidos los colores de la aplicación.
Añadida barra de carga al importar archivos de texto.
Jose Manuel Requena Plens
(Aug 26, 2018, 2:13 AM +0200)
cb5be6dd
2e15ab50
+14
-3
EASEPostFile2Matlab.fig
EASEPostFile2Matlab.fig
This is a binary file and will not be displayed.
+4
-2
include/importarPostFiles.m
+4
-2
include/importarPostFiles.m
···
41
41
SPLFuente = zeros(size(ListaArchivos,2),21);
42
42
handles.SPLm = cell(size(ListaArchivos,2),21);
43
43
for i=1:size(ListaArchivos,2)
44
-
44
+
multiWaitbar(handles,'Importando datos',i/size(ListaArchivos,2),'color','b');
45
45
% Distancia entre receptores y fuente
46
46
A = EASEPost2Distan(ListaArchivos{i});
47
47
Distancia(i) = sqrt(...
···
116
116
117
117
end
118
118
119
+
multiWaitbar(handles,'Importando datos','Close');
119
120
% En primer lugar agrupa los niveles en bloques de 1 milisegundo, ya que hay
120
121
% varios niveles por milisegundo, y promedia los valores de cada bloque
121
122
for i=1:numel(handles.SPLm(:,1))
122
123
123
-
124
+
multiWaitbar(handles,'Procesando historias temporales',i/numel(handles.SPLm(:,1)),'color','r');
124
125
for j=1:max(ceil(handles.SPLm{i,19}(:,1)))
125
126
Ini = find(handles.SPLm{i,19}(:,1)>=j-1,1); % Inicio del bloque de 'j' milisegundos
126
127
Fin = find(handles.SPLm{i,19}(:,1)>j,1)-1; % Fin del bloque de 'j' milisegundos
···
193
194
handles.SPLm{i,20} = ValMSoct;
194
195
handles.SPLm{i,21} = ValMSthirdoct;
195
196
end
197
+
multiWaitbar(handles,'Procesando historias temporales','Close');
196
198
% Obtener el tiempo maximo valor elegible para representacion. Obtiene el
197
199
% maximo de cada receptor y despues busca el minimo entre estos.
198
200
handles.MaxElegible = min(cell2mat(cellfun( @(val) numel(val), handles.SPLm(:,1),'UniformOutput',0)))-1;
+4
include/representarSPLvsDist2.m
+4
include/representarSPLvsDist2.m
···
1
1
function representarSPLvsDist2(hObject,handles)
2
2
3
3
axes(handles.plotfig)
4
+
4
5
Rango = handles.Rango;
5
6
SPLmTot = handles.SPLm(:,19); % Matriz con los rayos sin procesar
6
7
SPLm = handles.SPLm(:,20); % Matriz con valores cada ms y por octavas
···
433
434
434
435
hold off
435
436
437
+
% Asegurar el tama�o y posicion del plot
438
+
set(gca, 'units','normalized', 'outerposition',[-0.073 -0.027 0.753 1.028]);
439
+
set(gca, 'units','normalized', 'position',[0.037 0.077 0.562 0.854]);
436
440
+6
-1
include/representarSPLvsDist3.m
+6
-1
include/representarSPLvsDist3.m
···
418
418
419
419
hold off
420
420
421
-
421
+
% Asegurar el tama�o y posicion del plot
422
+
set(gca, 'units','normalized', 'outerposition',[-0.073 -0.027 0.753 1.028]);
423
+
set(gca, 'units','normalized', 'position',[0.037 0.077 0.422 0.854]);
424
+
if get(handles.teoriacorregida,'value')==1
425
+
set(gca, 'units','normalized', 'position',[0.037 0.077 0.362 0.854]);
426
+
end