src/Data/Gargantext/Ngrams/TFICF.hs

   1 module Data.Gargantext.Ngrams.TFICF where
   2
   3
   4
   5 data TFICF = TFICF { _tficfTerms    :: Text
   6                    , _tficfContext1 :: Context
   7                    , _tficfContext2 :: Context
   8                    , _tficfScore    :: Maybe Double
   9                    } deriving (Read, Show, Generics)
  10
  11
  12 tfidf :: Text -> TFICF
  13 tfidf txt = TFICF txt Document Corpus score
  14     where
  15         score = Nothing
  16