Mathematica Plot

  • Mathematica
  • Thread starter Nusc
  • Start date
  • #1
Nusc
760
2
\[Gamma][v_] := 1/Sqrt[1 - (v)^2]
plot1 = Plot[\[Gamma][v], {v, -.99, .99},
PlotStyle -> {Thick, RGBColor[0.6, 0, 0]}, PlotRange -> All] \.08
plot2 = Plot[0, {v, -.99, .99}, PlotRange -> All] \.08
Show[plot1, plot2, PlotRange -> All,
AxesLabel -> {"\!\(\*FractionBox[\"v\", \"c\"]\)[]",
"\[Gamma](\!\(\*FractionBox[\"v\", \"c\"]\))\!\(\*
StyleBox[\"[\",\nFontColor->GrayLevel[0]]\)\!\(\*
StyleBox[\"]\",\nFontColor->GrayLevel[0]]\)"}, LabelStyle -> Larger]

The idea for plot2 was to show the origin. the function has a minimum value of 1 but I want to show the origin. Is there a better way?
 

Answers and Replies

  • #2
Hepth
Gold Member
460
39
"plotrange" instead of "all" PlotRange -> {{-1, 1}, {0, 7}}
 

Suggested for: Mathematica Plot

Replies
1
Views
337
  • Last Post
Replies
5
Views
789
  • Last Post
Replies
1
Views
331
  • Last Post
Replies
2
Views
366
Replies
2
Views
1K
  • Last Post
Replies
3
Views
1K
  • Last Post
Replies
2
Views
537
Replies
1
Views
381
Replies
6
Views
652
  • Last Post
Replies
1
Views
595
Top