| Ambos lados, revisión anteriorRevisión previaPróxima revisión | Revisión previa |
| introalg:taller07_6 [2007/06/12 09:47] – laura | introalg:taller07_6 [2025/11/15 13:47] (actual) – editor externo 127.0.0.1 |
|---|
| * Agregar //ordenaInsFrec// como un eslabón más a la cadena de funciones ''(frecuencia.(take 1000).partePalabras.leeArchivo) "14765-utf8.txt" '' para obtener en forma creciente la frecuencia de las primeras 1000 palabras de "El Gaucho Martín Fierro". | * Agregar //ordenaInsFrec// como un eslabón más a la cadena de funciones ''(frecuencia.(take 1000).partePalabras.leeArchivo) "14765-utf8.txt" '' para obtener en forma creciente la frecuencia de las primeras 1000 palabras de "El Gaucho Martín Fierro". |
| * Redefinir //ordenaInsFrec// a partir de //insertaOrdFrec// y **//foldr//**. | * Redefinir //ordenaInsFrec// a partir de //insertaOrdFrec// y **//foldr//**. |
| | |
| | |
| |
| |
| Main> :set -u | Main> :set -u |
| Main> (frecuencia''.(take 100).partePalabras.leeArchivo) "14765-utf8.txt" | Main> (frecuencia''.(take 100).partePalabras.leeArchivo) "14765-utf8.txt" |
| ArbolFrec_Nodo ("Palacio.",1) (ArbolFrec_Nodo ("by",3) (ArbolFrec_Nodo ("formatted",1) (ArbolFrec_Nodo ("set",1) (ArbolFrec_Nodo ("www.gutenberg.net",1) ArbolFrec_Nulo (ArbolFrec_Nodo ("this",1) (ArbolFrec_Nodo ("with",2) ... | ArbolFrec_Nodo ("Palacio.",1) (ArbolFrec_Nodo ("by",3) (ArbolFrec_Nodo ("formatted",1) (ArbolFrec_Nodo ("set",1) (ArbolFrec_Nodo ("www.gutenberg.net",1) ArbolFrec_Nulo (ArbolFrec_Nodo ("this",1) (ArbolFrec_Nodo ("with",2) ... |
| |
| ... y esto no se entiende nada! | ... y esto no se entiende nada! |
| [("Palacio.",1),("by",3),("formatted",1),("set",1),("www.gutenberg.net",1), ... | [("Palacio.",1),("by",3),("formatted",1),("set",1),("www.gutenberg.net",1), ... |
| (58403 reductions, 104322 cells) | (58403 reductions, 104322 cells) |
| | |
| |
| Woohoo! | Woohoo! |