1
$\begingroup$

I though I will get a point at f(2)=6, anyone please help me I am new on programming, Thanks

I though I will get a point at f(2)=6, anyone please help me I am new on programming, Thanks

Improve this question
$\endgroup$
3
  • $\begingroup$ Plot works by discretely sampling the function. This would only work in the unlikely event Plot happens to sample exactly at x=2. Best bet here is to just use Epilog->Point[{2,6}] $\endgroup$
    – george2079
    Commented Oct 20, 2017 at 22:00
  • $\begingroup$ Welcome to Mathematica StackExchange. In order to learn how to use this site take the tour. When copying equations from a notebook to your question one should format using inline code by selecting the code and clicking the {} button above the edit window. It is recommended that you browse the Markdown help $\endgroup$
    – Jack LaVigne
    Commented Oct 20, 2017 at 22:51
  • $\begingroup$ Use the code here and do PlotPiecewise[Piecewise[{{2^x, x != 2}, {6, x == 2}}], {x, -1, 3}]. $\endgroup$
    – march
    Commented Oct 20, 2017 at 22:55

1 Answer 1

Reset to default
3
$\begingroup$

There is nothing wrong with your piecewise function, but Mathematica's plotting algorithm really can't show an intervals are less than single pixel. A single real number, which has measure zero, simply doesn't show up. There are ways to deal with the problem. Here are two. One of them may be what you want.

Force Plot to draw the point.

pw1[x_] := Piecewise[{{2^x, x != 2}}, 6]
Plot[pw1[ x], {x, -1, 3}, Epilog -> {Point[{2, pw1[2]}]}]

pw1

Redefine the function so it takes the value 6 over a large enough interval.

With[{d = .015},
  With[{span = 2 + {-1, 1} d},
    pw2[x_] := Piecewise[{{6, Between[x, span]}}, 2^x]]]
Plot[pw2[x], {x, -1, 3}, PlotPoints -> 80]

pw2

Note that I had to ask for extra plot points to get the small interval to show up.

Improve this answer
$\endgroup$

Not the answer you're looking for? Browse other questions tagged or ask your own question.