program, ki ti najde vse kombinacije črk oz. številk, ki mu jih podaš

Zadeva deluje. Bom razložil bolj počasi :).
Najprej iz povezave zgoraj skopiraš datoteko z besedami iz slovenskega slovarja in to v isti direktorij kjer imaš exe. program. Zaženeš program in v spodnje okno (kjer prej izbrišeš napisan tekst) vpišeš ime slovarja (original je file2.txt) in klikneš tipko Naloži. Počakaš par sekund in pod zgornji gumbom Išče dobiš napisano koliko besed se je naložilo (meni 1.165.852). Nato vpišeš besedo v okno nad gumbom Išči in pritisneš gumb Išči. V velikem oknu se izpišejo besede/premetanke iz slovenskega slovarja.

Moj post od davi.

A lahko kdo to posodobi? :)

Ima še mogoče kdo ta program in ga lahko uploada?

Najlepša hvala

LP

vilonja je 10. jul 2014 ob 14:36 izjavil:

Na katerem linku si pa dobil slovar, ker je vec linkov

Lahko mogoče program uploadaš ?

Najlepša Hvala

Še v mojem najljubšem lispu. To se samo vidi, kako nepotrebna je vsa ta C-jevska solata zgoraj. Lispi se mi zdijo najbolj ekspresivni jeziki, v katerih se da povedati veliko z zelo malo kode. No, potem so še logični jeziki. V kakšnem prologu bi bile rešitve še krajše.

(defn rotations [a-seq]
  (rest (map concat (tails a-seq) (inits a-seq))))

(defn permutations [a-set]
  (if (empty? a-set)
    (list ())
    (mapcat
     (fn [[x & xs]] (map #(cons x %) (permutations xs)))
     (rotations a-set))))

Linki iz dropboxa ne delajo več.

iskalnik
https://gofile.io/d/QgyPcL

Whata? Najprej pretvoriš izraze slovarja v sortirano zaporedje znakov, isto velja za iskano besedo in potem imaš direktne matche, zakaj hudiča permutacije, kaj če imaš dolgo besedo - dialektičnomaterialističen - to bi vi delali 26! (pač, odvisno od ponavljajočih se znakov, ja, drži, kripto mesi) permutacij? Čemu?

A s temi prsti (mindsetom) vi prodajate svetovalne storitve ali kaj?
Kar se mene tiče, odpoved, veljavna takoj.

Spura je 14. sep 2021 ob 14:25 izjavil:

mr_chai je 14. sep 2021 ob 01:15 izjavil:

Še v mojem najljubšem lispu. To se samo vidi, kako nepotrebna je vsa ta C-jevska solata zgoraj. Lispi se mi zdijo najbolj ekspresivni jeziki, v katerih se da povedati veliko z zelo malo kode. No, potem so še logični jeziki. V kakšnem prologu bi bile rešitve še krajše.

 (defn rotations [a-seq]
 (rest (map concat (tails a-seq) (inits a-seq))))
 
 (defn permutations [a-set]
 (if (empty? a-set)
 (list ())
 (mapcat
 (fn [[x & xs]] (map #(cons x %) (permutations xs)))
 (rotations a-set))))
 

Ti manjkata se tails in inits funkciji. To je tona kode, in 4 funkcije ko lahko naredis preprosto:

 (defn permutations
 [items]
 (for [i (range (count items))
 :let [[lead [x & tail]] (split-at i items)]
 p (or (seq (permutations (concat lead tail))) [[]])]
 (conj p x)))
 

Sem sam kopiral iz stackexchange-a, drugače bi naredil nekaj podobnega. Imaš pa samo en problem, concat ni glih optimalna rešitev v kombinaciji z lazy sequenci. boljše bi bilo namesto (concat lead tail) uporabiti (into lead tail). Source: https://stuartsierra.com/2015/04/26/clo...

7982884e je 14. sep 2021 ob 18:34 izjavil:

najboljsa stvar teh akademskih jezikov je, kako neprimerljiva je navdusenost njihovih avtorjev napram prakticni uporabnosti (beri: berljivost) (da o casovni kompleksnosti ne govorim).

kotlin (pragmaticen moderen jezik):

 
 fun main() { 
 val set = setOf("ena", "dva", "vojna", "javno")
 
 val mapped = set.groupBy { it.sortedKey() }
 
 println("Slovar: ${mapped.map { "${it.key}: ${it.value.joinToString()}" }.joinToString()}")
 
 val new = "vnoaj"
 
 val matching = mapped[new.sortedKey()]
 
 println("Ustrezajoce: ${matching?.joinToString() ?: "-"}")
 }
 
 fun String.sortedKey() = toCharArray().sorted().joinToString("")
 
 

(ne bom rekel da so println vrstice to, kar bi pisal v produkcijski kodi (ker je grdo), ampak ok.)

Ne razumem kaj hočeš povedati. Clojure ni akademski jezik, je zelo pragmatičen in uporaben.

Primer tvoje kode v CLojureju.

(def dict
  (group-by set ["ena" "dva" "vojna" "javno"]))

(get dict (set "ajnov")) 

Ampak nočem pretiravat o tem, da je koda krajša, mogoče je, mogoče ni. Verjamem, da se da tudi v Kotlinu kaj zelo na kratko, saj vendar tudi podpira funkcijsko programiranje. Glavni point Clojureja je drugje, built in persistenčne podatkovne strukture, REPL driven development..To so dve strani IMHO največji plus jezika in pa seveda forsiranje funkcijskega programiranja.