Ri: Operazioni arbitrarie (funzioni ecc.) su ciascun elemento in un elencoSe il tuo caso è così, potresti evitare di eseguire il ciclo almeno per la trasformazione utilizzando Parse() (sebbene potrebbe essere più veloce eseguire il ciclo della stringa).
Names Default To Here(1);<BR />str = "120, 130, 160, 120, 300, 200";
numList = Parse("{" || str ||"}");
Show(numList[1], numList[2]);Come tabella dati:
Names Default To Here(1);
dt = New Table("Untitled",
Add Rows(12),
Compress File When Saved(1),
New Column("Column 1",
Character,
"Nominal",
Set Values(
{"120, 130, 160, 120, 300, 200", "120, 130, 160, 120, 300, 200",
"120, 130, 160, 120, 300, 200", "120, 130, 160, 120, 300, 200",
"120, 130, 160, 120, 300, 200", "120, 130, 160, 120, 300, 200",
"120, 130, 160, 120, 300, 200", "120, 130, 160, 120, 300, 200",
"120, 130, 160, 120, 300, 200", "120, 130, 160, 120, 300, 200",
"120, 130, 160, 120, 300, 200", "120, 130, 160, 120, 300, 200"}
)
)
);
dt << New Column("numlist", Expression, << set each value(Parse("{" || :Column 1|| "}")));
numListList = dt:numList << get as matrix;
Show(numListList, numListList[1], numListList[1][1]);Ri: Operazioni arbitrarie (funzioni ecc.) su ciascun elemento in un elencoGrazie ragazzi!
Questo e spettacolare.
In realtà ho trovato JMP16 nella nostra intranet, il dipartimento IT ha detto che stavano solo preparando le istruzioni di installazione e rilasciandolo ufficialmente. Quindi sono andato avanti e l'ho installato comunque.
I miei compiti effettivi erano (erano) un po' più complicati, ad esempio, in un caso avevo un elenco di stringhe di tipo
"120, 130, 160, 120, 300, 200"
I dati effettivi sarebbero una colonna con ogni riga con quel tipo di stringa (solo molto più lunga)
Avevo bisogno di trasformarlo in un elenco di elenchi di numeri. Quindi avevo bisogno di leggere quella colonna in un elenco iniziale, quindi applicare Words () su questo elenco iniziale per ottenere un elenco di elenchi di stringhe e quindi Num () per ottenere ogni stringa in un numero. Ciò significa due cicli nidificati.
Per ora l'ho fatto con due cicli For Each, ma fammi esaminare i suggerimenti che hai pubblicato qui. Non sono mai riuscito a comprendere Expr() - credo di dovergli dare un'altra possibilità.
Grazie!
Ri: Operazioni arbitrarie (funzioni ecc.) su ciascun elemento in un elenco@migello ,
@jthi ti ha dato ottime risposte (Complimenti).Anch'io ero così entusiasta della funzione TransformEach di JMP 16.
Di seguito è riportata una parte modificata di uno script scritto per versioni molto precedenti di JMP e pubblicato per JMP13. Molti dei miei ex colleghi usavano la funzione LFUNC (il nome è l'abbreviazione di list function).Il nome JMP 16 "TransformEach" e la sintassi sono così buoni. Tuttavia, se uno qualsiasi degli elementi dell'elenco è del tipo errato per la trasformazione specificata, viene restituito solo un errore... una funzione Try() può risolverlo.
Quindi Just In Case questo potrebbe essere di qualche utilità fino ad arrivare a JMP 16, lo sto postando.Basta salvare la parte di codice della definizione della funzione in un file e utilizzare Include() in qualsiasi script di cui hai bisogno.
// JSL Companion: Applications of the JMP Scripting Language
// Title: JSLC_CustomListFunctions.jsl
// Version: Windows JMP® 13.2.0
// Purpose: Provides examples of writing user functions.
/*Notes:
These functions are provided for learning as well as utility.
See Chapter 5 and 5_Extra_CustomListFunctions.jsl");
The script will define 2 functions. After each is a comment
block /*: Usage & Test examples ... --- end Test*/. Remove
The comment block and run the examples one line at a time. Open
the embedded log or have the log window visible to see
the results.
Motivation:
As seen in Chapter 5, a numeric function on a single layer
list of numbers, or a vector, or a matrix, will return the
same object with the function applied to each item. For example,
xx = Sqrt({1,2,3,4,9}); //xx = {1, 1.4142135623731, 1.73205080756888, 2, 3}
We have suggested that the same apply to String functions (that operate
on a single item) on a list of text. What we would like is
xx = Substr({"Quaker", "Minnesota", "Nebraska"}, 1,1); would return
xx = {"Q", "M", "N"}. However, currently most JMP String functions do not
allow list agruments.
Functions defined here, are:
- LFunc( mylist, expr); where expression is like expr(Substr(x,1,1)).
{LIKE function notes removed}
LFunc can save writing for-loops, Like save looking up the REGEX syntax.
*/
//------LFunc-------------------------------------------------------------------
Lfunc = Function( {xList, fExpr/*ex. Expr(Contains(x,"h"))*/},
{x = {}, i = 1, errCode = 0, errStr = "\!NError bad argument", newExpr},
If( !Is List( xList ),
errCode = 1
);
If(
Type( Name Expr( fExpr ) ) == "Name",
//if Name then JMP does not recognize the function
tmp = Trim( Char( Name Expr( fExpr ) ) );
//extract the function and check if it is contained in the global namespace, if not error!
If( Namespace( "global" ) << Contains( Word( 1, tmp, ":(" ) ) == 0,
errCode = errCode + 2
);,
Type( Name Expr( fExpr ) ) != "Expression", errCode = errCode + 2
);
//catches typos, returns Name if not a valid function
//catches typos, returns Name if not a valid function
If( !Is Expr( Name Expr( fExpr ) ),
errCode = errCode + 2
); //catches syntax
If(
!errCode,
For( i = 1, i <= N Items( xList ), i++,
newExpr = Substitute( Name Expr( fExpr ), Expr( x ), xList[i] );
Insert Into( x, Try( newExpr, Empty() ) );
),
errCode == 1, Write( errStr || "(1) not a list \!N" ),
errCode == 2, Write( errStr || "(2) not a valid expression \!N" ),
errCode == 3, Write( errStr || "s (1) is not a list and (2) is not a valid expression \!N" )
);
x//return x
;
); //End Lfunc
//------------------------------------------------------------------------------
//Usage & Test ...remove the slash asterisk and run in segments, results are in the log
//------------------------------------------------------------------------------
myList1={"john", "harry", "huh","ah ha", "xyx", , "a", "h", 7, [1,7]};
/* example below returns a list of numeric values, one value for each item in the list
n =>1st location of h, 0 => does not contain "h", Empty() => the item is not
a valid argument for that expression.
*/
zz1 = Lfunc(myList1,Expr(Contains(x,"h")));
show(zz1);
myList2={"john", "harry", "huh","ah ha", "xyx", , "a", "h"};
zz2=Lfunc(myList2, Expr(Uppercase(x)));
show(zz2);
//-----------------------------------------------------------------------------------------
/* returns a list of how many words are in each string
[] -> no occurrences
Empty() => the expression is not valid for that item.
*/
zz3 = Lfunc(mylist2, expr(nitems(words(x))));
show(zz3);
//-----------------------------------------------------------------------------------------
/* This specified function requires numeric arguments
Empty() => the expression is not valid for that item.
A numeric function applied to a matrix returns a matrix
of the results applied on each element in the matrix.
Only the last 2 items are valid arguments for Log()
*/
zz4 = Lfunc(mylist1, expr(log(x)));
show(zz4);
//----------------Error Checking---------------------------------------------------------------
/* Uncomment the code below to show the error capture and reporting */
//zz = Lfunc("oh johhny", Expr(Contains(x,"h")) ); //not a list
//zz = Lfunc({"oh johhny"}, Expr(Contians(x,"h")) ); //type not a valid expr due to typo
//zz = Lfunc("oh johhny", Expr(Contians(x,"h")) ); //not a list and not a valid expr
Ri: Operazioni arbitrarie (funzioni ecc.) su ciascun elemento in un elencoCome avrai già notato, JMP16 ti aiuterà con For Each e Transform Each. Se devi farlo molte volte, forse potresti creare funzioni personalizzate per eseguire le attività?
Names Default To Here(1);
charToNum = function({tempList}, {Default Local},
newList = {};
For(i = 1, i <= N Items(tempList), i++,
newList[i] = Num(tempList[i]);
);
return(newList);
);
a = {"1", "2"};
b = charToNum(a);
show(b);
Modificare:
Puoi anche creare funzioni più complicate che potrebbero gestire diverse trasformazioni. Molto probabilmente sarà eccessivo e non lo consiglierei davvero (creerei solo funzioni diverse per trasformazioni diverse).
Ecco un esempio di come potrebbe essere fatto:
Names Default To Here(1);
transformList = function({tempList, transformExpression}, {Default Local},
newList = {};
For(i = 1, i <= N Items(tempList), i++,
val = tempList[i];
newList[i] = transformExpression
);
return(newList);
);
a = {"1", "2", "100"};
b = transformList(a, Expr(Num(val)));
c = transformList(b, Expr(Multiply(val, 10)));
d = transformList(c, Expr(Char(val)));
Show(a,b,c,d);
//can also use custom functions with transformList
padZero = function({tempValue}, {Default Local},
if(Length(tempValue) < 2,
tempValue = "0" || tempValue;
);
return(tempValue)
);
e = transformList(a, Expr(padZero(val)));
Show(e);
f = transformList(e, Expr(Length(val)));
Show(f);
Operazioni arbitrarie (funzioni ecc.) su ciascun elemento in un elencoEsiste un modo più semplice per applicare la stessa funzione a ciascun elemento di un elenco piuttosto che scorrere un elenco?
Per esempio:
stringlist = {"1", "2"};
numericlist = {};
for (i = 1, i<=N Items(stringlist), i++,
numericlist[i] = Num(stringlist[i])
);
show(numericlist);C'è qualcosa di più semplice, qualcosa come dire semplicemente:
numericlist = Num(stringlist);
ma questo ovviamente non funziona. Ogni altro modo?
PS Ho appena trovato la nuova funzione For Each in JMP 16, purtroppo sono ancora su JMP 15
Consumatori e ricerche di mercatoProgettazione di esperimentiQualità e ingegneria di processo
