JohnD
Reputation
1,539
Top tag
Next privilege 2,000 Rep.
 Mar 27 awarded Famous Question Jan 30 awarded Nice Question Aug 12 awarded Nice Question Jun 30 awarded Yearling Jun 26 awarded Popular Question Apr 3 awarded Popular Question Dec 14 accepted TraditionalForm for PlotLabel with a parameter Nov 26 revised TraditionalForm for PlotLabel with a parameter added 342 characters in body Nov 26 comment TraditionalForm for PlotLabel with a parameter Table[ContourPlot[ Norm[{x, y}, p] == 1, {x, -1.2, 1.2}, {y, -1.2, 1.2}, PerformanceGoal -> "Accuracy", ImageSize -> 250, PlotLabel -> Text["p=" <> ToString@p, FormatType -> TraditionalForm]], {p, {1, 2, 3, 4, 10, 50, 500}}] formats the p= as plain text for me (v10) Nov 26 comment TraditionalForm for PlotLabel with a parameter @Öskå doesn't work Nov 26 revised TraditionalForm for PlotLabel with a parameter added 106 characters in body Nov 26 asked TraditionalForm for PlotLabel with a parameter Oct 12 comment Oddify an even function and vice versa? Is there a particular reason you have to (want to) use the infinite series form of even[] and odd[]? If not, this will get you the graphical parts of the even and odd extension very simply... L = 1; f[x_] = Sqrt[x]; feven[x_] = Piecewise[{{f[x], 0 < x < L}, {f[-x], -L < x < 0}}]; fodd[x_] = Piecewise[{{f[x], 0 < x < L}, {-f[-x], -L < x < 0}}]; GraphicsRow[{Plot[f[x], {x, -L, L}, PlotStyle -> {{Thick, Blue}}], Plot[feven[x], {x, -L, L}, PlotStyle -> {{Thick, Blue}}], Plot[fodd[x], {x, -L, L}, PlotStyle -> {{Thick, Blue}}]}, ImageSize -> 800] Sep 30 awarded Explainer Sep 5 awarded Notable Question Jul 2 awarded Curious Jun 30 awarded Yearling Jun 2 awarded Notable Question Apr 5 awarded Popular Question Mar 23 awarded Nice Question