<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />Ciao,
Sto tracciando tre diversi grafici (IR, EWMA e CUSUM) in un'unica finestra, ma il problema che sto affrontando è che mostra anche la condizione dove utilizzata all'interno dei grafici sulla finestra di visualizzazione.
Vetrina:
Codice:
ogg = Nuova finestra ( "Rapporto di analisi delle tendenze" || Appuntamento lungo ( In data odierna ()) ,
vlb = Casella di riepilogo a V ()
) ;
Schermo = Funzione ({ Processi , Etichetta , Di , Tipo_Src , lmt1 , lmt2 , lmt3 } ,
r1 = Nuova finestra ( "" ,
plb = Scatola del pannello ( " Grafici di controllo per " || Processi || " & " || " Tipo di origine = " || Tipo_Src , Tabella dati corrente ( dt ) ;
Casella di riepilogo H (
Grafico di controllo (
Esempio di etichetta ( Colonna ( dt , Etichetta )) ,
Dimensione del gruppo ( 1 ) , KSigma ( 3 ) ,
Come Colonna ( dt , Processi ) , Misurazione individuale ( LCL ( lmt1 [ 6 ]) , AVG ( lmt1 [ 5 ]) , UCL ( lmt1 [ 7 ]))) ,
Dove ( Come Colonna ( dt , Di ) == Tipo_Src ) ;
) ;
Esempio di etichetta ( Colonna ( dt , Etichetta )) ,
Misura di prova ( 1 ) ,
Alfa ( 0.00269979606326021 ) ,
Mostra la legenda dei limiti ( 0 ) ,
Come Colonna ( dt , Processi ) , CUSUM ( Due lati ( 1 ) , AVG ( lmt2 [ 5 ]))) ,
Dove ( Come Colonna ( dt , Di ) == Tipo_Src ) ;
) ;
Esempio di etichetta ( Colonna ( dt , Etichetta )) ,
Misura di prova ( 1 ) ,
KSigma ( 3 ) , Il peso ( 0.2 ) ,
Come Colonna ( dt , Processi ) , EWMA ( AVG ( lmt3 [ 5 ]))) ,
Dove ( Come Colonna ( dt , Di ) == Tipo_Src ) ;
) ;
) ;
) ;
) ; vlb << Aggiungere ( r1 ) ; r1 << Chiudi la finestra ;
) ;
complotto = Funzione ({ lmt , percorso_pmt } ,
param_dt = Aprire ( percorso_pmt , "invisibile" ) ;
somma_param = param_dt << Riepilogo ( Invisibile ,
Gruppo ( : Raggruppa per ,: Processi ,: Esempio di etichetta ,: Di )) << Mostra finestra ( 0 ) ;
Per ( q = 12 , q <= Ora ( somma_param ) , q ++, Tabella dati corrente ( somma_param ) ;
col2 =: Processi [ q ] ; col3 =: Esempio di etichetta [ q ] ; col4 =: Di [ q ] ;
Tabella dati corrente ( lmt ) ;
cmq = lmt << Ottieni i nomi delle colonne ( Corda ) ;
Rimuovere da ( cmq , 1 , 3 ) ;
Per ( t = 1 , t <= N articoli ( cmq ) , t ++, Tabella dati corrente ( lmt ) ;
indv_lmts = Come Colonna ( cmq [ t ])[ lmt << Ottieni righe dove ( : Parametro == col2 & : Tipo di grafico == "Individuale" )] ;
cusum_lmts = Come Colonna ( cmq [ t ])[ lmt << Ottieni righe dove ( : Parametro == col2 & : Tipo di grafico == "CUSUM" )] ;
ewma_lmts = Come Colonna ( cmq [ t ])[ lmt << Ottieni righe dove ( : Parametro == col2 & : Tipo di grafico == "EWMA" )] ;
Schermo ( col2 , col3 , col4 , cmq [ t ] , indv_lmts , cusum_lmts , ewma_lmts ) ;
) ;
) ;
) ;
Non sono in grado di capire perché sta accadendo. Qualsiasi aiuto sarebbe apprezzato. Grazie!!
Vedi se questo esempio è utile. Ho modificato un esempio nell'eccellente introduzione JSL Jump into JMP Scripting di Murphrey e Lucas.
dt = Open("$SAMPLE_DATA/Controllo di qualità/Diametro.jmp");
cc = Grafico di controllo(
Dimensione gruppo( 1 ),
KSigma( 3 ),
Grafico Col( :DIAMETRO, Misurazione Individuale ),
Dove( :MACCHINA == "A386" )
);
Aspetta( 2 );
(Report( cc ) << Genitore)[Casella di testo( 1 )] << elimina;
Aspetta( 2 );
Il testo per la clausola where è l'output standard di JMP e non è specifico del codice.Ad esempio per questo script:
Grafico di controllo (
Dimensione del gruppo ( 1 ) ,
KSigma ( 3 ) ,
Grafico Col ( : DIAMETRO , Misurazione individuale ) ,
Dove ( : Macchina == "A386" )
) ;
L'output è simile a questo:
Sfortunatamente questo testo non sembra apparire nell'albero di visualizzazione e quindi non può essere rimosso facilmente.L'approccio che adotto è quello di creare sottoinsiemi di dati per ogni grafico in modo che la clausola where non sia richiesta.Se sto componendo una finestra contenente più grafici, il titolo "Grafico di controllo" non aggiunge alcuna informazione utile, quindi sostituisco questo testo con la clausola di selezione utilizzata per sottoimpostare i dati:
Ecco lo script completo:
dt = Aprire ( "$SAMPLE_DATA/Controllo qualità/Diametro.jmp" ) ;
// nome della colonna utilizzato per la clausola 'where'
nome del gruppo = "Macchina" ;
// Ne ho bisogno per fare le pulizie dopo l'evento di chiusura della finestra
ns = Nuovo spazio dei nomi ( "tavoli-temporanei-da-cancellare" ) ;
// ottieni valori univoci per la macchina
Ricapitolare ( livelli = Di ( Come Colonna ( nome del gruppo ) ) ) ;
nw = Nuova finestra ( "I miei grafici" ,
hl = Casella di riepilogo H ()
) ;
// itera su ogni valore
ns : lstTabelle = {} ;
Per ( io = 1 , io <= NI articoli ( livelli ) , io ++,
// crea il sottoinsieme di dati
righe corrispondenti = dt << Ottieni righe dove ( Come Colonna ( nome del gruppo ) == livelli [ io ] ) ;
dtName = "Sottoinsieme per" || nome del gruppo || "=" || livelli [ io ] ;
dtsottoinsieme = dt << Sottoinsieme ( Righe ( righe corrispondenti ) , Tabella di output ( dtName ) , Invisibile ) ;
// aggiunge allo spazio dei nomi per fare riferimento all'evento on close
Inserire ( ns : lstTabelle , dtsottoinsieme ) ;
// usa un contenitore per assicurarti che il grafico non venga visualizzato fino a quando non viene aggiunto alla finestra
contenitore = Casella di riepilogo V (
cc = dtsottoinsieme << Grafico di controllo (
Dimensione del gruppo ( 1 ) ,
KSigma ( 3 ) ,
Grafico Col ( : DIAMETRO , Misurazione individuale ) ,
)
) ;
// rivedi il titolo
rappresentante = cc << Rapporto ;
ob = rappresentante [ OutlineBox ( 1 )] ;
ob << Imposta titolo ( nome del gruppo || " = " || livelli [ io ]) ;
// aggiunge alla finestra del rapporto
hl << Aggiungere ( contenitore )
) ;
// pulizie: elimina le tabelle dei sottoinsiemi
nw << In chiusura (
ns = Spazio dei nomi ( "tavoli-temporanei-da-cancellare" ) ;
Per ( io = 1 , io <= NI articoli ( ns : lstTabelle ) , io ++,
Provare ( Chiudere ( ns : lstTabelle [ io ] , NoSalva ) )
)
) ;
E l'output associato:
-Dave
