713323_zh-CN

liliconcom

如何从另一个列表中提取列表中的项目，并与第三个列表中的项目部分匹配？

我有以下列表

 

bigList  = {"CD_CORN_1", "ICS_CORN_6", "IPEK21_S00R_P37_2", "CURR_S009_P37_2", "CD_CORN_2", "Ig_RF", "Cmax03_4C230RF", "NG"};
smallList1  = {"CD_CORN_", "CD_CORN_", "CD_CORN_"}; //note these are repeats and that is how I get them
smallList2  = {"IDS_CORN_", "IPEK21_S00R_", "CURR_S009_"};
smallList3  = {"RF", "IPEK21_S00R_", "CURR_S009_", "NG"};

使用大名单和小列表1 ，我想得到

 

 

sbigList1  = {"CD_CORN_1", "CD_CORN_2"};

 

使用大名单和小列表2 ，我想得到

sbigList2  = {"ICS_CORN_6", "IPEK21_S00R_P37_2", "CURR_S009_P37_2"};

使用大名单和小列表3 ，我想得到

sbigList3  = {"IPEK21_S00R_P37_2", "CURR_S009_P37_2", "Ig_RF", "Cmax03_4C230RF", "NG"};

如何通过 JSL 执行此操作？

（sbiglist 中项目的顺序并不重要）

 

自动化和脚本编写视窗回复：如何从另一个列表中提取列表中的项目，并与第三个列表中的项目部分匹配？

我将这样做

Names default to here(1);
bigList  = {"CD_CORN_1", "ICS_CORN_6", "IPEK21_S00R_P37_2", "CURR_S009_P37_2", "CD_CORN_2", "Ig_RF", "Cmax03_4C230RF", "NG"};
smallList1  = {"CD_CORN_"}; //note these are repeats and that is how I get them
smallList2  = {"IDS_CORN_", "IPEK21_S00R_", "CURR_S009_"};
smallList3  = {"RF", "IPEK21_S00R_", "CURR_S009_", "NG"};

foundList = {};

For Each( {theList}, bigList,
 For Each( {sublist}, smallList1,
  if(contains(theList,sublist),
   insert into(foundlist, theList)
  )
 );
 For Each( {sublist}, smallList2,
  if(contains(theList,sublist),
   insert into(foundlist, theList)
  )
 );
 For Each( {sublist}, smallList3,
  if(contains(theList,sublist),
   insert into(foundlist, theList)
  )
 );
);

bigList 的每个单独元素都必须单独评估。

回复：如何从另一个列表中提取列表中的项目，并与第三个列表中的项目部分匹配？

我很可能会为这样的事情创建一个函数

Names Default To Here(1);

bigList = {"CD_CORN_1", "ICS_CORN_6", "IPEK21_S00R_P37_2", "CURR_S009_P37_2", "CD_CORN_2", "Ig_RF", "Cmax03_4C230RF", "NG"};
smallList1 = {"CD_CORN_", "CD_CORN_", "CD_CORN_"};
smallList2 = {"IDS_CORN_", "IPEK21_S00R_", "CURR_S009_"};
smallList3 = {"RF", "IPEK21_S00R_", "CURR_S009_", "NG"};

get_partial_matches = function({to_list, with_list}, {Default Local},
 /*""" Get partial matches to_list using with_list
 
 Args:
  from_list (list(str)): list to compare to
  to_list (list(str)): list to compare with
 
 Returns:
  list(str): List with partial matches in alphabetical order
 """*/
 
 matches = Associative Array(); // associative array to avoid duplicates
 
 For Each({to_item}, to_list,
  For Each({with_item}, with_list,
   If(Contains(to_item, with_item),
    Insert Into(matches, to_item);
   );
  );
 );
 
 return(matches << get keys); // << get keys to get result in a list
);

list1 = get_partial_matches(bigList, smallList1);
list2 = get_partial_matches(bigList, smallList2);
list3 = get_partial_matches(bigList, smallList3);

show(list1, list2, list3);

其他选项是这样的，但我更愿意使用较早的选项

get_partial_matches2 = function({to_list, with_list}, {Default Local}, 
 
 matches = Associative Array(); 
 pattern = Concat Items(with_list, "|");
 
 For Each({to_item}, to_list,
  res = Regex(to_item, pattern);
  If(!IsMissing(res),
   Insert Into(matches, to_item);
  );
 );
 
 return(matches << get keys);
);

list1 = get_partial_matches2(bigList, smallList1);
list2 = get_partial_matches2(bigList, smallList2);
list3 = get_partial_matches2(bigList, smallList3);

show(list1, list2, list3);