Múltiples argumentos para mapcar

Question

Estoy seguro de que esta es una pregunta para principiantes en lisp, ya que estoy recién aprendiendo el idioma.

Tengo una función en clisp llamada count. Cuenta la cantidad de veces que aparece un átomo en una lista. Lo que me gustaría hacer es poder contar cuentas varias veces con diferentes parámetros, pero la misma lista para buscar. Por ejemplo, me gustaría contar el número de 'A, 'B y 'C hipotéticamente en la lista. Tenía la esperanza de que pudiera hacer algo como esto:

(mapcar 'count '(A B C) myList) 

que he descubierto que esto no funciona porque cada uno de los elementos en '(A B C) se están emparejados con sólo uno de los elementos en miLista. ¿Cuál es la forma idiomática apropiada para aplicar una función con un parámetro de entrada adicional a cada elemento en una lista? Para aclarar más, me gustaría poder tomar '(A B C) y '(A A B C C C) como entrada y producir (2 1 3).

Answer 1

llamar a la función count repetidamente con cada elemento de una lista (A B C), cada vez que contar elementos que coincidan con la misma secuencia mylist:

(mapcar (lambda (x) (count x mylist)) '(A B C))