Plotting Gamma Function: \[Gamma][v]

[Nusc]

\[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?

 

[Hepth]

"plotrange" instead of "all" PlotRange -> {{-1, 1}, {0, 7}}

 

[oswaler]

Thank you for sharing your plot of the Gamma function. It is a commonly used mathematical function in many fields, including physics and statistics, and it is interesting to see it visually represented.

Regarding your question about the second plot, I think your approach is valid and it effectively shows the origin. Another option could be to use the option "Epilog" in the Show command to add a point at the origin, such as Epilog -> {PointSize[0.02], Point[{0, 1}]}. This would add a small dot at the origin without changing the rest of the plot. However, I think your approach is simpler and clearer.

Overall, your plot and code are well done and effectively demonstrate the behavior of the Gamma function. Keep up the good work!