File:Sinesquaredcloseup.png

From Calculus

Sinesquaredcloseup.png(360 × 77 pixels, file size: 5 KB, MIME type: image/png)

This file was created using Wolfram Mathematica 8.0 with the following code:

Plot[{(Sin[x])^2, 1/2}, {x, -Pi, Pi}, AspectRatio -> 1/(2 Pi), 
 PlotStyle -> {Automatic, Dashed}, 
 Epilog -> {Text["1/2", {1.2, 0.4}], PointSize[0.02], 
   Point[{Pi/2, 1}], Point[{Pi, 0}], Point[{-Pi/2, 1}], 
   Point[{-Pi, 0}], Point[{0, 0}], Dashed, 
   Line[{{Pi/2, 1}, {Pi/2, 0}}], Line[{{-Pi/2, 1}, {Pi/2, 1}}], 
   Line[{{-Pi/2, 1}, {-Pi/2, 0}}], Text["\[Pi]/2", {Pi/2 + 0.2, 0.1}],
    Text["-\[Pi]/2", {-Pi/2 + 0.3, 0.1}], Red,  Point[{Pi/4, 1/2}], 
   Point[{3 Pi/4, 1/2}], Point[{-Pi/4, 1/2}], Point[{-3 Pi/4, 1/2}], 
   Black, Text["\[Pi]/4", {Pi/4 - 0.2, 0.6}], 
   Text["3\[Pi]/4", {3 Pi/4 + 0.2, 0.6}], 
   Text["-\[Pi]/4", {-Pi/4 + 0.2, 0.6}], 
   Text["-3\[Pi]/4", {-3 Pi/4 - 0.2, 0.6}], 
   Text["\[Pi]", {Pi - 0.1, 0.1}], Text["-\[Pi]", {-Pi + 0.1, 0.1}]}]

File history

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

Date/TimeThumbnailDimensionsUserComment
current16:46, 28 May 2012Thumbnail for version as of 16:46, 28 May 2012360 × 77 (5 KB)Vipul (talk | contribs)
20:12, 3 September 2011No thumbnail360 × 77 (5 KB)Vipul (talk | contribs)This file was created using [http://www.wolfram.com/mathematica Wolfram Mathematica 8.0] with the following code: <pre>Plot[{(Sin[x])^2, 1/2}, {x, -Pi, Pi}, AspectRatio -> 1/(2 Pi), PlotStyle -> {Automatic, Dashed}, Epilog -> {Text["1/2", {1.2, 0.4}]

The following page uses this file:

Metadata