Mathematica - 列表中的StringMatch元素？

我有一個函數從一個匹配特定字符串的表中返回案例。一旦我得到所有匹配這些字符串的案例，我需要搜索每個案例（這是它自己的列表）爲特定的字符串，並執行一個命令。但我知道該怎麼做才能將整個列表的大列表變成一個字符串，然後我只得到一個結果（當我需要每個案例的結果時）。Mathematica - 列表中的StringMatch元素？

[email protected]; 

EncodeTable[id_?PersonnelQ, f___] := 
    Cases[#, 
    x_List /; 
    MemberQ[x, 
    s_String /; 
    StringMatchQ[ 
    s, ("*ah*" | "*bh*" | "*gh*" | "*kf*" | 
     "*mn*"), IgnoreCase -> True]], {1}] &@ 
    Cases[MemoizeTable["PersonnelTable.txt"], {_, id, __}]

該函數從

Which[(StringMatchQ[ 
[email protected] 
    EncodeTable[11282], ("*bh*" | "*ah*" | 
    "*gh*"), IgnoreCase -> True]) == True, 1, 
(StringMatchQ[ 
[email protected] 
    EncodeTable[11282], ("*bh*" | "*ah*" | 
    "*gh*"), IgnoreCase -> True]) == False, 0]

該函數應該返回1或0由第一函數返回每種情況下表返回的情況下，但我不知道如何搜索在列表中不使它們全部爲一個字符串並返回每個列表的結果。

來源

2011-06-30 Rosie

那麼，你可能想要Map，但是很難說沒有看到要操作的數據的結構是什麼。也許你可以提供一個例子。

編輯：在評論，一個例子結果給出

dat = {{204424, 11111, SQLDateTime[{1989, 4, 4, 0, 0, 0.}], Null, 
"Parthom, Mary, MP", Null, 4147, 
"T-00010 AH BH UI", {"T-00010 AH BH UI", "M-14007 LL GG", 
"F-Y3710 AH LL UI GG"}, "REMOVED."}, {2040, 11111, 
SQLDateTime[{1989, 4, 13, 0, 1, 0.}], Null, "KEVIN, Stevens, STK", 
Null, 81238, 
"T-00010 ah gh mn", {"T-00010 mn", "M-00100 dd", "P-02320 sd", 
"M-14003 ed", "T-Y8800 kf", "kj"}}};

（實際的例子有語法錯誤，所以我什麼，我希望是正確的方式固定它）。現在

，如果我定義一個函數

func = Which[(StringMatchQ[#[[8]], ("*bh*" | "*ah*" | "*gh*"), 
    IgnoreCase -> True]) == True, 1, True, 0] &;

（注意要匹配可以被寫爲True第二條件，見Which的文檔），其執行此

func[dat[[1]]] 
(* 
-> 1 
*)

（注我已經稍微改變了func與你有什麼不同，爲了它做我認爲你想要它實際上做）。這可以被應用到dat，其中的元素有你給的形式，如下所示：

Map[func, dat]

（* - > {1,1} *）我不知道這是否是你想要什麼，我做了我最好的猜測。

EDIT2：響應於有關元件的位置的註釋進行匹配是可變的，在這裏是一個辦法：

ClearAll[funcel] 
funcel[p_String] := 
    Which[StringMatchQ[p, ("*bh*" | "*ah*" | "*gh*"), 
    IgnoreCase -> True], 1, True, 0]; 
funcel[___] := 0; 

ClearAll[func]; 
func[lst_List] := Which[MemberQ[Map[funcel, lst], 1], 1, True, 0]

使得

Map[func, dat]

給出{1,1}

來源

2011-06-30 18:38:39 acl

{ {204424,11111，SQLDateTime [{1989,4,4,0,0,0}}，Null，「Parthom，Mary，MP」，Null，4147, 「T-00010 AH BH UI」，{ T-00010 AH BH U I」，「M-14007 LL GG」，「F-Y3710 AH LL UI GG」}，「移除。」}，{2040，11111， SQLDATETIME [{1989，4，13，0，1， 0。}]，Null，「KEVIN，Stevens，STK」， Null，81238, 「T-00010 ah gh mn」，{「T-00010 mn」，「M-00100 dd」，「P-02320 sd」，「M-14003 ed」，「T-Y8800 kf」， kj「}} – Rosie

這將是第一個函數返回的小樣本列表，我只需要每個最後一個結果，以便樣本應該返回兩個結果（例如「1,1」） – Rosie

謝謝！有沒有辦法在多個元素上執行StringMatchQ？像{8,9}？ – Rosie

Mathematica - 列表中的StringMatch元素？

回答

相關問題