0votos

buscador del primer vocal de una palabra en Clojure

por AverageUser hace 11 meses

Entrega todas las vocales de una palabra, no muestra las repetidas, por lo cual la lista resultante es de máximo largo 5

el objetivo es mostrar el primer vocal de una palabra

1
2
3
4
5
6
7
8
9
10
11
12
13
14
(defn vocales-de [palabra] 
  (let [vocales [\a \e \i \o \u]] 
    (filterv #(some (fn [a] (= % a)) vocales) 
             (vec (char-array (clojure.string/lower-case palabra)))))) 
 
;; Pruebas 
;; user=> (vocales-de "Hola Mundo") 
;; [\o \a \u] 
 
;; user=> (first (vocales-de "Hola Mundo")) 
;; \o 
 
;; user=> (first (vocales-de "Amigo")) 
;; \a 

Comenta la solución

Tienes que identificarte para poder publicar tu comentario.