LMU/musrfit
5
0
Fork 0
Code Issues 5 Pull Requests Actions Packages Projects Releases 4 Activity

started with the implementation of a Fourier transform

Browse Source
This commit is contained in:
nemu
2008-12-15 12:27:49 +00:00
parent f353993859
commit 3af125eac7
5 changed files with 425 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

37
src/tests/fourier/PhaseShifter.C Normal file
View File

@@ -0,0 +1,37 @@
void PhaseShifter(Double_t phase, TH1F *re, TH1F *im, TH1F *pwr)
{
static Double_t phaseAbs = 0.0;
phaseAbs += phase;
cout << ">> phase = " << phaseAbs << endl;
Int_t noOfEntries = re->GetEntries();
Double_t min = re->GetBinLowEdge(1);
Int_t maxBin = re->GetNbinsX()-1;
Double_t max = re->GetBinLowEdge(maxBin)+re->GetBinWidth(maxBin);
TH1F reShift("reShift", "reShift", noOfEntries, min, max);
TH1F imShift("imShift", "imShift", noOfEntries, min, max);
Double_t phaseRad = phase/180.0*TMath::Pi();
for (Int_t i=1; i<noOfEntries-1; i++) {
reShift.SetBinContent(i, re->GetBinContent(i)*TMath::Cos(phaseRad) - im->GetBinContent(i)*TMath::Sin(phaseRad));
imShift.SetBinContent(i, im->GetBinContent(i)*TMath::Cos(phaseRad) + re->GetBinContent(i)*TMath::Sin(phaseRad));
}
for (Int_t i=1; i<noOfEntries-1; i++) {
re->SetBinContent(i, reShift.GetBinContent(i));
im->SetBinContent(i, imShift.GetBinContent(i));
}
re->SetMarkerStyle(20);
re->SetMarkerColor(TColor::GetColor(0,0,0));
re->SetLineColor(TColor::GetColor(0,0,0));
im->SetMarkerStyle(21);
im->SetMarkerColor(TColor::GetColor(255,0,0));
im->SetLineColor(TColor::GetColor(255,0,0));
pwr->SetMarkerStyle(22);
pwr->SetMarkerColor(TColor::GetColor(0,0,255));
pwr->SetLineColor(TColor::GetColor(0,0,255));
re->Draw("alp");
im->Draw("plsame");
pwr->Draw("plsame");
}