CMSSW_4_4_3_patch1/src/TopQuarkAnalysis/TopKinFitter/interface/CovarianceMatrix.h

Go to the documentation of this file.

#ifndef CovarianceMatrix_h
#define CovarianceMatrix_h

#include "FWCore/ParameterSet/interface/ParameterSet.h"

#include "CommonTools/Utils/interface/StringObjectFunction.h"
#include "CommonTools/Utils/interface/StringCutObjectSelector.h"

#include "DataFormats/PatCandidates/interface/PATObject.h"
#include "DataFormats/PatCandidates/interface/Electron.h"
#include "DataFormats/PatCandidates/interface/Muon.h"
#include "DataFormats/PatCandidates/interface/Jet.h"
#include "DataFormats/PatCandidates/interface/MET.h"

#include "TopQuarkAnalysis/TopObjectResolutions/interface/MET.h"
#include "TopQuarkAnalysis/TopObjectResolutions/interface/Jet.h"
#include "TopQuarkAnalysis/TopObjectResolutions/interface/Muon.h"
#include "TopQuarkAnalysis/TopObjectResolutions/interface/Electron.h"
#include "TopQuarkAnalysis/TopKinFitter/interface/TopKinFitter.h"

class CovarianceMatrix {
    
 private:

  std::vector<std::string> binsUdsc_, binsB_, binsLep_, binsMet_;
  std::vector<std::string> funcEtUdsc_ , funcEtB_ , funcEtLep_ , funcEtMet_;
  std::vector<std::string> funcEtaUdsc_, funcEtaB_, funcEtaLep_, funcEtaMet_;
  std::vector<std::string> funcPhiUdsc_, funcPhiB_, funcPhiLep_, funcPhiMet_;

 public:
  
  CovarianceMatrix(){};
  CovarianceMatrix(const std::vector<edm::ParameterSet> udscResolutions, const std::vector<edm::ParameterSet> bResolutions){
    for(std::vector<edm::ParameterSet>::const_iterator iSet = udscResolutions.begin(); iSet != udscResolutions.end(); ++iSet){
      if(iSet->exists("bin")) binsUdsc_.push_back(iSet->getParameter<std::string>("bin"));
      else if(udscResolutions.size()==1) binsUdsc_.push_back("");
      else throw cms::Exception("WrongConfig") << "Parameter 'bin' is needed if more than one PSet is specified!\n";
      
      funcEtUdsc_.push_back(iSet->getParameter<std::string>("et"));
      funcEtaUdsc_.push_back(iSet->getParameter<std::string>("eta"));
      funcPhiUdsc_.push_back(iSet->getParameter<std::string>("phi"));
    }
    for(std::vector<edm::ParameterSet>::const_iterator iSet = bResolutions.begin(); iSet != bResolutions.end(); ++iSet){
      if(iSet->exists("bin")) binsB_.push_back(iSet->getParameter<std::string>("bin"));
      else if(bResolutions.size()==1) binsB_.push_back("");
      else throw cms::Exception("WrongConfig") << "Parameter 'bin' is needed if more than one PSet is specified!\n";
    
      funcEtB_.push_back(iSet->getParameter<std::string>("et"));
      funcEtaB_.push_back(iSet->getParameter<std::string>("eta"));
      funcPhiB_.push_back(iSet->getParameter<std::string>("phi"));
    }
  };
  CovarianceMatrix(const std::vector<edm::ParameterSet> udscResolutions, const std::vector<edm::ParameterSet> bResolutions, const std::vector<edm::ParameterSet> lepResolutions, const std::vector<edm::ParameterSet> metResolutions){
    for(std::vector<edm::ParameterSet>::const_iterator iSet = udscResolutions.begin(); iSet != udscResolutions.end(); ++iSet){
      if(iSet->exists("bin")) binsUdsc_.push_back(iSet->getParameter<std::string>("bin"));
      else if(udscResolutions.size()==1) binsUdsc_.push_back("");
      else throw cms::Exception("WrongConfig") << "Parameter 'bin' is needed if more than one PSet is specified!\n";

      funcEtUdsc_.push_back(iSet->getParameter<std::string>("et"));
      funcEtaUdsc_.push_back(iSet->getParameter<std::string>("eta"));
      funcPhiUdsc_.push_back(iSet->getParameter<std::string>("phi"));
    }
    for(std::vector<edm::ParameterSet>::const_iterator iSet = bResolutions.begin(); iSet != bResolutions.end(); ++iSet){
      if(iSet->exists("bin")) binsB_.push_back(iSet->getParameter<std::string>("bin"));
      else if(bResolutions.size()==1) binsB_.push_back("");
      else throw cms::Exception("WrongConfig") << "Parameter 'bin' is needed if more than one PSet is specified!\n";

      funcEtB_.push_back(iSet->getParameter<std::string>("et"));
      funcEtaB_.push_back(iSet->getParameter<std::string>("eta"));
      funcPhiB_.push_back(iSet->getParameter<std::string>("phi"));
    }
    for(std::vector<edm::ParameterSet>::const_iterator iSet = lepResolutions.begin(); iSet != lepResolutions.end(); ++iSet){
      if(iSet->exists("bin")) binsLep_.push_back(iSet->getParameter<std::string>("bin"));
      else if(lepResolutions.size()==1) binsLep_.push_back("");
      else throw cms::Exception("WrongConfig") << "Parameter 'bin' is needed if more than one PSet is specified!\n";

      funcEtLep_.push_back(iSet->getParameter<std::string>("et"));
      funcEtaLep_.push_back(iSet->getParameter<std::string>("eta"));
      funcPhiLep_.push_back(iSet->getParameter<std::string>("phi"));
    }
    for(std::vector<edm::ParameterSet>::const_iterator iSet = metResolutions.begin(); iSet != metResolutions.end(); ++iSet){
      if(iSet->exists("bin")) binsMet_.push_back(iSet->getParameter<std::string>("bin"));
      else if(metResolutions.size()==1) binsMet_.push_back("");
      else throw cms::Exception("WrongConfig") << "Parameter 'bin' is needed if more than one PSet is specified!\n";

      funcEtMet_.push_back(iSet->getParameter<std::string>("et"));
      funcEtaMet_.push_back(iSet->getParameter<std::string>("eta"));
      funcPhiMet_.push_back(iSet->getParameter<std::string>("phi"));
    }
   };
   ~CovarianceMatrix(){};
 
  template <class ObjectType>
    TMatrixD setupMatrix(const pat::PATObject<ObjectType>& object, TopKinFitter::Param param, std::string resolutionProvider);

  template <class ObjectType>
    double getResolution(const pat::PATObject<ObjectType>& object, const std::string whichResolution, bool isBJet);
};

template <class ObjectType>
double CovarianceMatrix::getResolution(const pat::PATObject<ObjectType>& object, const std::string whichResolution = "", bool isBJet = false)
{
  std::vector<std::string> * bins_, * funcEt_, * funcEta_, * funcPhi_;

  if( dynamic_cast<const reco::Jet*>(&object) && !isBJet ) {
    bins_    = &binsUdsc_;
    funcEt_  = &funcEtUdsc_;
    funcEta_ = &funcEtaUdsc_;
    funcPhi_ = &funcPhiUdsc_;
  }
  else if( dynamic_cast<const reco::Jet*>(&object) && isBJet ) {
    bins_    = &binsB_;
    funcEt_  = &funcEtB_;
    funcEta_ = &funcEtaB_;
    funcPhi_ = &funcPhiB_;
  }
  else if( dynamic_cast<const reco::Muon*>(&object) || dynamic_cast<const reco::GsfElectron*>(&object) ) {
    bins_    = &binsLep_;
    funcEt_  = &funcEtLep_;
    funcEta_ = &funcEtaLep_;
    funcPhi_ = &funcPhiLep_;
  }
  else if( dynamic_cast<const reco::MET*>(&object) ) {
    bins_    = &binsMet_;
    funcEt_  = &funcEtMet_;
    funcEta_ = &funcEtaMet_;
    funcPhi_ = &funcPhiMet_;
  }
  else{
    throw cms::Exception("UnsupportedObject") << "The object given is not supported!\n";
  }

  int selectedBin=-1;
  reco::LeafCandidate candidate;
  for(unsigned int i=0; i<bins_->size(); ++i){
    StringCutObjectSelector<reco::LeafCandidate> select_(bins_->at(i));
    candidate = reco::LeafCandidate( 0, reco::LeafCandidate::LorentzVector(object.px(), object.py(), object.pz(), object.energy()) );
    if(select_(candidate)){
      selectedBin = i;
      break;
    }
  }
  if(selectedBin>=0){
    if(whichResolution == "et")       return StringObjectFunction<reco::LeafCandidate>(funcEt_ ->at(selectedBin)).operator()(candidate);
    else if(whichResolution == "eta") return StringObjectFunction<reco::LeafCandidate>(funcEta_->at(selectedBin)).operator()(candidate);
    else if(whichResolution == "phi") return StringObjectFunction<reco::LeafCandidate>(funcPhi_->at(selectedBin)).operator()(candidate);
    else throw cms::Exception("ProgrammingError") << "Only 'et', 'eta' and 'phi' resolutions supported!\n";
  }
  return 0;
}


template <class ObjectType>
TMatrixD CovarianceMatrix::setupMatrix(const pat::PATObject<ObjectType>& object, TopKinFitter::Param param, std::string resolutionProvider = "")
{
  TMatrixD CovM3 (3,3); CovM3.Zero();
  TMatrixD CovM4 (4,4); CovM4.Zero();
  TMatrixD* CovM = &CovM3;
  // This part is for pat objects with resolutions embedded
  if(object.hasKinResolution())
    {
      switch(param){
      case TopKinFitter::kEtEtaPhi :
        CovM3(0,0) = pow(object.resolEt(resolutionProvider) , 2);
        if( dynamic_cast<const reco::MET*>(&object) ) CovM3(1,1) = pow(9999., 2);
        else CovM3(1,1) = pow(object.resolEta(resolutionProvider), 2);
        CovM3(2,2) = pow(object.resolPhi(resolutionProvider), 2);
        CovM = &CovM3;
        break;
      case TopKinFitter::kEtThetaPhi :
        CovM3(0,0) = pow(object.resolEt(resolutionProvider)   , 2);
        CovM3(1,1) = pow(object.resolTheta(resolutionProvider), 2);
        CovM3(2,2) = pow(object.resolPhi(resolutionProvider)  , 2);
        CovM = &CovM3;
        break;
      case TopKinFitter::kEMom :
        CovM4(0,0) = pow(1, 2);
        CovM4(1,1) = pow(1, 2);
        CovM4(2,2) = pow(1, 2);
        CovM4(3,3) = pow(1, 2);
        CovM = &CovM4;
        break;
      }
    }
  // This part is for objects without resolutions embedded
  else
    {
      double pt = object.pt(), eta = object.eta();
      // if object is a jet
      if( dynamic_cast<const reco::Jet*>(&object) ) {
        res::HelperJet jetRes;
        switch(param){
        case TopKinFitter::kEMom :
          if(resolutionProvider == "bjets") {
            CovM4(0,0) = pow(jetRes.a (pt, eta, res::HelperJet::kB  ), 2); 
            CovM4(1,1) = pow(jetRes.b (pt, eta, res::HelperJet::kB  ), 2); 
            CovM4(2,2) = pow(jetRes.c (pt, eta, res::HelperJet::kB  ), 2);
            CovM4(3,3) = pow(jetRes.d (pt, eta, res::HelperJet::kB  ), 2);
          }
          else {
            CovM4(0,0) = pow(jetRes.a (pt, eta, res::HelperJet::kUds), 2);
            CovM4(1,1) = pow(jetRes.b (pt, eta, res::HelperJet::kUds), 2);
            CovM4(2,2) = pow(jetRes.c (pt, eta, res::HelperJet::kUds), 2);
            CovM4(3,3) = pow(jetRes.d (pt, eta, res::HelperJet::kUds), 2);
          }
          CovM = &CovM4;
          break;
        case TopKinFitter::kEtEtaPhi : 
          if(resolutionProvider == "bjets") {
            if(!binsB_.size()){
              CovM3(0,0) = pow(jetRes.et (pt, eta, res::HelperJet::kB  ), 2); 
              CovM3(1,1) = pow(jetRes.eta(pt, eta, res::HelperJet::kB  ), 2); 
              CovM3(2,2) = pow(jetRes.phi(pt, eta, res::HelperJet::kB  ), 2);
            }
            else{
              CovM3(0,0) = pow(getResolution(object, "et" , true), 2); 
              CovM3(1,1) = pow(getResolution(object, "eta", true), 2); 
              CovM3(2,2) = pow(getResolution(object, "phi", true), 2);
            }
          }
          else {
            if(!binsUdsc_.size()){
              CovM3(0,0) = pow(jetRes.et (pt, eta, res::HelperJet::kUds), 2);
              CovM3(1,1) = pow(jetRes.eta(pt, eta, res::HelperJet::kUds), 2);
              CovM3(2,2) = pow(jetRes.phi(pt, eta, res::HelperJet::kUds), 2);
            }
            else{
              CovM3(0,0) = pow(getResolution(object, "et") , 2); 
              CovM3(1,1) = pow(getResolution(object, "eta"), 2); 
              CovM3(2,2) = pow(getResolution(object, "phi"), 2);
            }
          }       
          CovM = &CovM3;
          break;
        case TopKinFitter::kEtThetaPhi :
          if(resolutionProvider == "bjets") {
            CovM3(0,0) = pow(jetRes.et   (pt, eta, res::HelperJet::kB  ), 2); 
            CovM3(1,1) = pow(jetRes.theta(pt, eta, res::HelperJet::kB  ), 2); 
            CovM3(2,2) = pow(jetRes.phi  (pt, eta, res::HelperJet::kB  ), 2);
          }
          else {
            CovM3(0,0) = pow(jetRes.et   (pt, eta, res::HelperJet::kUds), 2);
            CovM3(1,1) = pow(jetRes.theta(pt, eta, res::HelperJet::kUds), 2);
            CovM3(2,2) = pow(jetRes.phi  (pt, eta, res::HelperJet::kUds), 2);
          }
          CovM = &CovM3;
          break;
        } 
      }
      // if object is an electron
      else if( dynamic_cast<const reco::GsfElectron*>(&object) ) {
        res::HelperElectron elecRes;
        switch(param){
        case TopKinFitter::kEMom :
          CovM3(0,0) = pow(elecRes.a (pt, eta), 2);
          CovM3(1,1) = pow(elecRes.b (pt, eta), 2); 
          CovM3(2,2) = pow(elecRes.c (pt, eta), 2);
          CovM = &CovM3;
          break;
        case TopKinFitter::kEtEtaPhi :
          if(!binsLep_.size()){
            CovM3(0,0) = pow(elecRes.et (pt, eta), 2);
            CovM3(1,1) = pow(elecRes.eta(pt, eta), 2); 
            CovM3(2,2) = pow(elecRes.phi(pt, eta), 2);
          }
          else{
            CovM3(0,0) = pow(getResolution(object, "et") , 2);
            CovM3(1,1) = pow(getResolution(object, "eta"), 2);
            CovM3(2,2) = pow(getResolution(object, "phi"), 2);
          }
          CovM = &CovM3;
          break;
        case TopKinFitter::kEtThetaPhi :
          CovM3(0,0) = pow(elecRes.et   (pt, eta), 2);
          CovM3(1,1) = pow(elecRes.theta(pt, eta), 2); 
          CovM3(2,2) = pow(elecRes.phi  (pt, eta), 2);
          CovM = &CovM3;
          break;
        }
      }
      // if object is a muon
      else if( dynamic_cast<const reco::Muon*>(&object) ) {
        res::HelperMuon muonRes;
        switch(param){
        case TopKinFitter::kEMom :
          CovM3(0,0) = pow(muonRes.a (pt, eta), 2);
          CovM3(1,1) = pow(muonRes.b (pt, eta), 2); 
          CovM3(2,2) = pow(muonRes.c (pt, eta), 2);
          CovM = &CovM3;
          break;
        case TopKinFitter::kEtEtaPhi :
          if(!binsLep_.size()){
            CovM3(0,0) = pow(muonRes.et (pt, eta), 2);
            CovM3(1,1) = pow(muonRes.eta(pt, eta), 2); 
            CovM3(2,2) = pow(muonRes.phi(pt, eta), 2);
          }
          else{
            CovM3(0,0) = pow(getResolution(object, "et") , 2);
            CovM3(1,1) = pow(getResolution(object, "eta"), 2);
            CovM3(2,2) = pow(getResolution(object, "phi"), 2);
          }
          CovM = &CovM3;
          break;
        case TopKinFitter::kEtThetaPhi :
          CovM3(0,0) = pow(muonRes.et   (pt, eta), 2);
          CovM3(1,1) = pow(muonRes.theta(pt, eta), 2); 
          CovM3(2,2) = pow(muonRes.phi  (pt, eta), 2);
          CovM = &CovM3;
          break;
        }
      }
      // if object is met
      else if( dynamic_cast<const reco::MET*>(&object) ) {
        res::HelperMET metRes;
        switch(param){
        case TopKinFitter::kEMom :
          CovM3(0,0) = pow(metRes.a(pt), 2);
          CovM3(1,1) = pow(metRes.b(pt), 2);
          CovM3(2,2) = pow(metRes.c(pt), 2);
          CovM = &CovM3;
          break;
        case TopKinFitter::kEtEtaPhi :
          if(!binsMet_.size()){
            CovM3(0,0) = pow(metRes.et(pt) , 2);
            CovM3(1,1) = pow(        9999. , 2);
            CovM3(2,2) = pow(metRes.phi(pt), 2);
          }
          else{
            CovM3(0,0) = pow(getResolution(object, "et") , 2);
            CovM3(1,1) = pow(getResolution(object, "eta"), 2);
            CovM3(2,2) = pow(getResolution(object, "phi"), 2);
          }
          CovM = &CovM3;
          break;
        case TopKinFitter::kEtThetaPhi :
          CovM3(0,0) = pow(metRes.et(pt) , 2);
          CovM3(1,1) = pow(        9999. , 2);
          CovM3(2,2) = pow(metRes.phi(pt), 2);
          CovM = &CovM3;
          break;
        }
      }
    }
  return *CovM;
}

#endif