Extrahieren Sie R2 in mehreren Berichten und speichern Sie sie in einer TXT- oder CSV-DateiHallo,
Ich habe ein Skript ausgeführt, das mehrere neuronale Netzwerkanalysen (NN) automatisiert. Bei jedem Durchlauf speichert das Skript einen NN-Bericht als PDF-Datei, einschließlich der R^2-Werte von Training und Validierung. Es wird ein Problem, da ich schließlich ungefähr 1000 PDF-Dateien habe.
Bitte sehen Sie sich das Skript unten an
dt = Open( "E:/Subset of9Year.jmp" )
Summarize( locs = BY(dt:ID) );
//To create a subset of each ID for Neural Input
For(
j=1, j<=NItems(locs), j++,
file = dt << Select Where(locs[j] == Char (:ID)) << Subset(
file,
Output Table Name("Model Subset File")
);
//Run Neural Network with 2 layers with 6/3 nodes
NN = file << Neural(
Y( :Name( "SoilMoisture(kg.m-2) or (mm)" ) ),
X(
:Name( "Tmax(K)" ),
:Name( "Tmin(K)" ),
:Name( "Precip(mm)" ),
),
Informative Missing( 0 ),
Transform Covariates( 1 ),
Validation Method( "KFold", 7 ),
Set Random Seed( 1234 ),
Fit(
NTanH( 1 ),
NLinear( 1 ),
NGaussian( 1 ),
NTanH2( 3 ),
NGaussian2( 3 ),
Transform Covariates( 1 ),
Robust Fit( 1 ),
Penalty Method( "Absolute" ),
Number of Tours( 10 ),
//Show Estimates( 1 ), //show estimates
//Diagram( 1 ),
//Plot Actual by Predicted( 1 ), // print plot obj vs predicted
Save Formulas,
//Get RSquare Test //Get RSquare Validation
)
);
//Read and save each report as a PDF file<BR /> NNReport = NN << Report;
NNReport << Save PDF("E:/result/model_"|| Char (j)||".pdf");
);Gibt es eine Methode, um R2 in mehreren Berichten zu extrahieren und in einer Datei zu speichern?
Vielen Dank im Voraus. Jeder Vorschlag ist willkommen.
Betreff: R2 in mehreren Berichten extrahieren und in einer TXT- oder CSV-Datei speichernDie Funktion, die Sie verwenden möchten, ist
Textdatei speichern()
Schauen Sie in den Skripteditor und er enthält ein Beispiel und zusätzliche Optionen, die verwendet werden können.
Da Ihre Variable eine Zeichenfolge ist, können Sie verwenden
Save Text File("D:/GYST_ERIK/pmd.txt", rSquare);
oder vielleicht
Save Text File("D:/GYST_ERIK/pmd.txt", "Boston Results " || rSquare);Betreff: R2 in mehreren Berichten extrahieren und in einer TXT- oder CSV-Datei speichernIch versuche, den rSquare-Wert zu speichern, indem ich Text speichern verwende. Es kann jedoch keine Textdatei erstellt werden.
Wie ich verstehe (vielleicht falsch), erhält das Skript den rSquare-Wert und speichert ihn irgendwo in JMP. Dann habe ich Save Text verwendet, um den Wert in einer TXT-Datei zu speichern.
JMP-Fehlermeldung ist " rSquare << /*###*/Save Text( "D:/GYST_ERIK/pdm.txt" ) /*###*/;
{}"
Kannst du mir bitte helfen?
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Boston Housing.jmp" );
obj = Neural(
Y( :mvalue ),
X( :crim, :indus, :chas, :nox, :rooms, :age, :distance, :radial ),
Go
);
rSquare = (report(obj)["Validation"]["mvalue"][NumberColBox(1)]<<GET></GET>
Betreff: R2 in mehreren Berichten extrahieren und in einer TXT- oder CSV-Datei speichernMit der Fähigkeit von JMP, jedes Element innerhalb der Display-Ausgabe über die Display-Bäume zu parsen, können Sie jede gewünschte Ausgabe abrufen.Hier ist ein einfaches Beispiel für das Abrufen des Validierungs-RSquare aus einer neuralen Ausgabe
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Boston Housing.jmp" );
obj = Neural(
Y( :mvalue ),
X( :crim, :indus, :chas, :nox, :rooms, :age, :distance, :radial ),
Go
);
rSquare = (report(obj)["Validation"]["mvalue"][NumberColBox(1)]<<GET></GET>
Die Dokumentation zu Anzeigebäumen finden Sie im Scripting Guide
Hilfe=>JMP-Dokumentationsbibliothek
Dann schauen Sie im Scripting Guide nach