Student Support Forum: 'Plotting distribution of angles' topicStudent Support Forum > General > "Plotting distribution of angles"

 < Previous Comment | Next Comment > Help | Reply To Comment | Reply To Topic
 Author Comment/Response Bill Simpson 12/20/12 9:48pm If I understand correctly then I believe you might want to add the values of your function at each multiple of 2Pi. In[1]:= distriFunc[x_]:=E^(-((-Pi+x)^2/(18 π^2)))/(3 Sqrt[2] Pi^(3/2)) In[2]:= x=Pi-.0001; Total[Table[distriFunc[x+theta],{theta,-8Pi,8Pi,2Pi}]] Out[3]= 0.158798 In[4]:= x=-Pi+.0001; Total[Table[distriFunc[x+theta],{theta,-8Pi,8Pi,2Pi}]] Out[5]= 0.157752 This makes it appear that there is a discontinuity in your distribution. Perhaps that is real. Now try a Plot. In[6]:= Plot[Sum[distriFunc[x+theta],{theta,-8Pi,8Pi,2Pi}],{x,-Pi,Pi},PlotRange->All] Out[6]= ...plot snipped... If I misunderstood then see if explaining it another way might help find a solution. URL: ,

 Subject (listing for 'Plotting distribution of angles') Author Date Posted Plotting distribution of angles RKTCD 12/20/12 05:58am Re: Plotting distribution of angles Bill Simpson 12/20/12 9:48pm Re: Plotting distribution of angles Michael 12/21/12 3:46pm Re: Plotting distribution of angles RKTCD 12/24/12 06:37am
 < Previous Comment | Next Comment > Help | Reply To Comment | Reply To Topic