{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.Comprehend.Types.ClassifierEvaluationMetrics where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
data ClassifierEvaluationMetrics = ClassifierEvaluationMetrics'
{
ClassifierEvaluationMetrics -> Maybe Double
accuracy :: Prelude.Maybe Prelude.Double,
ClassifierEvaluationMetrics -> Maybe Double
f1Score :: Prelude.Maybe Prelude.Double,
ClassifierEvaluationMetrics -> Maybe Double
hammingLoss :: Prelude.Maybe Prelude.Double,
ClassifierEvaluationMetrics -> Maybe Double
microF1Score :: Prelude.Maybe Prelude.Double,
ClassifierEvaluationMetrics -> Maybe Double
microPrecision :: Prelude.Maybe Prelude.Double,
ClassifierEvaluationMetrics -> Maybe Double
microRecall :: Prelude.Maybe Prelude.Double,
ClassifierEvaluationMetrics -> Maybe Double
precision :: Prelude.Maybe Prelude.Double,
ClassifierEvaluationMetrics -> Maybe Double
recall :: Prelude.Maybe Prelude.Double
}
deriving (ClassifierEvaluationMetrics -> ClassifierEvaluationMetrics -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ClassifierEvaluationMetrics -> ClassifierEvaluationMetrics -> Bool
$c/= :: ClassifierEvaluationMetrics -> ClassifierEvaluationMetrics -> Bool
== :: ClassifierEvaluationMetrics -> ClassifierEvaluationMetrics -> Bool
$c== :: ClassifierEvaluationMetrics -> ClassifierEvaluationMetrics -> Bool
Prelude.Eq, ReadPrec [ClassifierEvaluationMetrics]
ReadPrec ClassifierEvaluationMetrics
Int -> ReadS ClassifierEvaluationMetrics
ReadS [ClassifierEvaluationMetrics]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ClassifierEvaluationMetrics]
$creadListPrec :: ReadPrec [ClassifierEvaluationMetrics]
readPrec :: ReadPrec ClassifierEvaluationMetrics
$creadPrec :: ReadPrec ClassifierEvaluationMetrics
readList :: ReadS [ClassifierEvaluationMetrics]
$creadList :: ReadS [ClassifierEvaluationMetrics]
readsPrec :: Int -> ReadS ClassifierEvaluationMetrics
$creadsPrec :: Int -> ReadS ClassifierEvaluationMetrics
Prelude.Read, Int -> ClassifierEvaluationMetrics -> ShowS
[ClassifierEvaluationMetrics] -> ShowS
ClassifierEvaluationMetrics -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ClassifierEvaluationMetrics] -> ShowS
$cshowList :: [ClassifierEvaluationMetrics] -> ShowS
show :: ClassifierEvaluationMetrics -> String
$cshow :: ClassifierEvaluationMetrics -> String
showsPrec :: Int -> ClassifierEvaluationMetrics -> ShowS
$cshowsPrec :: Int -> ClassifierEvaluationMetrics -> ShowS
Prelude.Show, forall x.
Rep ClassifierEvaluationMetrics x -> ClassifierEvaluationMetrics
forall x.
ClassifierEvaluationMetrics -> Rep ClassifierEvaluationMetrics x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ClassifierEvaluationMetrics x -> ClassifierEvaluationMetrics
$cfrom :: forall x.
ClassifierEvaluationMetrics -> Rep ClassifierEvaluationMetrics x
Prelude.Generic)
newClassifierEvaluationMetrics ::
ClassifierEvaluationMetrics
newClassifierEvaluationMetrics :: ClassifierEvaluationMetrics
newClassifierEvaluationMetrics =
ClassifierEvaluationMetrics'
{ $sel:accuracy:ClassifierEvaluationMetrics' :: Maybe Double
accuracy =
forall a. Maybe a
Prelude.Nothing,
$sel:f1Score:ClassifierEvaluationMetrics' :: Maybe Double
f1Score = forall a. Maybe a
Prelude.Nothing,
$sel:hammingLoss:ClassifierEvaluationMetrics' :: Maybe Double
hammingLoss = forall a. Maybe a
Prelude.Nothing,
$sel:microF1Score:ClassifierEvaluationMetrics' :: Maybe Double
microF1Score = forall a. Maybe a
Prelude.Nothing,
$sel:microPrecision:ClassifierEvaluationMetrics' :: Maybe Double
microPrecision = forall a. Maybe a
Prelude.Nothing,
$sel:microRecall:ClassifierEvaluationMetrics' :: Maybe Double
microRecall = forall a. Maybe a
Prelude.Nothing,
$sel:precision:ClassifierEvaluationMetrics' :: Maybe Double
precision = forall a. Maybe a
Prelude.Nothing,
$sel:recall:ClassifierEvaluationMetrics' :: Maybe Double
recall = forall a. Maybe a
Prelude.Nothing
}
classifierEvaluationMetrics_accuracy :: Lens.Lens' ClassifierEvaluationMetrics (Prelude.Maybe Prelude.Double)
classifierEvaluationMetrics_accuracy :: Lens' ClassifierEvaluationMetrics (Maybe Double)
classifierEvaluationMetrics_accuracy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ClassifierEvaluationMetrics' {Maybe Double
accuracy :: Maybe Double
$sel:accuracy:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
accuracy} -> Maybe Double
accuracy) (\s :: ClassifierEvaluationMetrics
s@ClassifierEvaluationMetrics' {} Maybe Double
a -> ClassifierEvaluationMetrics
s {$sel:accuracy:ClassifierEvaluationMetrics' :: Maybe Double
accuracy = Maybe Double
a} :: ClassifierEvaluationMetrics)
classifierEvaluationMetrics_f1Score :: Lens.Lens' ClassifierEvaluationMetrics (Prelude.Maybe Prelude.Double)
classifierEvaluationMetrics_f1Score :: Lens' ClassifierEvaluationMetrics (Maybe Double)
classifierEvaluationMetrics_f1Score = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ClassifierEvaluationMetrics' {Maybe Double
f1Score :: Maybe Double
$sel:f1Score:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
f1Score} -> Maybe Double
f1Score) (\s :: ClassifierEvaluationMetrics
s@ClassifierEvaluationMetrics' {} Maybe Double
a -> ClassifierEvaluationMetrics
s {$sel:f1Score:ClassifierEvaluationMetrics' :: Maybe Double
f1Score = Maybe Double
a} :: ClassifierEvaluationMetrics)
classifierEvaluationMetrics_hammingLoss :: Lens.Lens' ClassifierEvaluationMetrics (Prelude.Maybe Prelude.Double)
classifierEvaluationMetrics_hammingLoss :: Lens' ClassifierEvaluationMetrics (Maybe Double)
classifierEvaluationMetrics_hammingLoss = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ClassifierEvaluationMetrics' {Maybe Double
hammingLoss :: Maybe Double
$sel:hammingLoss:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
hammingLoss} -> Maybe Double
hammingLoss) (\s :: ClassifierEvaluationMetrics
s@ClassifierEvaluationMetrics' {} Maybe Double
a -> ClassifierEvaluationMetrics
s {$sel:hammingLoss:ClassifierEvaluationMetrics' :: Maybe Double
hammingLoss = Maybe Double
a} :: ClassifierEvaluationMetrics)
classifierEvaluationMetrics_microF1Score :: Lens.Lens' ClassifierEvaluationMetrics (Prelude.Maybe Prelude.Double)
classifierEvaluationMetrics_microF1Score :: Lens' ClassifierEvaluationMetrics (Maybe Double)
classifierEvaluationMetrics_microF1Score = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ClassifierEvaluationMetrics' {Maybe Double
microF1Score :: Maybe Double
$sel:microF1Score:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
microF1Score} -> Maybe Double
microF1Score) (\s :: ClassifierEvaluationMetrics
s@ClassifierEvaluationMetrics' {} Maybe Double
a -> ClassifierEvaluationMetrics
s {$sel:microF1Score:ClassifierEvaluationMetrics' :: Maybe Double
microF1Score = Maybe Double
a} :: ClassifierEvaluationMetrics)
classifierEvaluationMetrics_microPrecision :: Lens.Lens' ClassifierEvaluationMetrics (Prelude.Maybe Prelude.Double)
classifierEvaluationMetrics_microPrecision :: Lens' ClassifierEvaluationMetrics (Maybe Double)
classifierEvaluationMetrics_microPrecision = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ClassifierEvaluationMetrics' {Maybe Double
microPrecision :: Maybe Double
$sel:microPrecision:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
microPrecision} -> Maybe Double
microPrecision) (\s :: ClassifierEvaluationMetrics
s@ClassifierEvaluationMetrics' {} Maybe Double
a -> ClassifierEvaluationMetrics
s {$sel:microPrecision:ClassifierEvaluationMetrics' :: Maybe Double
microPrecision = Maybe Double
a} :: ClassifierEvaluationMetrics)
classifierEvaluationMetrics_microRecall :: Lens.Lens' ClassifierEvaluationMetrics (Prelude.Maybe Prelude.Double)
classifierEvaluationMetrics_microRecall :: Lens' ClassifierEvaluationMetrics (Maybe Double)
classifierEvaluationMetrics_microRecall = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ClassifierEvaluationMetrics' {Maybe Double
microRecall :: Maybe Double
$sel:microRecall:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
microRecall} -> Maybe Double
microRecall) (\s :: ClassifierEvaluationMetrics
s@ClassifierEvaluationMetrics' {} Maybe Double
a -> ClassifierEvaluationMetrics
s {$sel:microRecall:ClassifierEvaluationMetrics' :: Maybe Double
microRecall = Maybe Double
a} :: ClassifierEvaluationMetrics)
classifierEvaluationMetrics_precision :: Lens.Lens' ClassifierEvaluationMetrics (Prelude.Maybe Prelude.Double)
classifierEvaluationMetrics_precision :: Lens' ClassifierEvaluationMetrics (Maybe Double)
classifierEvaluationMetrics_precision = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ClassifierEvaluationMetrics' {Maybe Double
precision :: Maybe Double
$sel:precision:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
precision} -> Maybe Double
precision) (\s :: ClassifierEvaluationMetrics
s@ClassifierEvaluationMetrics' {} Maybe Double
a -> ClassifierEvaluationMetrics
s {$sel:precision:ClassifierEvaluationMetrics' :: Maybe Double
precision = Maybe Double
a} :: ClassifierEvaluationMetrics)
classifierEvaluationMetrics_recall :: Lens.Lens' ClassifierEvaluationMetrics (Prelude.Maybe Prelude.Double)
classifierEvaluationMetrics_recall :: Lens' ClassifierEvaluationMetrics (Maybe Double)
classifierEvaluationMetrics_recall = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ClassifierEvaluationMetrics' {Maybe Double
recall :: Maybe Double
$sel:recall:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
recall} -> Maybe Double
recall) (\s :: ClassifierEvaluationMetrics
s@ClassifierEvaluationMetrics' {} Maybe Double
a -> ClassifierEvaluationMetrics
s {$sel:recall:ClassifierEvaluationMetrics' :: Maybe Double
recall = Maybe Double
a} :: ClassifierEvaluationMetrics)
instance Data.FromJSON ClassifierEvaluationMetrics where
parseJSON :: Value -> Parser ClassifierEvaluationMetrics
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"ClassifierEvaluationMetrics"
( \Object
x ->
Maybe Double
-> Maybe Double
-> Maybe Double
-> Maybe Double
-> Maybe Double
-> Maybe Double
-> Maybe Double
-> Maybe Double
-> ClassifierEvaluationMetrics
ClassifierEvaluationMetrics'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Accuracy")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"F1Score")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"HammingLoss")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"MicroF1Score")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"MicroPrecision")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"MicroRecall")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Precision")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Recall")
)
instance Prelude.Hashable ClassifierEvaluationMetrics where
hashWithSalt :: Int -> ClassifierEvaluationMetrics -> Int
hashWithSalt Int
_salt ClassifierEvaluationMetrics' {Maybe Double
recall :: Maybe Double
precision :: Maybe Double
microRecall :: Maybe Double
microPrecision :: Maybe Double
microF1Score :: Maybe Double
hammingLoss :: Maybe Double
f1Score :: Maybe Double
accuracy :: Maybe Double
$sel:recall:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
$sel:precision:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
$sel:microRecall:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
$sel:microPrecision:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
$sel:microF1Score:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
$sel:hammingLoss:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
$sel:f1Score:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
$sel:accuracy:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Double
accuracy
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Double
f1Score
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Double
hammingLoss
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Double
microF1Score
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Double
microPrecision
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Double
microRecall
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Double
precision
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Double
recall
instance Prelude.NFData ClassifierEvaluationMetrics where
rnf :: ClassifierEvaluationMetrics -> ()
rnf ClassifierEvaluationMetrics' {Maybe Double
recall :: Maybe Double
precision :: Maybe Double
microRecall :: Maybe Double
microPrecision :: Maybe Double
microF1Score :: Maybe Double
hammingLoss :: Maybe Double
f1Score :: Maybe Double
accuracy :: Maybe Double
$sel:recall:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
$sel:precision:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
$sel:microRecall:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
$sel:microPrecision:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
$sel:microF1Score:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
$sel:hammingLoss:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
$sel:f1Score:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
$sel:accuracy:ClassifierEvaluationMetrics' :: ClassifierEvaluationMetrics -> Maybe Double
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Double
accuracy
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Double
f1Score
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Double
hammingLoss
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Double
microF1Score
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Double
microPrecision
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Double
microRecall
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Double
precision
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Double
recall