import HLearn.Models.Distributions import HLearn.Algebra.Models.HomTrainer dataset = [1,2,3,4,5,6] dist = train dataset :: Normal Integer Integer -- 引用元: http://izbicki.me/blog/functors-and-monads-for-analyzing-data -- いろいろな色のビー玉の定義 data Marble = Red | Pink | Green | Blue | White deriving (Read,Show,Eq,Ord) bagOfMarbles = [ Pink,Green,Red,Blue,Green,Red,Green,Pink,Blue,White ] -- カテゴリーデータ(このカテゴリーと