I use Mathematica to plot

```
f(x_) := -(1/
8) (18 - 280 x^2 - 4 x^4 + 8 x^6 +
2 x^8 + (81 + 108 x^2 + 54 x^4 + 12 x^6 + x^8) Cos(
4 π x) + (-64 + 128 x^2 - 64 x^4) Cos(
2 (-2 + Sqrt(5)) π x) + (1 - 4 x^2 + 6 x^4 - 4 x^6 +
x^8) Cos(
4 (-2 + Sqrt(5)) π x) + (-18 + 24 x^2 + 4 x^4 - 8 x^6 -
2 x^8) Cos(
2 π x - 2 (-2 + Sqrt(5))π x) + (-18 + 24 x^2 +
4 x^4 - 8 x^6 - 2 x^8) Cos(
2 π x + 2 (-2 + Sqrt(5)) π x)) Sin(π x)^2;
Plot({0, If(f(x) >= 0, 10^1.5)}, {x, 0, 200},
PlotStyle -> {Directive(White, CapForm("Butt"), Opacity(-1),
Thickness(0)),
Directive(Black, CapForm("Butt"), Opacity(10^10), Thickness(.05))},
PlotPoints -> 5000000, MaxRecursion -> 6, WorkingPrecision -> 100,
AspectRatio -> 1/40, Axes -> {True, False})
```

Even when I use ` PlotPoints-> 5*10^6`

and ` MaxRecursion-> 15`

it does not give me the whole result, some parts of the solutions are missing (I notice this when I plot it for a short domain like $90<x<100$). Then, can I be hoping to get the whole result by other software like Matlab or Maple? If someone has had experience in working with all these programs, please tell me which program is more efficient in detailed plotting? I am not familiar with those programs, and I want to know if they are more accurate in this sense, try them out.

Another question, if I increase the number of ` PlotPoints`

to $10^{10}$, will it be safe for my laptop (core i7)? Since it takes much time and fan starts working loudly.

P.S. Is there a forum like this for Maple?