BestCandidateSelectionModule.cc

/**************************************************************************
 * basf2 (Belle II Analysis Software Framework)                           *
 * Author: The Belle II Collaboration                                     *
 *                                                                        *
 * See git log for contributors and copyright holders.                    *
 * This file is licensed under LGPL-3.0, see LICENSE.md.                  *
 **************************************************************************/
 
#include <analysis/modules/BestCandidateSelection/BestCandidateSelectionModule.h>
 
#include <analysis/utility/ValueIndexPairSorting.h>
 
#include <analysis/VariableManager/Utility.h>
 
#include <analysis/DecayDescriptor/DecayDescriptor.h>
 
#include <framework/logging/Logger.h>
#include <framework/utilities/MakeROOTCompatible.h>
 
using namespace std;
using namespace Belle2;
 
 
REG_MODULE(BestCandidateSelection);
 
 
BestCandidateSelectionModule::BestCandidateSelectionModule():
  m_variable(nullptr)
{
  //the "undefined order" bit is not strictly true in the current implementation, but details (with anti-particle lists) are tricky
  setDescription(R"DOC(Sort particles by the value of a given ``variable``
in the input list and optionally remove particles after the nth position.
 
Per default particles are sorted in descending order but it can be switched to
an ascending order by setting ``selectLowest=True``. The convenience functions
`modularAnalysis.rankByHighest` and `modularAnalysis.rankByLowest` set this
parameter automatically based on their names.
 
Particles will receive an extra-info field containing their rank as an integer
starting at 1 (best). The name of this extra-info field defaults to
``${variable}_rank`` but can be chosen freely using the ``outputVariable``
parameter.
 
The ranking also takes antiparticles into account, so there will only be one
B+- candidate with ``rank=1``. The remaining list is sorted from best to worst
candidate (each charge, e.g. B+/B-, separately). The sorting is guaranteed
to be stable between particle and anti particle list: particles with the same
value for ``variable`` will keep their relative order. That is, a particle "A"
which was before another particle "B" in the same list and has the same value
for ``variable`` will also stay before "B" after sorting.
 
If ``allowMultiRank=False`` (the default) candidates with same value of
``variable`` will have different ranks. If ``allowMultiRank=True`` they will
share the same rank.
 
IF ``numBest>0`` only candidates with this rank or better will remain in the
output list. If ``allowMultiRank=True`` that means that there can be more than
``numBest`` candidates in the output list if they share ranks.
)DOC");
 
  setPropertyFlags(c_ParallelProcessingCertified);
 
  addParam("particleList", m_inputListName, "Name of the ParticleList to rank for best candidate");
  addParam("variable", m_variableName, "Variable which defines the candidate ranking (see ``selectLowest`` for ordering)");
  addParam("selectLowest", m_selectLowest, "If true, candidate with lower values of ``variable`` are better, otherwise higher is better", false);
  addParam("allowMultiRank", m_allowMultiRank, "If true, candidates with identical values get identical rank", false);
  addParam("numBest", m_numBest, "Keep only particles with this rank or better. If ``allowMultiRank=False`` this is "
           "identical to the maximum amount of candidates left in the list. Otherwise there may be more candidates if "
           "some share the same rank (0: keep all)", 0);
  addParam("cut", m_cutParameter, "Only candidates passing the cut will be ranked. The others will have rank -1.", std::string(""));
  addParam("outputVariable", m_outputVariableName,
           "Name for created variable, which contains the rank for the particle. If not provided, the standard name ``${variable}_rank`` is used.");
  addParam("overwriteRank", m_overwriteRank, "If true, the extraInfo of rank is overwritten when the particle has already the extraInfo.", false);
 
}
 
BestCandidateSelectionModule::~BestCandidateSelectionModule() = default;
 
void BestCandidateSelectionModule::initialize()
{
  m_particles.isRequired();
  m_inputList.isRequired(m_inputListName);
 
  m_variable = Variable::Manager::Instance().getVariable(m_variableName);
  if (!m_variable) {
    B2ERROR("Variable '" << m_variableName << "' is not available in Variable::Manager!");
  }
  if (!(m_variable->variabletype == Variable::Manager::VariableDataType::c_double or m_variable->variabletype == Variable::Manager::VariableDataType::c_int)) {
    B2ERROR("Variable '" << m_variableName << "' has wrong data type! It must be either double or integer.");
  }
  if (m_numBest < 0) {
    B2ERROR("value of numBest must be >= 0!");
  } else if (m_numBest != 0) {
    DecayDescriptor decaydescriptor;
    decaydescriptor.init(m_inputListName);
 
    const DecayDescriptorParticle* ddpart = decaydescriptor.getMother();
    const int pdgCode  = ddpart->getPDGCode();
    const string listLabel = ddpart->getLabel();
 
    // For final state particles we protect the label "all".
    if (Const::finalStateParticlesSet.contains(Const::ParticleType(abs(pdgCode))) and listLabel == "all") {
      B2FATAL("You are trying to apply a best-candidate-selection on the list " << m_inputListName <<
        " but the label 'all' is protected for lists of final-state particles." <<
        " It could introduce *very* dangerous bugs.");
    } else if (listLabel == "MC" or listLabel == "V0") {
      // the labels MC and V0 are also protected
      B2FATAL("You are trying to apply a best-candidate-selection on the list " << m_inputListName <<
        " but the label " << listLabel << " is protected and can not be reduced.");
    }
 
  }
 
  m_cut = Variable::Cut::compile(m_cutParameter);
 
  // parse the name that the rank will be stored under
  if (m_outputVariableName.empty()) {
    std::string root_compatible_VariableName = MakeROOTCompatible::makeROOTCompatible(m_variableName);
    m_outputVariableName = root_compatible_VariableName + "_rank";
  }
}
 
void BestCandidateSelectionModule::event()
{
  // input list
  if (!m_inputList) {
    B2WARNING("Input list " << m_inputList.getName() << " was not created?");
    return;
  }
 
  if (m_numBest == 0 and m_inputList->getIsReserved())
    m_inputList->setEditable(true);
 
  // create list of particle index and the corresponding value of variable
  typedef std::pair<double, unsigned int> ValueIndexPair;
  std::vector<ValueIndexPair> valueToIndex;
  const unsigned int numParticles = m_inputList->getListSize();
  valueToIndex.reserve(numParticles);
  for (const Particle& p : *m_inputList) {
    double value = 0;
    auto var_result = m_variable->function(&p);
    if (std::holds_alternative<double>(var_result)) {
      value = std::get<double>(var_result);
    } else if (std::holds_alternative<int>(var_result)) {
      value = std::get<int>(var_result);
    }
    valueToIndex.emplace_back(value, p.getArrayIndex());
  }
 
  // use stable sort to make sure we keep the relative order of elements with
  // same value as it was before
  if (m_selectLowest) {
    std::stable_sort(valueToIndex.begin(), valueToIndex.end(), ValueIndexPairSorting::lowerPair<ValueIndexPair>);
  } else {
    std::stable_sort(valueToIndex.begin(), valueToIndex.end(), ValueIndexPairSorting::higherPair<ValueIndexPair>);
  }
 
  // assign ranks and (optionally) remove everything but best candidates
  m_inputList->clear();
  int rank{1};
  double previous_val{0};
  bool first_candidate{true};
  for (const auto& candidate : valueToIndex) {
    Particle* p = m_particles[candidate.second];
    if (!m_cut->check(p)) {
      p->addExtraInfo(m_outputVariableName, -1);
      m_inputList->addParticle(p);
      continue;
    }
    if (first_candidate) {
      first_candidate = false;
    } else {
      // If allowMultiRank, only increase rank when value changes
      if (!m_allowMultiRank || (candidate.first != previous_val))  ++rank;
    }
 
    if ((m_numBest != 0) and (rank > m_numBest)) // Only keep particles with same rank or below
      break;
 
    if (!p->hasExtraInfo(m_outputVariableName))
      p->addExtraInfo(m_outputVariableName, rank);
    else if (m_overwriteRank)
      p->setExtraInfo(m_outputVariableName, rank);
 
    m_inputList->addParticle(p);
    previous_val = candidate.first;
 
 
  }
 
  if (m_numBest == 0 and m_inputList->getIsReserved())
    m_inputList->setEditable(false);
}