File:Downaccelerationintermsofinclineangle.png: Difference between revisions

From Mech
(This file was created using [http://www.wolfram.com/mathematica Wolfram Mathematica 7] using the following command: <pre>F[theta_, mu_] := Sin[theta] - mu Cos[theta]</pre> followed by: <pre>F[theta, 0.74], F[theta, 1]}, {theta, 0, Pi/2}, Epilog -> {P)
 
No edit summary
 
(One intermediate revision by the same user not shown)
Line 5: Line 5:
followed by:
followed by:


<pre>F[theta, 0.74], F[theta, 1]}, {theta, 0, Pi/2},  
<pre>F[theta, 0.74], F[theta, 1]}, {theta, 0, Pi/2}, AxesLabel -> {"\[Theta]", "a/g"},  
  Epilog -> {PointSize[0.02], Point[{Pi/2, 1}], Black, Dashed,  
  Epilog -> {PointSize[0.02], Point[{Pi/2, 1}], Black, Dashed,  
   Line[{{Pi/2, 0}, {Pi/2, 1}}], Line[{{Pi/2, 1}, {0, 1}}]}]</pre>
   Line[{{Pi/2, 0}, {Pi/2, 1}}], Line[{{Pi/2, 1}, {0, 1}}]}]</pre>

Latest revision as of 23:44, 15 September 2010

This file was created using Wolfram Mathematica 7 using the following command:

F[theta_, mu_] := Sin[theta] - mu Cos[theta]

followed by:

F[theta, 0.74], F[theta, 1]}, {theta, 0, Pi/2}, AxesLabel -> {"\[Theta]", "a/g"}, 
 Epilog -> {PointSize[0.02], Point[{Pi/2, 1}], Black, Dashed, 
   Line[{{Pi/2, 0}, {Pi/2, 1}}], Line[{{Pi/2, 1}, {0, 1}}]}]

File history

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

Date/TimeThumbnailDimensionsUserComment
current23:43, 15 September 2010Thumbnail for version as of 23:43, 15 September 2010360 × 225 (13 KB)Vipul (talk | contribs)
22:53, 15 September 2010Thumbnail for version as of 22:53, 15 September 2010360 × 216 (13 KB)Vipul (talk | contribs)This file was created using [http://www.wolfram.com/mathematica Wolfram Mathematica 7] using the following command: <pre>F[theta_, mu_] := Sin[theta] - mu Cos[theta]</pre> followed by: <pre>F[theta, 0.74], F[theta, 1]}, {theta, 0, Pi/2}, Epilog -> {P

The following page uses this file: