Qualcuno conosce un modo per aggiungere sottotitoli ai grafici di controllo tramite script? Avrei una colonna di nomi di sottotitoli e vorrei scorrere la colonna e aggiungere la riga 1 come sottotitolo per la colonna 2, la riga 2 come sottotitolo per la colonna 3, ecc.
Qualsiasi suggerimento/informazione su come farlo sarebbe fantastico! Grazie!
Non sono sicuro se è possibile impostare i sottotitoli su Control Chart (Builder), quindi potrebbe essere necessario creare una copia della casella di modifica del testo utilizzata come titolo e quindi aggiungerla alla nuova casella di testo.
Di seguito un esempio
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Quality Control/Coating.jmp");
new_col = dt << New Column("subtitles", Character, Nominal);
new_col[1] = "text1";
new_col[2] = "text2";
nw = New Window("",
vlb = V List Box()
);
nw << Show Window(0);
cols_of_interest = {"Weight", "Weight 2"};
subtitles = :subtitles << get values;
For Each({col_of_interest, idx}, cols_of_interest,
vlb << append(obj = dt << Control Chart Builder(Variables(Y(:Weight), Subgroup(:Sample))));
title_teb = (Report(obj)[TextEditBox(1)]);
gb_titlebox = title_teb << parent;
gb_titlebox << Append(V List Box(align("center"),
title_teb << Clone box(),
Text Box(dt[idx, "subtitles"])
));
title_teb << Delete Box();
wait(0);
);
nw << Show Window(1);
