19 lines
598 B
Factor
19 lines
598 B
Factor
|
! Copyright (C) 2012 Doug Coleman.
|
||
|
|
! See http://factorcode.org/license.txt for BSD license.
|
||
|
|
USING: accessors fry kernel locals machine-learning.transformer
|
||
|
|
math.extras sequences sets sorting ;
|
||
|
|
IN: machine-learning.label-encoder
|
||
|
|
|
||
|
|
TUPLE: label-encoder classes_ ;
|
||
|
|
|
||
|
|
: <label-encoder> ( -- le ) label-encoder new ; inline
|
||
|
|
|
||
|
|
M: label-encoder fit-y ( y transformer -- )
|
||
|
|
[ members natural-sort ] dip classes_<< ;
|
||
|
|
|
||
|
|
M: label-encoder transform-y ( y transformer -- y' )
|
||
|
|
classes_>> '[ _ search-sorted ] map ;
|
||
|
|
|
||
|
|
M: label-encoder inverse-transform-y ( y' transformer -- y )
|
||
|
|
classes_>> '[ _ nth ] map ;
|