Ho più file su cui voglio eseguire alcune analisi. Voglio creare un ciclo per aprire il file, eseguire l'analisi, calcolare un valore "area sotto una curva" in questo esempio e quindi creare una tabella di riepilogo con il nome del file e l'area. Posso aprire i file da una cartella ed eseguire l'analisi. Non sono sicuro di come creare la tabella di riepilogo. Ho fornito un esempio con 2 file ma ho molti più file che vorrei elaborare in questo modo. Qualsiasi aiuto o guida è molto apprezzato! Inoltre, per favore fatemi sapere se questo non ha senso o se sono necessarie ulteriori informazioni.
//punta alla directory del file
percorso = Scegli Directory ("Seleziona directory contenente file di dati");
//Ottiene l'elenco dei file nella cartella di file selezionata
file_list = File nella directory (percorso);
//i=0;apri file
nfile_list = N elementi (file_list);
For(i = 1, io <=nelenco_file, io += 1,
//Imposta la directory corrente( dir_DirectoryPath );
dt = Apri(percorso||elenco_file[i], );
//Calcola area
dt = tabella dati corrente();
dt << cancella stati di riga;
obj3 = dt << Bivariato(
Y( :Nome( "Dati" ) ),
X( :Ora ),
Fit Polynomial( 6, {Line Color( {212, 73, 88} )} ),
SendToReport( Dispatch( {}, "Bivar Plot", FrameBox, {Frame Size( 449, 411 )} ) )
);
//salva il grafico in dati dable
obj3 << Salva script nella tabella dati ("Area");
//ottieni la stringa della formula di previsione e calcola l'area sotto la curva per un assorbimento di 30 minuti
fm = report(obj3)[OutlineBox("Polynomial?")][TextEditBox(1)] << ottieni testo;
//ottieni la stringa a destra del segno di uguale e converti la stringa in un'espressione usando Parse()
fm = Analizza(Taglia(parola(2, fm, "=")));
area = Integra(fm, :Time , 0, 3600);
Caption("L'area sotto questa curva è " || char(area));
Stampa(area);
);
Esempio di tavolo finale che vorrei avere:
Qualsiasi aiuto con questo sarebbe molto apprezzato. Grazie
