870668_it-IT

liliconcom

Come analizzare le virgole in una casella di riepilogo

Ciao,

Utilizzo JMP 18.1.2 e sto cercando di creare una matrice di caselle di controllo. L'ultimo passaggio, che non riesco a capire, è come creare dinamicamente la casella di riepilogo H in base al numero di righe.

Questo è il mio codice attuale:

test = {"a","b","c","d","e"};
testFin = {};
rows = 2;
remain = Modulo(N Items(test), rows);
loops = 2 + (remain > 0);
//create a list that groups the original list in groups of 2 (rows)
for(i=1, i<= loops, i++,
	test2 = {};
	if(i != loops,
		for(j = 1, j<= rows, j++,
			test2[j] = test[1];
			test = remove(test,1);
		);
		,
		for(j = 1, j<= remain, j++,
			test2[j] = test[1];
			test = remove(test,1);
		);
	);
	testFin[i] = test2;
);

//testFin = {{"a", "b"}, {"c", "d"}, {"e"}}
cb = {};
cancel_check = 0;
ttp = "";
for(i = 1, i<= N Items(testFin), i++,
	if(i != N Items(testFin),
		ttp ||= "cb["||Char(i)||"] = Check Box(testFin["||Char(i)||"]), \!n"
		,
		ttp ||= "cb["||Char(i)||"] = Check Box(testFin["||Char(i)||"]);"
	);
);
/*ttp = "cb[1] = Check Box(testFin[1]), 
cb[2] = Check Box(testFin[2]), 
cb[3] = Check Box(testFin[3]);"*/
testw = new window("raaa", <<MODAL></MODAL>

<P>L'errore che ricevo quando provo a eseguirlo è:</P>

Unexpected ",". Perhaps there is a missing ";" or ",".
Line 1 Column 30: cb[1] = Check Box(testFin[1])►, 

The remaining text that was ignored was
,cb[2]=Check Box(testFin[2]),cb[3]=Check Box(testFin[3]);

L'output desiderato (se sostituissi semplicemente l'analisi con ciò che è ttp e la eseguissi) è allegato e anche qui sotto.
Grazie!

_________________

Desired OutputDesired OutputDesired OutputOutput desiderato

<LINGO-LABS id="lingo-labs-870668" slang="en-US" mode="UPDATE"><LINGO-LABEL>Automazione e scripting</LINGO-LABEL></LINGO-LABS>Re: Come analizzare le virgole in una casella di riepilogo

Ho modificato un po' il tuo script. Ho continuato a usare la tua metodologia per creare una stringa contenente gli elementi necessari per visualizzare le caselle di controllo.

Ho anche usato

Eval( Eval Expr())

Per forzare la valutazione della stringa prima di eseguirla.

Names Default To Here( 1 );
test = {"a", "b", "c", "d", "e"};
testFin = {};
rows = 2;
remain = Modulo( N Items( test ), rows );
loops = 2 + (remain > 0);
//create a list that groups the original list in groups of 2 (rows)
For( i = 1, i <= loops, i++,
	test2 = {};
	If( i != loops,
		For( j = 1, j <= rows, j++,
			test2[j] = test[1];
			test = Remove( test, 1 );
		)
	,
		For( j = 1, j <= remain, j++,
			test2[j] = test[1];
			test = Remove( test, 1 );
		)
	);
	testFin[i] = test2;
);

cb = {};
cancel_check = 0;
ttp = "lineupBox(ncol(" || Char( N Items( testFin ) ) || "),";
For( k = 1, k <= 2, k++,
	For( i = 1, i <= N Items( testFin ), i++,
		Try( ttp ||= "cb[" || Char( (k - 1) * N Items( testfin ) + i ) || "] =  Check Box(\!"" || testFin[i][k] || "\!")," )
	)
);
ttp = Substr( ttp, 1, Length( ttp ) - 1 ) || ")";

Eval(
	Eval Expr(
		testw = New Window( "raaa",
			<<MODAL></MODAL>

Re: Come analizzare le virgole in una casella di riepilogo

Eviterei Parse() perché può essere un incubo da debuggare e ti insegnerebbe modi orribili di scrivere script JSL. Proverei a fare qualcosa del genere o qualcosa di simile che eviterebbe di usare Parse().

Names Default To Here(1);

test = {"a", "b", "c", "d", "e"};
testFin = {};
rows = 2;
remain = Modulo(N Items(test), rows);
loops = 2 + (remain > 0);

//create a list that groups the original list in groups of 2 (rows)
For(i = 1, i <= loops, i++,
	test2 = {};
	If(i != loops,
		For(j = 1, j <= rows, j++,
			test2[j] = test[1];
			test = Remove(test, 1);
		)
	,
		For(j = 1, j <= remain, j++,
			test2[j] = test[1];
			test = Remove(test, 1);
		)
	);
	testFin[i] = test2;
);

cancel_check = 0;
cbs = {};
hlb = H List Box();
For(i = 1, i <= N Items(testFin), i++,
	hlb << Append(cbs[i] = Check Box(testFin[i]));
);

testw = New Window("raaa",
	<<MODAL></MODAL>