mathematica高手请指点,数学高手,微积分

来源:百度知道 编辑:UC知道 时间:2024/06/24 15:20:19
Cosx-Pi/2, (x<-Pi/2)
f(x)= x, (-Pi/2<=x<=1)
Sin(x-1)+1, (x>1)

求作f(x)在区间[-15,15]的图像,并求f(-10)、f(5)的值

小弟今天第一次接触 mathematica 求高手指点,给我那个语句吧~~
不怕丢人,我自己乱写的是“\!\(Plot[Which[x < \(-\(π\/2\)\), Cos[x] - π\/2, \(-π\)/2 ≤ x ≤ 1,
x, x > 1, Sin[\([x - 1]\) + 1], {x, \(-15\), 15}]]\)”错是肯定错的,哪位大哥帮下忙~~!谢谢
显示出来有点乱了,F(X)后应该是个大括号,后面的3行都是在大括号里的,方程组啊~~~
我自己写的语句里\全没有的,我复制来没注意
jimogsh 江山有水 两位大哥,不好意思,试过了,还是不行啊~~~
求f(-10)、f(5)的值的语句是什么啊?

Clear[x, y];
Plot[Which[x < -\[Pi]/2, Cos[x] - \[Pi]/2, -\[Pi]/2 <= x <= 1, x,
x > 1, Sin[x - 1] + 1], {x, -15, 15}]

{x, -15, 15}是Plot的条件,只能放在Which[]之外,Plot[Which[],{}]才是对的
Plot[Which[,{}]]这样少了Plot的条件

f[x_] := Which[x < -\[Pi]/2, Cos[x] - \[Pi]/2, -\[Pi]/2 <= x <= 1, x,
x > 1, Sin[x - 1] + 1];
f[-10]或f[5]

你的问题在于,方括号括错地方了,Sin[[x-1]+1]后漏了"]",而最后又多了一个“]”。实际上这个“]”是Which的,它到此终止,{x,-15,15}是Plot的范围。

补充:1.最前与最后的两个方括号,字体是否不对?
2.Sin[[x-1]+1],此中的[x-1]是什么?如果仅仅是表达式的话,那么应该改成圆括号,即Sin[(x-1)+1].你再把原题看一下,问题很有可能就出在这里

我试了一下,可以画出

f[-10]可以求出f(-10),你若求不出,正好说明你f[x_]的定义不对.
另,f[x]/.x->-10也可求出f[-10],还有 -10//f 也行

再试试吧

你自己写的基本上是对的,有些符号上的小问题,稍微改一下就可以了
Plot[Which[x < -(\[Pi]/2), Cos[x] - \[Pi]/2, -\[Pi]/2 <= x <= 1, x,
x > 1, Sin[x - 1] + 1], {x, -15, 15}]

你原来的是错误的,我给你改了啊
按照我的代码是