3

so this is my code enter image description here and this is my output enter image description here

My quetion is why does the fill stop at sqrt(3)/2 and does not fill in the rest of the area. I am trying to make it so that the area between the three graphs is filled in.

Kiril
  • 31
  • 1

1 Answers1

3
Plot[{ArcTan[x], ArcSin[x], Pi/3, If[x < 1, Min[ArcSin[x], Pi/3], Pi/3]}, 
 {x, 0, 2}, 
 PlotStyle -> {Magenta, Blue, Green, None}, 
 BaseStyle -> Thick, Filling -> {1-> {{4}, {Red, None}}}]

enter image description here

kglr
  • 394,356
  • 18
  • 477
  • 896