list怎么把重复元素提取出来生成另外一个list

mmmmyuitian

如题 比如a=list("1" "1" "2" "2" "2" “3” “4”）  我要怎么得到重复的数值 1和2的list呢

dream

a='("1" "1" "2" "2" "2" "3" "4")
        list1 = list()
        list2 = list()
        foreach(x a
                if((member(x list1) == nil)
                then
                        list1 = cons(x list1)
                else
                        when((member(x list2) == nil)
                                list2 = cons(x list2)
                                )
                        )       
                )
        printf("%L\n" list2)

mmmmyuitian

dream 发表于 2024-1-17 13:58
a='("1" "1" "2" "2" "2" "3" "4")
        list1 = list()
        list2 = list()

感谢

mmmmyuitian

有没有skill可以帮忙检查这种shape 是否重叠

dream

mmmmyuitian 发表于 2024-1-18 10:37
有没有skill可以帮忙检查这种shape 是否重叠

axlShapeMerge返回值不是nil就是重叠的吧

gfdyael

mmmmyuitian 发表于 2024-1-18 10:37
有没有skill可以帮忙检查这种shape 是否重叠

是指哪种重叠，net和net重叠会报DRC的，是说相同位置有两个tab？

mmmmyuitian

gfdyael 发表于 2024-1-18 17:39
是指哪种重叠，net和net重叠会报DRC的，是说相同位置有两个tab？

相同的重叠的两个tab

mmmmyuitian

dream 发表于 2024-1-18 13:14
axlShapeMerge返回值不是nil就是重叠的吧

怎么给到重叠的坐标呢

maome_520

a=list("1" "1" "2" "2" "2" "3" "4"), LstB=nil, Mbr=nil
for(i 1 length(a)
   Mbr=nthelem(i a)
    when(and(length(rexMatchList(strcat("^" Mbr "$") a))>1, member(Mbr  LstB)==nil)
             LstB=append1(LstB Mbr )
     );end when
);end for