3

I used Geogebra to draw the graph enter image description here

and I tried Mathematica

Plot[{(x^2 - 1) (x^2 - 4)}, {x, -2.3, 2.3}, 
    AxesStyle -> Arrowheads[{0.0, 0.02}], ImagePadding -> None]

How can I label and add arrow into x-axis and y-axis like above picture?

enter image description here

minhthien_2016
  • 3,347
  • 14
  • 22

1 Answers1

4
Plot[
 {(x^2 - 1) (x^2 - 4)}, {x, -2.26, 2.26},
 AxesStyle -> Arrowheads[Medium],
 AxesLabel -> {"x", "y"},
 ImagePadding -> 20,
 Ticks -> {Range[-2, 2],
   Append[Range[-2, 4], {-9/4, "-9/4"}]},
 LabelStyle -> {14, Bold},
 AspectRatio -> GoldenRatio,
 Epilog -> Text[Style["0", 14, Bold],
   {0, 0}, {-2, 1.5}]]

enter image description here

Bob Hanlon
  • 157,611
  • 7
  • 77
  • 198