R3BNeulandMultiplicityBayesPar.cxx

Go to the documentation of this file.

/******************************************************************************
 *   Copyright (C) 2019 GSI Helmholtzzentrum für Schwerionenforschung GmbH    *
 *   Copyright (C) 2019-2025 Members of R3B Collaboration                     *
 *                                                                            *
 *             This software is distributed under the terms of the            *
 *                 GNU General Public Licence (GPL) version 3,                *
 *                    copied verbatim in the file "LICENSE".                  *
 *                                                                            *
 * In applying this license GSI does not waive the privileges and immunities  *
 * granted to it by virtue of its status as an Intergovernmental Organization *
 * or submit itself to any jurisdiction.                                      *
 ******************************************************************************/
 
#include "R3BNeulandMultiplicityBayesPar.h"
#include "R3BNeulandMultiplicity.h"
#include <FairParGenericSet.h>
#include <FairParamList.h>
#include <Rtypes.h>
#include <RtypesCore.h>
#include <TArrayD.h>
#include <TString.h>
#include <cmath>
#include <cstddef>
#include <fairlogger/Logger.h>
#include <numeric>
 
void normalize_TArrayD(TArrayD& a)
{
    const auto s = a.GetSum();
    const auto l = a.GetSize();
    if (s > 0.)
    {
        for (int j = 0; j < l; j++)
        {
            a[j] = a[j] / s;
        }
    }
}
 
void R3BNeulandMultiplicityBayesPar::Finish()
{
    for (int i = 0; i < NEULAND_MAX_MULT; i++)
    {
        // to density (Normalize)
        fHits.at(i)[0] = 0;
        fClusters.at(i)[0] = 0;
        fEdep.at(i)[0] = 0;
        normalize_TArrayD(fHits.at(i));
        normalize_TArrayD(fClusters.at(i));
        normalize_TArrayD(fEdep.at(i));
    }
}
 
R3BNeulandMultiplicityBayesPar::R3BNeulandMultiplicityBayesPar(const char* name, const char* title, const char* context)
    : FairParGenericSet(name, title, context)
    , fHits({ 1000, 1000, 1000, 1000, 1000, 1000, 1000 })
    , fClusters({ 1000, 1000, 1000, 1000, 1000, 1000, 1000 })
    , fEdep({ 1000, 1000, 1000, 1000, 1000, 1000, 1000 })
    , fIsProperlyLoaded(false)
{
}
 
R3BNeulandMultiplicityBayesPar::~R3BNeulandMultiplicityBayesPar()
{
    // Note: Deleting stuff here or in clear() causes segfaults?
}
 
void R3BNeulandMultiplicityBayesPar::clear() {}
 
void R3BNeulandMultiplicityBayesPar::putParams(FairParamList* l)
{
    if (!l)
    {
        return;
    }
 
    for (int i = 0; i < NEULAND_MAX_MULT; i++)
    {
        l->add(TString::Format("NeulandMultiplicityBayesParHits-%d", i), fHits.at(i));
        l->add(TString::Format("NeulandMultiplicityBayesParClusters-%d", i), fClusters.at(i));
        l->add(TString::Format("NeulandMultiplicityBayesParEdep-%d", i), fEdep.at(i));
    }
}
 
Bool_t R3BNeulandMultiplicityBayesPar::getParams(FairParamList* l)
{
    if (!l)
    {
        return false;
    }
 
    for (int i = 0; i < NEULAND_MAX_MULT; i++)
    {
        l->fill(TString::Format("NeulandMultiplicityBayesParHits-%d", i), &fHits.at(i));
        l->fill(TString::Format("NeulandMultiplicityBayesParClusters-%d", i), &fClusters.at(i));
        l->fill(TString::Format("NeulandMultiplicityBayesParEdep-%d", i), &fEdep.at(i));
    }
 
    return true;
}
 
void R3BNeulandMultiplicityBayesPar::Fill(int n, int nHits, int nClusters, double Edep)
{
    fHits.at(n)[nHits]++;
    fClusters.at(n)[nClusters]++;
    static constexpr auto SCALE = 10;
    fEdep.at(n)[static_cast<int>(std::floor(Edep)) / SCALE]++;
}
 
R3BNeulandMultiplicity::MultiplicityProbabilities R3BNeulandMultiplicityBayesPar::GetProbabilities(int nHits,
                                                                                                   int nClusters,
                                                                                                   int Edep) const
{
    if (!fIsProperlyLoaded)
    {
        fIsProperlyLoaded = CheckIfProperlyLoaded();
    }
 
    R3BNeulandMultiplicity::MultiplicityProbabilities mult = { 1, 0, 0, 0, 0, 0, 0 };
    if (nHits == 0)
    {
        return mult;
    }
 
    double sum = 0;
    for (size_t i = 0; i < mult.size(); i++)
    {
        mult[i] = fHits.at(i).At(nHits) * fClusters.at(i).At(nClusters) * fEdep.at(i).At(Edep / 10);
        sum += mult[i];
    }
 
    // Normalize so sum prob = 1
    for (double& i : mult)
    {
        i /= sum;
    }
    return mult;
}
 
bool R3BNeulandMultiplicityBayesPar::CheckIfProperlyLoaded() const
{
    if (std::accumulate(fHits.cbegin(), fHits.cend(), 0, [](int i, const TArrayD& a) { return i + a.GetSum(); }) < 0.1)
    {
        LOG(fatal) << "R3BNeulandMultiplicityBayesPar: Empty dataset -> Not properly loaded!";
    }
    return true;
}
 
ClassImp(R3BNeulandMultiplicityBayesPar);