yogsototh/clj-ml
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixes incorrect type hinting that was causing the method not to be found

Browse source
This commit is contained in:
Ben Mabey 2011-01-11 13:49:05 -07:00
parent aa4048c580
commit af47246368
1 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
src/clj_ml/data.clj
View file

@ -139,7 +139,9 @@
ik (int (instance-index-attr inst k))]
(if (or (keyword? val) (string? val))
;; this is a nominal entry in keyword or string form
(.setValue inst ik ^String (name val))
(do
(prn {:val val :inst inst :doubles (vec (.toDoubleArray inst)) :ik ik})
(.setValue inst ik ^String (name val)))
(.setValue inst ik (double val))))
;; A double value for the entry
(.setValue inst (int c) (double (first vs)))))
@ -292,9 +294,9 @@ If the class is nominal then the string value (not keyword) is returned."
;; manipulation of instances
(defn instance-set-class
"Sets the index of the class attribute for this instance"
[^Instance instance pos]
(doto instance (.setClassValue (int pos))))
"Sets the value (label) of the class attribute for this instance"
[^Instance instance ^String val]
(doto instance (.setClassValue val)))
(defn instance-get-class
"Get the index of the class attribute for this instance"