Meine Frage wurde als Spam gemeldet
Link zum Beitrag: (Spline mit mehreren Gruppierungen anpassen)
durch 011717
https://community.jmp.com/t5/Discussions/Fit-Spline-with-multiple-groupings/mp/316655#M56822
Hallo zusammen,
Ich habe eine Funktion, die der von mir benötigten ähnlich ist, aber mithilfe von Group bis dahin Spline anpassen. Ich muss also die Diagramme mit verschiedenen Gruppierungen haben: Typ, Grpcolor und BP. Bei der angegebenen Funktion habe ich nur die grpcolor als Gruppierung. Was ich aber brauche, sind diese drei Parameter (Typ, Nummer, BP). Wie kann ich diesen Code in eine Funktion konvertieren, die der folgenden ähnelt?
Diagrammbeispiel:
Bivariate (Y (: Cal_I_Jmp), X. (: STO_DCR_TS_LES), Anpassen, wo (: BP == "20 nm", Spline anpassen (1000, {Linienfarbe ({212, 73, 88})}), Anpassen, wo (: BP == "35 nm", Spline anpassen (1000, {Linienfarbe ({61, 174, 70})})), Fit Where (: BP == "50nm", Fit Spline (1000, {Linienfarbe ({66, 112, 221})})) , SendToReport (Versand ({}, "Bivar Plot", FrameBox, {Zeilenlegende (BP, Farbe (1), Farbthema ("JMP-Standard")), Marker (0), Markerthema (""), Kontinuierliche Skalierung ( 0), Reverse Scale (0), Ausgeschlossene Zeilen (0))}));
Hier ist die Funktion:
bivpolyfit = Funktion ({x_param, y_param, Gruppierung}, biv = Bivariate (Y (Spalte (y_param)), X (Spalte (x_param)), GroupBy (Spalte (Gruppierung)), & lt; & lt; Polynom anpassen (2 , {Linienbreite (2)})); rbiv = biv & lt; & lt; Bericht; rbiv [Rahmenbox (1)] & lt; {Markierungsgröße (3)}; rbiv [Achsenbox (2)] & lt; ; & lt; Häkchenschrift (Stil (0), Größe (9)) & lt; & lt; Hauptgitter anzeigen (1) & lt; & lt; Minor Grid anzeigen (1) & lt; & lt; Kleinere Zecken anzeigen (1) & lt; & lt; {Min (eval (xmin [j])), Max (eval (xmax [j])) / *, Inc (incr [j]) * /}; rbiv [Axisbox (1)] & lt; & lt; Häkchenschrift (Stil (0), Größe (9)) & lt; & lt; Hauptgitter anzeigen (1) & lt; & lt; Minor Grid anzeigen (1) & lt; & lt; Kleinere Zecken anzeigen (1) & lt; & lt; {Min (eval (ymin [j])), Max (eval (ymax [j])) / *, Inc (incr [j]) * /}; rbiv [TextEditBox (2)] & lt; & lt; Festlegen der Schriftgröße (10) & lt; & lt; Festlegen des Schriftstils ("Fett"); rbiv [TextEditBox (1)] & lt; & lt; Festlegen der Schriftgröße (10) & lt; & lt; Festlegen des Schriftstils ("Fett"); rbiv [Gliederungsbox (1)] & lt; & lt; Set Title (y_param || "vs" || x_param); rbiv ["Polynom-Anpassungsgrad = 2?"] & lt; & lt; Schließen Sie alle so; rbiv [Framebox (1)] & lt; & lt; Zeilenlegende (Spalte (Gruppierung), Farbe (1), Markierung (0), Farbthema ("JMP-Standard"), kontinuierliche Skalierung (0)); rbiv [Framebox (1)] & lt; & lt; Zeilenlegende (Spalte (rdr), Farbe (0), Markierung (1), Markierungsthema ("durchgehend")); rbiv [BorderBox (3)] & lt; & lt; Löschen; rbiv [BorderBox (2)] & lt; & lt; Löschen; pbiv = rbiv [OutlineBox (1)] & lt; & lt; Bild abrufen; <CODE class=""language-jsl""> ppt9 = OutlineBox ("IJMP"); yparam = {"Cal_I_Jmp", "Cal_I_Jmp", "Cal_I_Jmp", "Cal_I_Jmp"}; xparam = {"STO_DCR_TS_LES", "STO_DCR_TS_MP", "STO_R", "STO_TS"}; lb = LineupBox (NCol (4)); Für (j = 1, j & lt; = nitems (xparam), j ++, bivpolyfit (xparam [j], yparam [j], grpcolor); lb & lt; & lt; append (pbiv); biv & lt; & lt; Close Window;) ;; ppt9 & lt; & lt; anhängen (lb & lt; & lt; Bild abrufen); transdt & lt; & lt; Löschen;
Diese Nachricht hat 0 Antworten