J'exécute une boucle for pour sélectionner différentes tables de données et exécuter un graphique de variabilité pour sélectionner des paramètres. Le script crée différents journaux de rapport pour chaque table de données. Quelqu'un peut-il m'aider s'il vous plaît à fusionner tous les journaux de rapport ensemble.
Var_chart= Fonction ({select_y,select_x},
table de données courante (dt_sub);
Rep_chart = Tableau de variabilité(
Y( Eval (select_y) ),
X( Eval (select_x) ),
Max Iter( 100 ),
Limite de conversion (0,00000001),
Nombre d'abscisses d'intégration ( 128 ),
Évaluations de la fonction numérique (65536),
Type d'analyse( "Choisir la meilleure analyse (EMS REML Bayésien)" ),
Std Dev Chart( 0 ),
Rapport de synthèse de variabilité(1),
Sigma historique( 0 ),
Afficher les moyennes de groupe( 1 ),
Afficher la grande moyenne( 1 ),
Afficher les boîtes à moustaches( 1 )
),
Rep_var_chart = Rep_chart << Rapport ;
Rep_var_chart << Saut de page ;
Rep_var_chart << Fenêtre Journal ;
Rep_Jrn << Ajouter (Rep_var_chart);
fermer (dt_sub, pas de sauvegarde) ;
);
ma = 1;
col_name_list ={} ;
Rep_Jrn= Nouvelle fenêtre ("Rapport", << Journal);
Pour (l=1,l <= NItems (test_list), l++,
open_path1 = L_path1||test_list[l]||"_"||"Com"||".jmp" ;
dt_sub= ouvrir (open_path1);
col_name_list[ma] = dt_sub << obtenir les noms de colonne ();
//ma=ma+1 ;
Nouvelle fenêtre( "Sélectionner les tests pour l'analyse", <
Zone de liste V(
Zone de texte("Sélectionnez Y,Réponse"),
para_select1 = Zone de liste( col_name_list[ma] ),
Zone de texte( "Sélectionnez X, Réponse"),
para_select2 = Zone de liste (col_name_list[ma]),
Button Box( "OK", test_list1 = para_select1 << être sélectionné ;
test_list2 = para_select2 << être sélectionné ),
);
);
impression(test_list1);
imprimer (test_list2);
Var_chart (test_list1,test_list2);
ma=ma+1 ;
//close(dt_sub, NO Save);
);
Voici un exemple de possibilité d'ajouter une sortie de plate-forme à un Journal.Apparemment, vous ne pointez pas correctement vers le journal ou vers la sortie du rapport.
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/big class.jmp" );
nw = New Window( "example", <<JOURNAL></JOURNAL>
j'ai essayé, mais ça ne marche pas. Donner une erreur..
Pas d'affichage dans l'accès ou l'évaluation de 'append' , append( Report( Rep_chart ) ) /*###*/
Si après votre
ma = ma + 1;
vous avez juste besoin d'ajouter
Rep_Jrn << append(report(Rep_chart));
