Hilfe beim Hinzufügen von Datentabellen in Journalen mithilfe einer Schleife.Hallo, ich bin neu bei JMP. Ich versuche, durch eine Schleife generierte Tabellen zum Journal hinzuzufügen. Aber nicht viel Glück. Jede Hilfe dabei wäre dankbar. Hier ist mein Skript. Meine anfängliche Tabelle wird durch Ausführen von SQL qurey generiert.
dt2 = dt< Gruppe( :MODULE, :STEP ),
Freq( „Keine“),
Gewicht( „Keine“)
);
ModuleList = Column(dt2,"MODULE")< StepList = Column(dt2,"STEP")< numrows= nrows(dt2);
Close(dt2,nosave);
Für (i=1, i<=numrows, i++,
dt<< select Where (:MODULE==ModuleList[i] & :STEP==StepList[i]);
odt= (dt << Teilmenge(
Ausgabetabelle( ModuleList[i] ),
Ausgewählte Zeilen( 1 ),
Nur ausgewählte Spalten( 0 )));
dt<< clear select;
jrn<< Append(Text Box(ModuleList[i])); //Derzeit füge ich nur die Tabellen zum Journal hinzu.
odt<< Journal; //Allerdings möchte ich sie als Collesapble-Fenster/ListBox mit ModuleList[i] als Titel hinzufügen.
Close(odt,nosave);
);
Betreff: Hilfe beim Hinzufügen von Datentabellen in Journalen mithilfe einer Schleife.Verwenden Sie anstelle einer VListBox eine LineUpBox. Dies sollte hilfreich sein, wenn die Tabellentitel unterschiedlich lang sind.
Wenn die Tabellen keine Teilmengen derselben Tabelle sind, was bedeutet, dass die Tabellen eine unterschiedliche Anzahl von Spalten haben, ist die einzige Möglichkeit, die ich kenne, die Verwendung eines Containers wie einer PanelBox für jede der Tabellen. Finden Sie die größte Breite und stellen Sie dann jedes Panelfeld auf die gleiche Breite ein.
Hoffentlich ist die LineupBox alles, was Sie brauchen.Das geänderte Skript ist beigefügt.
Betreff: Hilfe beim Hinzufügen von Datentabellen in Journalen mithilfe einer Schleife.Hallo @gzmorgan0 , Danke für Ihre Antwort. Die Lösung war perfekt. Ich habe nur eine Frage. Gibt es eine Möglichkeit, die Größe der Boxen (Outlinebox) so anzupassen, dass die Texte in den Boxen in einer Zeile bleiben?
Nochmals vielen Dank für Ihre Zeit und Hilfe.
Betreff: Hilfe beim Hinzufügen von Datentabellen in Journalen mithilfe einer Schleife.Hier ist ein Screenshot des Journals mit der letzten geöffneten Tabelle.
Betreff: Hilfe beim Hinzufügen von Datentabellen in Journalen mithilfe einer Schleife.Dafür gibt es mehrere Methoden. Suchen Sie unter Hilfe > Skriptindex > DataTableColBox nach einer alternativen Methode.
Hier ist eine Methode
Names Default to Here(1);
dt = Open("$sample_data/Big Class.jmp");
//get the group list
Summarize(Data Table(dt), grps = By(:sex, :age) );
show(grps); //List of 2 lists of equal size, the first list's items are gender, the second age
ob = OutlineBox("Subset Tables", vl=VListBox() );
For(i=1, i<=nitems(grps[1]), i++, //can also use grps[2]
ttl = EvalInsert("Sex = ^grps[1][i]^, Age = ^grps[2][i]^");
//note Summarize lists converts numeric to character so num() function is required
//If the grouping columns are character, this is not needed.
dt << Select Where(:sex==grps[1][i] & :age==num(grps[2][i]) );
odt= (dt << Subset( Invisible, Output Table( ttl ),
Selected Rows( 1 ),
Selected columns only( 0 ))
);
dg = odt << New Data Box();
tmp = OutlineBox( ttl, dg);
tmp << close(1);
vl << append(tmp);
dt << clear select;
); // end for
//ob hase a nice table like view of each subset, but once you close the tables the view is gone
//so journaling creates te report view, and the subsetted tables can be closed.
nw = New Window("Tables", <<JOURNAL></JOURNAL>
