Plot[{x, -x, 4 Sin[x], 3 Cos[x], 5 Sin[x]*Cos[x], 1 - x^2, 1/(x + 7), 2 - 3 x, 3 x + 1, Tan[x], Sinh[x], Log[x], 2^(x/3), x^3 - x^2}, {x, -5, 5},PlotStyle -> {Red, Red, Red, Red, Red, Red, Blue, Blue, Blue, Blue,
Green, Green, Green, Green}] 楼主的函数太长,故此用简单的函数代替。楼主只要把你的函数代替式中的函数即可。另,其中X的取值范围也应做相应的改变。至于得到各交点的值,
|