13 TCanvas * CPol =
new TCanvas(
"CPol",
"TGraphPolar Examples",500,500);
16 Double_t rmax=TMath::Pi()*2;
20 TF1 * fp1 =
new TF1(
"fplot",
"cos(x)",rmin,rmax);
21 for (Int_t ipt = 0; ipt < 1000; ipt++) {
22 r[ipt] = ipt*(rmax-rmin)/1000+rmin;
23 theta[ipt] = fp1->Eval(r[ipt]);
25 TGraphPolar * grP1 =
new TGraphPolar(1000,r,theta);
27 grP1->SetLineColor(2);