我是这样写的
Clear[f, x]
f[x_] := 0 /; x == 0
f[x_] := 1/x - Floor[1/x] /; 0 < x <= 1
NIntegrate[f[x], {x, 0, 1}]
然后它提示
NIntegrate::slwcon: Numerical integration converging too slowly; suspect one of the following: singularity, value of the integration is 0, highly oscillatory integrand, or WorkingPrecision too small. >>
NIntegrate::ncvb: NIntegrate failed to converge to prescribed accuracy after 9 recursive bisections in x near {x} = {0.201156}. NIntegrate obtained 0.41863837668716997` and 0.0015768858959068171` for the integral and error estimates. >>
最后输出0.418638
题目那个中括号就是取整。
请问各位大虾,怎么在mathematica中划出分段函数的图象?
g[x_ \/; x >= 0] := x^2 g[x_ \/; x < 0] := 1 Plot[g[x], {x, -3, 3}]
怎么把mathematica 所得近似解带入另一个函数求值?如:算出f(x)=0的...
f[x_] := (10 - 5 Cos[x])\/Sin[x] + (12 - 5 Sin[x])\/Cos[x]然后你的程序就可以正常运行了,然后由于你用的是循环反复赋值,现在你的所谓x0,就已经存在那个x里了,不信你另起一段敲个x再Shift+Enter试试?所以,这时候你直接输g[x]就能得到你要的东西了。而实际上,以上解题...
如何用Mathematica输出想要的计算结果?
……执行之后就输出了呗。还是说你要算具体值?那就 h[2](* 1\/50 (-9 + Sqrt[3] - 7 (16 - Sqrt[3])^2 + (16 - Sqrt[3])^3) *)呗。
使用maple或mathematica对复杂分段函数进行傅里叶分析,应该如何...
定义分段函数时,不要使用这种基于模式匹配的定义方法,这种方法定义的函数极度不适合算术运算。正规做法是用piecewise:f[x_] := piecewise[{{e^-x, 0 <= x <= 1}}];fouriertrigseries[f[x], x, 10]
mathematica中分段函数怎么定义?
可以直接用If定义函数。也可以用 条件符号"\/;"定义成分段的。比如:ClearAll;f := 3 \/; x <= 0;f := 4 \/; 0 <= x <= 1;f := 5 \/; 1 <= x <= 2;f := 6 \/; 2 <= x <= 3;f := 7 \/; 3 <= x <= 4;f := 8 \/; 4 <= x h = Plot, {x, -2, 6},...
如何用Mathematica计算积分
1,定积分的求解主要命令是Integrate[f,{x,min,max}], 或者使用工具栏输入也可以。例如求 In[6]:=Integrate[x^2Exp[ax],{x,-4,4}].这条命令也可以求广义积分.例如求 In[7]:=Integrate[1\/(x-2)^2,{x,0,4}]求无穷积也可以,例如 In[8]:=Integrate[1\/x^4,{x,1,Infinity}]如...
如何用Mathematica计算积分
一, 定积求解主要命令Integrate[f,{x,min,max}] 或者使用工具栏输入例求 In[陆]:=Integrate[x^二Exp[ax],{x,-四,四}]. 条命令求广义积. 例求 In[漆]:=Integrate[一\/(x-二)^二,{x,0,四}] 求穷积例 In[吧]:=Integrate[一\/x^四,{x,一,Infinity}] 广义积发散能给结例: In...
如何用mathematica观察函数展开成的傅里叶级数的部分和逼近f(x)的情况...
给一个f(x)=x (x \\in (0,\\pi))的例子吧:Simplify[2\/Pi * Integrate[Sin[n x] x, {x, 0, pi}],Assumptions -> n \\[Element] Integers]得到正弦的系数:(因为延拓成了奇函数)-2*((-1)^n\/n)然后画出来即可,搞点花样吧,使用了Manipulate,这样可以动感一点:Manipulate[Show[{...
Mathematica中如何设置分段函数
你的用法不对,分段函数的定义方法有很多种方法,你的两种方法可以修改如下:f[x_] := 1\/34*x - 25\/17 \/; x <= 84;f[x_] := 1 \/; x > 84 && x <= 112;f[x_] := -1\/68*x + 45\/17 \/; x > 112;与 Cn[x_] := Piecewise[{{1\/34*x - 25\/17, x <= 84},...
怎么在mathematica4画分段函数。。
f[x_] = Piecewise[{{x - 1, x >= 1}, {x^2, -1 <= x <= 1}, {1, x < -1}}]