Topic: how to count items in a list of lists and make a new list of specifics

[andrew_nao]

sorry in advanced. i didnt know how to proper explain this in a title...
mods feel free to edit it for a better searchable title

i have a list of list.
example
 "abc" "123" "def"
"123" 456" ""
"a1b1" "c2d2" "def"
"123" abc" ""

how can i go thru each item in the list, determine if "def" is in the list
get that list and make a new list of lists

example if "def" is in the list
 "abc" "123" "def"
"a1b1" "c2d2" "def"

[CAB]

Try this:

Code: [Select]

(setq lst '(( "abc" "123" "def")
            ("123" "456" "")
            ("a1b1" "c2d2" "def")
            ("123" "abc" "")))
(setq target "def")
(vl-remove-if 'null (Mapcar '(lambda(x) (if (member target x) x))  lst))

[Keith™]

^+1

[CAB]

Another one.

Code: [Select]

(setq lst '(( "abc" "123" "def")
            ("123" "456" "")
            ("a1b1" "c2d2" "def")
            ("123" "abc" "")))
(setq target "def")
(vl-remove-if-not '(lambda (x) (member target x))  lst)

[andrew_nao]

both work great CAB, thanks

[CAB]

You're welcome.