0votos

buscador del primer vocal de una palabra en Clojure

por AverageUser hace 1 año

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.