VisiblesCutflow.cxx

#include "DQM/VisiblesCutflow.h"
 
// LDMX
#include "DetDescr/EcalID.h"
#include "DetDescr/HcalID.h"
#include "DetDescr/SimSpecialID.h"
#include "Ecal/Event/EcalHit.h"
#include "Ecal/Event/EcalVetoResult.h"
#include "Hcal/Event/HcalHit.h"
#include "SimCore/Event/SimCalorimeterHit.h"
#include "SimCore/Event/SimParticle.h"
#include "SimCore/Event/SimTrackerHit.h"
#include "Tracking/Event/Track.h"
 
// C++
#include <algorithm>
#include <cmath>
#include <fstream>
#include <iostream>
#include <numeric>
 
namespace dqm {
 
void VisiblesCutflow::configure(framework::config::Parameters &parameters) {
  rt_ = std::make_unique<ldmx::ort::ONNXRuntime>(
      parameters.get<std::string>("bdt_file"));
  feature_list_name_ = parameters.get<std::string>("feature_list_name");
  bdt_cut_val_ = parameters.get<double>("disc_cut");
  ecal_bdt_cut_val_ = parameters.get<double>("ecal_disc_cut");
  all_cuts_ = parameters.get<bool>("all_cuts");
 
  beam_energy_mev_ = parameters.get<double>("beam_energy");
 
  // collection names
  hcal_rec_collection_ = parameters.get<std::string>("hcal_rec_coll_name");
  hcal_rec_pass_name_ = parameters.get<std::string>("hcal_rec_pass_name");
 
  ecal_rec_collection_ = parameters.get<std::string>("ecal_rec_coll_name");
  ecal_rec_pass_name_ = parameters.get<std::string>("ecal_rec_pass_name");
 
  recoil_from_tracking_ = parameters.get<bool>("recoil_from_tracking");
  track_collection_ = parameters.get<std::string>("track_collection");
  track_pass_name_ = parameters.get<std::string>("track_pass_name");
 
  sp_collection_ = parameters.get<std::string>("sp_coll_name");
  sp_pass_name_ = parameters.get<std::string>("sp_pass_name");
 
  sim_particles_coll_name_ =
      parameters.get<std::string>("sim_particles_coll_name");
  sim_particles_pass_name_ =
      parameters.get<std::string>("sim_particles_pass_name");
 
  ecal_veto_collection_ = parameters.get<std::string>("ecal_veto_coll_name");
  ecal_veto_pass_ = parameters.get<std::string>("ecal_veto_pass_name");
}
 
bool VisiblesCutflow::inList(std::vector<int> parents, int track_id) {
  return std::find(parents.begin(), parents.end(), track_id) != parents.end();
}
 
void VisiblesCutflow::analyze(const framework::Event &event) {
  std::vector<float> bdt_features;
 
  double decay_z;
 
  const auto &particle_map{event.getMap<int, ldmx::SimParticle>(
      sim_particles_coll_name_, sim_particles_pass_name_)};
 
  for (auto const &it : particle_map) {
    std::vector<int> parents = it.second.getParents();
    for (int track_id : parents) {
      if (track_id == 0 && it.second.getPdgID() == -11) {
        decay_z = it.second.getVertex()[2];
      }
    }
  }
 
  histograms_.fill("total_events", decay_z);
 
  // Get target scoring plane hits for recoil electron
  // Use this to calculate the projected photon line vector
  // This currently uses truth-level information, but it should be replaced
  // by reconstructed tracker information, when available
  std::vector<double> gamma_p(3);
  double gamma_energy = 90000.;
  std::vector<double> gamma_x0(3);
 
  std::vector<double> recoil_p(3);
  bool found_recoil_e = false;
 
  if (recoil_from_tracking_) {
    const auto &recoil_tracks{
        event.getCollection<ldmx::Track>(track_collection_, track_pass_name_)};
    for (auto &track : recoil_tracks) {
      // need to figure out how to best isolate candidate electron track
      auto trk_pos = track.getPositionAtTarget();
      auto trk_mom = track.getMomentumAtTarget();
      if (track.getCharge() == 1 && track.getNhits() == 5 &&
          trk_pos.size() == 3 && trk_mom.size() == 3) {
        gamma_x0 = trk_pos;
        gamma_p[0] = -1. * trk_mom[0];
        gamma_p[1] = -1. * trk_mom[1];
        gamma_p[2] = 8000. - trk_mom[2];
      }
    }
  } else {
    if (event.exists(sp_collection_, sp_pass_name_)) {
      const auto &target_sp_hits = event.getCollection<ldmx::SimTrackerHit>(
          sp_collection_, sp_pass_name_);
      bool found_rec = false;
      for (auto const &it : particle_map) {
        for (auto const &sphit : target_sp_hits) {
          if (sphit.getPosition()[2] > 0) {
            if (it.first == sphit.getTrackID()) {
              if (it.second.getPdgID() == 622) {
                std::vector<float> x0_float = sphit.getPosition();
                std::vector<double> x0_double(x0_float.begin(), x0_float.end());
                gamma_x0 = x0_double;
                gamma_p = sphit.getMomentum();
                gamma_energy = sphit.getEnergy();
                found_rec = true;
              }
              if (it.second.getPdgID() == 11 &&
                  inList(it.second.getParents(), 0)) {
                if (!found_rec) {
                  std::vector<float> x0_float = sphit.getPosition();
                  std::vector<double> x0_double(x0_float.begin(),
                                                x0_float.end());
                  gamma_x0 = x0_double;
                  gamma_p[0] = -1. * sphit.getMomentum()[0];
                  gamma_p[1] = -1. * sphit.getMomentum()[1];
                  gamma_p[2] = beam_energy_mev_ - sphit.getMomentum()[2];
                  gamma_energy = beam_energy_mev_ - sphit.getEnergy();
                  found_rec = true;
                }
                recoil_p = sphit.getMomentum();
                found_recoil_e = true;
              }
            }
          }
        }
      }
    }
  }
  histograms_.fill("beam_energy_frac", gamma_energy / 8000.);
  histograms_.fill("beam_angle",
                   std::acos(gamma_p[2] / std::sqrt(gamma_p[0] * gamma_p[0] +
                                                    gamma_p[1] * gamma_p[1] +
                                                    gamma_p[2] * gamma_p[2])));
 
  double p_mag = 0.;
  if (found_recoil_e) {
    p_mag = std::sqrt(recoil_p[0] * recoil_p[0] + recoil_p[1] * recoil_p[1] +
                      recoil_p[2] * recoil_p[2]);
  }
 
  if (p_mag < 50. && all_cuts_) {
    return;
  }
  histograms_.fill("pass_acceptance", decay_z);
 
  // Get EcalRecHits, check that trigger is passed
  const auto &ecal_rec_hits = event.getCollection<ldmx::EcalHit>(
      ecal_rec_collection_, ecal_rec_pass_name_);
  const auto &hcal_rec_hits = event.getCollection<ldmx::HcalHit>(
      hcal_rec_collection_, hcal_rec_pass_name_);
 
  double trigger = 0.;
  double ecal_energy = 0.;
  double hcal_energy = 0.;
  bool hcal_containment = true;
 
  for (const ldmx::EcalHit &hit : ecal_rec_hits) {
    if (hit.getEnergy() > 0.) {
      ecal_energy += hit.getEnergy();
      if (hit.getZPos() <= 541.722) {
        trigger += hit.getEnergy();
      }
    }
  }
  for (const ldmx::HcalHit &hit : hcal_rec_hits) {
    if (hit.getEnergy() > 0.) {
      ldmx::HcalID det_id(hit.getID());
      if (det_id.getSection() != 0) {
        continue;
      }
      if (det_id.getLayerID() == 1 && hit.getPE() > 5) {
        hcal_containment = false;
      }
      hcal_energy += 12. * hit.getEnergy();
    }
  }
 
  if (trigger > 3160. && all_cuts_) {
    return;
  }
  histograms_.fill("pass_trigger", decay_z);
 
  if (ecal_energy > 3160. && all_cuts_) {
    return;
  }
  histograms_.fill("pass_ecal_energy", decay_z);
 
  if (p_mag > 2400. && all_cuts_) {
    return;
  }
  histograms_.fill("pass_tracker_veto", decay_z);
 
  const auto &ecal_veto{event.getObject<ldmx::EcalVetoResult>(
      ecal_veto_collection_, ecal_veto_pass_)};
  if (ecal_veto.getDisc() < ecal_bdt_cut_val_ && all_cuts_) {
    return;
  }
  histograms_.fill("pass_ecal_bdt", decay_z);
 
  if (hcal_energy < 4840 && all_cuts_) {
    return;
  }
  histograms_.fill("pass_hcal_energy", decay_z);
 
  if (!hcal_containment && all_cuts_) {
    return;
  }
  histograms_.fill("pass_hcal_containment", decay_z);
 
  // initialize all of the features
  int n_layers_hit = 0;
  double x_std = 0.;
  double y_std = 0.;
  double z_std = 0.;
  double x_mean = 0.;
  double y_mean = 0.;
  double r_mean = 0.;
  int iso_hits = 0;
  double iso_energy = 0.;
  int n_readout_hits = 0;
  double summed_det = 0.;
  double r_mean_from_photon_track = 0.;
 
  double z_mean = 0.;  // need this when calculating z_std
  std::vector<int> layers_hit;
  for (const ldmx::HcalHit &hit : hcal_rec_hits) {
    if (hit.getEnergy() > 0.) {
      ldmx::HcalID det_id(hit.getID());
      if (det_id.getSection() != 0) {  // skip hits that aren't in main Hcal
        continue;
      }
      if (fabs(hit.getXPos()) > 1000 || fabs(hit.getYPos()) > 1000) {
        continue;
      }
      n_readout_hits += 1;
      double hit_x = hit.getXPos();
      double hit_y = hit.getYPos();
      double hit_z = hit.getZPos();
      double hit_r = sqrt(hit_x * hit_x + hit_y * hit_y);
 
      summed_det += hit.getEnergy();
 
      x_mean += hit_x * hit.getEnergy();
      y_mean += hit_y * hit.getEnergy();
      z_mean += hit_z * hit.getEnergy();
      r_mean += hit_r * hit.getEnergy();
 
      // check if this is a new layer in the collection
      if (!(std::find(layers_hit.begin(), layers_hit.end(),
                      det_id.getLayerID()) != layers_hit.end())) {
        layers_hit.push_back(det_id.getLayerID());
      }
 
      double proj_x =
          gamma_x0[0] + (hit_z - gamma_x0[2]) * gamma_p[0] / gamma_p[2];
      double proj_y =
          gamma_x0[1] + (hit_z - gamma_x0[2]) * gamma_p[1] / gamma_p[2];
 
      r_mean_from_photon_track +=
          hit.getEnergy() * sqrt((hit_x - proj_x) * (hit_x - proj_x) +
                                 (hit_y - proj_y) * (hit_y - proj_y));
 
      // Calculate isolated hits
      double closest_point = 9999.;
      for (const ldmx::HcalHit &hit2 : hcal_rec_hits) {
        if (hit2.getEnergy() > 0.) {
          ldmx::HcalID det_i_d2(hit2.getID());
          if (fabs(hit2.getXPos()) > 1000 || fabs(hit2.getYPos()) > 1000) {
            continue;
          }
          if (det_i_d2.getLayerID() == det_id.getLayerID()) {
            // Determine if a bar is vertical (along y-axis) or horizontal
            // (along x-axis) Odd layers have horizontal strips Even layers have
            // vertical strips
            if (hit.isOrientationX()) {
              if (fabs(hit2.getYPos() - hit_y) > 0) {
                if (fabs(hit2.getYPos() - hit_y) < closest_point) {
                  closest_point = abs(hit2.getYPos() - hit_y);
                }
              }
            }
            if (hit.isOrientationY()) {
              if (fabs(hit2.getXPos() - hit_x) > 0) {
                if (fabs(hit2.getXPos() - hit_x) < closest_point) {
                  closest_point = fabs(hit2.getXPos() - hit_x);
                }
              }
            }
          }
        }
      }
      if (closest_point > 50.) {
        iso_hits += 1;
        iso_energy += hit.getEnergy();
      }
    }
  }
 
  n_layers_hit = layers_hit.size();
 
  if (summed_det > 0.) {
    x_mean /= summed_det;
    y_mean /= summed_det;
    z_mean /= summed_det;
    r_mean /= summed_det;
 
    r_mean_from_photon_track /= summed_det;
  }
 
  for (const ldmx::HcalHit &hit : hcal_rec_hits) {
    if (hit.getEnergy() > 0.) {
      if (fabs(hit.getXPos()) > 1000 || fabs(hit.getYPos()) > 1000) {
        continue;
      }
      ldmx::HcalID det_id(hit.getID());
      if (det_id.getSection() == 0) {
        x_std += hit.getEnergy() * (hit.getXPos() - x_mean) *
                 (hit.getXPos() - x_mean);
        y_std += hit.getEnergy() * (hit.getYPos() - y_mean) *
                 (hit.getYPos() - y_mean);
        z_std += hit.getEnergy() * (hit.getZPos() - z_mean) *
                 (hit.getZPos() - z_mean);
      }
    }
  }
 
  if (summed_det > 0.) {
    x_std = sqrt(x_std / summed_det);
    y_std = sqrt(y_std / summed_det);
    z_std = sqrt(z_std / summed_det);
  }
 
  // Fill histograms
  histograms_.fill("layers_hit", n_layers_hit);
  histograms_.fill("x_std", x_std);
  histograms_.fill("y_std", y_std);
  histograms_.fill("z_std", z_std);
  histograms_.fill("x_mean", x_mean);
  histograms_.fill("y_mean", y_mean);
  histograms_.fill("r_mean", r_mean);
  histograms_.fill("iso_hits", iso_hits);
  histograms_.fill("iso_energy", iso_energy);
  histograms_.fill("n_hits", n_readout_hits);
  histograms_.fill("total_energy", hcal_energy);
  histograms_.fill("photon_track", r_mean_from_photon_track);
 
  bdt_features.push_back(n_layers_hit);
  bdt_features.push_back(x_std);
  bdt_features.push_back(y_std);
  bdt_features.push_back(z_std);
  bdt_features.push_back(x_mean);
  bdt_features.push_back(y_mean);
  bdt_features.push_back(r_mean);
  bdt_features.push_back(iso_hits);
  bdt_features.push_back(iso_energy);
  bdt_features.push_back(n_readout_hits);
  bdt_features.push_back(hcal_energy);
  bdt_features.push_back(r_mean_from_photon_track);
 
  ldmx::ort::FloatArrays inputs({bdt_features});
  float pred =
      rt_->run({feature_list_name_}, inputs, {"probabilities"})[0].at(1);
 
  histograms_.fill("visibles_disc", pred);
 
  for (int i = 0; i < 10000; i++) {
    double disc = 0.999 + (double(i) / 10000.) * (1. - 0.999);
    histograms_.fill("visibles_disc_high_norm",
                     0.999 + ((double(i) + 0.5) / 10000.) * (1. - 0.999));
    double disc_roc = 0.99 + (double(i) / 10000.) * (1. - 0.99);
    if (pred >= disc) {
      histograms_.fill("visibles_disc_high",
                       0.999 + ((double(i) + 0.5) / 10000.) * (1. - 0.999));
    }
    if (pred >= disc_roc) {
      histograms_.fill("roc", disc_roc);
    }
  }
 
  histograms_.fill("ecal_disc_vs_vis_disc", pred, ecal_veto.getDisc());
 
  if (pred < bdt_cut_val_) {
    return;
  }
  histograms_.fill("pass_visibles_bdt", decay_z);
 
  return;
}
 
}  // namespace dqm
 
DECLARE_ANALYZER(dqm::VisiblesCutflow);