| Author |
Comment/Response |
Nusc
|
 09/19/09 3:00pm
In[12]:= \[Gamma][v_] := 1/Sqrt[1 - (v)^2]
In[25]:= 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
In[28]:= Show[plot1, plot2, PlotRange -> All,
AxesLabel -> {"\!\(\*FractionBox[\"v\", \"c\"]\)[]",
"\[Gamma](\!\(\*FractionBox[\"v\", \"c\"]\))\!\(\*
StyleBox[\"[\",\nFontColor->GrayLevel[0]]\)\!\(\*
StyleBox[\"]\",\nFontColor->GrayLevel[0]]\)"}, LabelStyle -> Larger]
During evaluation of In[28]:= Show::gcomb: Could not combine the graphics objects in Show[\.08 \!\(\*
GraphicsBox[{{}, {},
{RGBColor[0.6, 0, 0], Thickness[Large], LineBox[{Skeleton[540]}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 1.},
PlotRange->{All, All},
PlotRangeClipping->True,
PlotRangePadding->{Automatic, Automatic}]\),\.08 \!\(\*
GraphicsBox[{{}, {},
{Hue[0.67, 0.6, 0.6], LineBox[{Skeleton[77]}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{All, All},
PlotRangeClipping->True,
PlotRangePadding->{Automatic, Automatic}]\),PlotRange->All,AxesLabel->{v/c[],<<140>>},LabelStyle->Larger]. >>
How do I plot the origin. The y-axis cuts off at y=1 and I want to show y=0
URL: , |
|
