Tengo varios archivos en los que quiero realizar un análisis. Quiero crear un bucle para abrir el archivo, realizar el análisis, calcular un valor "área bajo una curva" en este ejemplo y luego hacer una tabla de resumen con el nombre del archivo y el área. Puedo abrir los archivos desde una carpeta y realizar el análisis. No estoy seguro de cómo crear la tabla de resumen. He dado un ejemplo con 2 archivos pero tengo muchos más archivos que me gustaría procesar de esta manera. ¡Cualquier ayuda u orientación es muy apreciada! También hágamelo saber si esto no tiene sentido o si se necesita más información.
//apunta al directorio de archivos
ruta = Seleccionar directorio ("Seleccionar directorio que contiene archivos de datos");
//Obtiene la lista de archivos en la carpeta de archivos seleccionada
file_list = Archivos en el directorio (ruta);
//i=0;abrir archivo
nfile_list = N elementos (file_list);
For(i = 1, i <=nfile_list, i += 1,
// Establecer directorio actual ( dir_DirectoryPath );
dt = Abrir(ruta||lista_de_archivos[i], );
//Calcular área
dt = Tabla de datos actuales ();
dt << borrar estados de fila;
obj3 = dt << Bivariado(
Y( :Nombre( "Datos") ),
X( :Tiempo ),
Ajustar polinomio (6, {Color de línea ({212, 73, 88})}),
SendToReport(Dispatch({}, "Gráfica Bivar", FrameBox, {Tamaño del marco( 449, 411 )} ) )
);
//guardar el gráfico en la tabla de datos
obj3 << Guardar secuencia de comandos en la tabla de datos ("Área");
// obtener la cadena de fórmula de predicción y calcular el área bajo la curva para adsorción de 30 minutos
fm = report(obj3)[OutlineBox("¿Polinomio?")][TextEditBox(1)] << get text;
// obtener la cadena a la derecha del signo igual y convertir la cadena en una expresión usando Parse()
fm = Analizar (Recortar (palabra (2, fm, "=")));
area = Integrar(fm, :Tiempo , 0, 3600);
Caption("El área bajo esta curva es " || char(área));
Área de impresión);
);
Ejemplo de Mesa Final que me gustaría tener:
Cualquier ayuda con esto sería muy apreciada. Gracias
