For comparison with other CAS choose from: Axiom Derive Maple Mathematica Reduce
plot(sin(%e^
x), x, 0, %pi, "Time", "Signal", false);
plot([bessel_j[0](x), bessel_j[2](x), bessel_j[5](x)], x, 0, 10, false, "Value", "Bessel Functions BesselJ(n, x)");
![]()