Ma question a été signalée comme spam
Lien vers l'article: (Ajuster la spline avec plusieurs regroupements)
par 011717
https://community.jmp.com/t5/Discussions/Fit-Spline-with-multiple-groupings/mp/316655#M56822
Salut à tous,
J'ai une fonction qui est similaire à ce dont j'ai besoin mais en utilisant Group by then Fit Spline. J'ai donc besoin d'avoir les graphiques avec différents regroupements: type, grpcolor et BP. Sur la fonction donnée, je n'ai que le grpcolor comme groupement. Mais ce dont j'ai besoin, ce sont ces trois paramètres (type, nombre, BP). Comment puis-je convertir ce code en une fonction similaire à celle donnée ci-dessous
Exemple de tracé:
Bivarié (Y (: Cal_I_Jmp), X (: STO_DCR_TS_LES), Ajuster où (: BP == "20nm", Ajuster spline (1000, {Couleur de ligne ({212, 73, 88})})), Ajuster où (: BP == "35nm", Ajuster spline (1000, {Couleur de ligne ({61, 174, 70})})), Ajuster où (: BP == "50nm", Ajuster spline (1000, {Couleur de ligne ({66, 112, 221})})) , SendToReport (Dispatch ({}, "Bivar Plot", FrameBox, {Row Legend (BP, Color (1), Color Theme ("JMP Default")), Marker (0), Marker Theme (""), Continuous Scale ( 0), échelle inversée (0), lignes exclues (0))})));
Voici la fonction:
bivpolyfit = Function ({x_param, y_param, grouping}, biv = Bivariate (Y (Column (y_param))), X (Column (x_param)), GroupBy (Column (grouping)), & lt; & lt; Fit Polynomial (2 , {Largeur de ligne (2)})); rbiv = biv & lt; & lt; Rapport; rbiv [Framebox (1)] & lt; & lt; {Taille du marqueur (3)}; rbiv [Axisbox (2)] & lt ; & lt; Cochez Police (style (0), taille (9)) & lt; & lt; Afficher la grille principale (1) & lt; & lt; Afficher la grille mineure (1) & lt; & lt; Afficher les graduations mineures (1) & lt; & lt; {Min (eval (xmin [j])), Max (eval (xmax [j])) / *, Inc (incr [j]) * /}; rbiv [Axisbox (1)] & lt; & lt; Cochez Police (style (0), taille (9)) & lt; & lt; Afficher la grille principale (1) & lt; & lt; Afficher la grille mineure (1) & lt; & lt; Afficher les graduations mineures (1) & lt; & lt; {Min (eval (ymin [j])), Max (eval (ymax [j])) / *, Inc (incr [j]) * /}; rbiv [TextEditBox (2)] & lt; & lt; Définir la taille de la police (10) & lt; & lt; Définir le style de police ("Gras"); rbiv [TextEditBox (1)] & lt; & lt; Définir la taille de la police (10) & lt; & lt; Définir le style de police ("Gras"); rbiv [Boîte de contour (1)] & lt; & lt; Définir le titre (y_param || "vs" || x_param); rbiv ["Degré d'ajustement polynomial = 2?"] & lt; & lt; Fermez tout comme ça; rbiv [Framebox (1)] & lt; & lt; Légende de la ligne (colonne (regroupement), couleur (1), marqueur (0), thème de couleur ("JMP par défaut"), échelle continue (0)); rbiv [Framebox (1)] & lt; & lt; Légende de la ligne (colonne (rdr), couleur (0), marqueur (1), thème du marqueur ("solide")); rbiv [BorderBox (3)] & lt; & lt; Effacer; rbiv [BorderBox (2)] & lt; & lt; Effacer; pbiv = rbiv [OutlineBox (1)] & lt; & lt; obtenir une image;
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)); Pour (j = 1, j & lt; = nitems (xparam), j ++, bivpolyfit (xparam [j], yparam [j], grpcolor); lb & lt; & lt; append (pbiv); biv & lt; & lt; Fermer la fenêtre;) ; ppt9 & lt; & lt; ajouter (lb & lt; & lt; obtenir une image); transdt & lt; & lt; Effacer;
Ce message a 0 réponses
