Image:Circle centre a b radius r.png

From Wikipedia, the free encyclopedia

Summary

Mathematica source:

ϕ=π/5;
x=Cos[ϕ];
y=Sin[ϕ];
a=1.2;
b=-0.5;

Show[Graphics[{
      Circle[{a,b},1],
      PointSize[0.03],
      Line[{{a+x,b},{a+x,b+y},{a,b},{a+x,b}}],
      Point[{a+x,b+y}],
      Point[{a,b}],
      Text[StyleForm["(a,b)",FontSize\[Rule]13],{a,b-.15}],
      Text[StyleForm["(x,y)",FontSize\[Rule]13],{x+a,y+b+.15}],
      Text[StyleForm["r",FontSize\[Rule]13],{a+x/2+0.15,b+y/2}],
      }],AspectRatio\[Rule]Automatic,Axes\[Rule]True,Ticks\[Rule]Automatic]

Licensing


I, the copyright holder of this work, hereby publish it under the following licenses:
You may select the license of your choice.

File history

Click on a date/time to view the file as it appeared at that time.

Date/Time Dimensions User Comment
current 13:12, 4 November 2007 288×260 (2 KB) Jakob.scholbach ( Talk | contribs) (<nowiki>In[16]:= ϕ=π/5; x=Cos[ϕ]; y=Sin[ϕ]; a=1.2; b=-0.5; In[38]:= Show[Graphics[{ Circle[{a,b},1], PointSize[0.03], Line[{{a+x,b},{a+x,b+y},{a,b},{a+x,b}}], Point[{a+x,b+y}], Point[{a,b}], Point[{-a,b}], Te)
revert 13:08, 4 November 2007 256×256 (2 KB) Jakob.scholbach ( Talk | contribs) (<nowiki> ϕ=π/5; x=Cos[ϕ]; y=Sin[ϕ]; a=1.2; b=-0.5; Show[Graphics[{ Circle[{a,b},1], PointSize[0.03], Line[{{a+x,b},{a+x,b+y},{a,b},{a+x,b}}], Point[{a+x,b+y}], Point[{a,b}], Text[StyleForm["(a,b)",FontSize\[Rule]13)

    See the setup instructions for more information.

The following pages on Schools Wikipedia link to this image (list may be incomplete):
The 2008 Wikipedia for Schools was sponsored by a UK Children's Charity, SOS Children UK , and is mainly selected from the English Wikipedia with only minor checks and changes (see www.wikipedia.org for details of authors and sources). See also our Disclaimer.