0
$\begingroup$

For example

enter image description here

But I want to strip those box edge except the bottom ones like this

enter image description here

Note that there is still one redundant edge left, because erasing it will be quite ugly with my image editing tool. Also I need the "y" axis labeled like 2D plot case.

I search the documentation, did't find a way to detailed control the box edge.

$\endgroup$
3
$\begingroup$

Something like this (playing with AxesEdge)?:

Plot3D[Exp[-x^2 - y^2], {x, -2, 2}, {y, -2, 2}, Axes -> {True, True, False}, 
Boxed -> False, AxesLabel -> {Style["x", 12, Bold], Style["y", 12, Bold], None}, 
ViewPoint -> {0, -2, 2}, AxesEdge -> {Automatic, {-1, -1}, None}]

enter image description here

$\endgroup$
  • $\begingroup$ Great! Exactly what I want. I didn't find AxesEdge before.+1 $\endgroup$ – matheorem Jan 29 '18 at 15:08
1
$\begingroup$

Try this:

Plot3D[-x^2, {x, -1, 1}, {y, -1, 1}, Boxed -> False, 
 ViewPoint -> {-1.94, -1.94, 1.94}]

enter image description here

May be it will do for you.

If not, you may remove all automatic axis and the box and draw the axis by hand as follows, for example:

 Show[{
  Plot3D[-x^2, {x, -1, 1}, {y, -1, 1}, 
   PlotRange -> {{-1.2, 1.3}, {-1.3, 1}, {-1, 0.2}}, Axes -> None, 
   Boxed -> False, ViewPoint -> {-1.94, -1.94, 1.94}],
  Graphics3D[{Arrow[{{-1, -1, -1}, {1.1, -1, -1}}], 
    Arrow[{{-1.1, 1, -1}, {-1.1, -1.2, -1}}]}]
  }]

enter image description here

Then you will, however, need to also draw the ticks and figures in addition, which I did not do here. It cab be done by the same statement Graphics3D.

Have fun!

$\endgroup$
  • $\begingroup$ Hi, @Alexei Boulbitch. Thank you so much for answering. It seems that José Antonio Díaz Navas's answer is a more proper one : ) $\endgroup$ – matheorem Jan 29 '18 at 15:09

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

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