<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />Ciao,
Ho avuto una sceneggiatura per un'analisi di sopravvivenza che potrebbe produrre (1) un diagramma di fallimento, (2) riassunto e test tra gruppi per due gruppi di confronto. Ho provato ad esportarli in un diario e salvare come MSword, non è successo nulla. Anche il file "JournalTest.doc" non è apparso nella cartella. Potresti per favore aiutarmi a rivedere i miei codici? Ho allegato la mia tabella di dati e un diario di prova che mostra ciò che voglio. Accorcia i miei codici ovunque sia possibile.
// recupera tutte le righe dal database
dbq_string = "DBQ = E: \ Now \ (Progetto) RFID_r3_Homing_r1 \ Ben analysis \ Chang_bee_db.mdb;" ||
"DefaultDir = E: \ Now \ (Project) RFID_r3_Homing_r1 \ Ben analisi;" ||
"Driver = {Microsoft Access Driver (* .mdb)}; DriverId = 25; FIL = MS Access;" ||
"FILEDSN = C: \ Programmi \ File comuni \ ODBC \ Data Sources \ chang_bee_db.dsn;" ||
"MaxBufferSize = 2.048; MaxScanRows = 8; PageTimeout = 5; SafeTransactions = 0; Fili = 3; UID = admin; UserCommitSync = Sì;";
dt1 = Apri database (dbq_string, "SELECT * FROM qryAFF14", "qryAFF14", invisibile);
// ottiene le curve di 3 gruppi in un grafico di errore
dt = data table ("qryAFF14", invisible); / * invisibile: per chiudere la finestra della tabella dati * /
dt << Survival (
Y (: AFF14),
Raggruppamento (: trattamento),
Failure Plot (1),
Survival Plot (0),
Dove (: trattamento == "acetone 5μl" |: trattamento == "nil" |: trattamento == "methoprene 5μll (40 μg / μl)"),
SendToReport (
Spedizione(
{"Fallimento trama"},
"In mancanza",
TextEditBox,
{Imposta testo ("Tassi di inizio del primo volo")}
),
Spedizione(
{"Fallimento trama"},
"AFF14",
TextEditBox,
{Imposta testo ("Età (giorno)")}
)
)
);
// mostra il grafico di errore su un giornale. come modificare la parte sottolineata per esportare la trama?
dt << journal (blocca tutto);
dt << chiudi la finestra;
journal corrente () << riduci a icona la finestra;
Page Break Box () << Journal;
dts = dt << Riepilogo (Gruppo (: trattamento), N, Media (: AFF14), Errore Std, nome tabella di output ("qryAFF14_out"));
dts << Diario (Blocca tutto);
dts << chiudi la finestra;
Current Journal () << save HTML ("E: \ Now \ (Project) RFID_r3_Homing_r1 \ Ben analysis \ JMP \ JournalTest.htm");
Diario corrente () << salva MSWord ("E: \ Now \ (Project) RFID_r3_Homing_r1 \ Ben analysis \ JMP \ JournalTest.doc");
Current Journal () << salva RTF ("E: \ Now \ (Project) RFID_r3_Homing_r1 \ Ben analysis \ JMP \ JournalTest.rtf");
// ottenere un riepilogo e test tra gruppi, questa parte funziona
dt << Survival (
Y (: AFF14),
Raggruppamento (: trattamento),
Failure Plot (0),
trama di sopravvivenza (0),
, Dove (: trattamento == "acetone 5μl" |: trattamento == "nil"),
)
<< Sopravvivenza (
Y (: AFF14),
Raggruppamento (: trattamento),
Failure Plot (0),
trama di sopravvivenza (0),
, Dove (: trattamento == "acetone 5μl" |: trattamento == "methoprene 5μll (40 μg / μl)"),
);
// Esporta il riepilogo e verifica tra i gruppi, non funziona. come modificare lo script per questi due
dt << journal (blocca tutto);
dt << chiudi la finestra;
journal corrente () << riduci a icona la finestra;
Page Break Box () << Journal;
dts = dt << Riepilogo (Gruppo (: trattamento), N, Media (: AFF14), Errore Std, nome tabella di output ("qryAFF14_out"));
dts << Diario (Blocca tutto);
dts << chiudi la finestra;
Current Journal () << save HTML ("E: \ Now \ (Project) RFID_r3_Homing_r1 \ Ben analysis \ JMP \ JournalTest.htm");
Diario corrente () << salva MSWord ("E: \ Now \ (Project) RFID_r3_Homing_r1 \ Ben analysis \ JMP \ JournalTest.doc");
Current Journal () << salva RTF ("E: \ Now \ (Project) RFID_r3_Homing_r1 \ Ben analysis \ JMP \ JournalTest.rtf");
