关于Mathematica使用的简单问题
题目
关于Mathematica使用的简单问题
我要求
RSolve[{a[n + 3] == 2/3* a[n] + a[n + 1]/3,a[1] == 2/3,a[2] = 0,
a[3] = 2/9},a[n],n]
结果RSolve::deqn:Equation or list of equations expected instead of 0 in the first argument {a[1+n]==(2 a[n])/3+1/3 a[1+n],a[1]==2/3,0,2/9}.
于是改成RSolve[{a[n] == 2/3 a[-3 + n] + 1/3 a[-2 + n],a[1] == 2/3},a[n],n]
结果
{{a[n] ->
1/6 (4 + 3 C[1] + I Sqrt[15] C[1] +
6 (-(1/2) - 1/2 I Sqrt[5/3])^n C[1] + 3 C[2] -
I Sqrt[15] C[2] + 6 (-(1/2) + 1/2 I Sqrt[5/3])^n C[2])}}
首先,上面这个通项中的C[1],
还有,为什么我之前的写法不行,没有a2,a3这个对吗
分不是问题,最好答详细些
答案
=是赋值,a[2] = 0 结果为0
相当于求:
RSolve[{a[n + 3] == 2/3*a[n] + a[n + 1]/3, a[1]==2/3,0,2/9}, a[n], n]
C[1],C[2]是任意常数.
其实,应该:
RSolve[{a[n + 3] == 2/3*a[n] + a[n + 1]/3, a[1] == 2/3, a[2] == 0,
a[3] == 2/9}, a[n], n]
a[n] -> (15 (I + Sqrt[15]) + (45 I -
11 Sqrt[15]) (-(1/6) I (-3 I + Sqrt[15]))^n -
4 (-(1/2) + 1/2 I Sqrt[5/3])^n (15 I + Sqrt[15]))/(
60 (I + Sqrt[15]))
a[n] ->1/4+ ( (45 I -
11 Sqrt[15]) (-(1/6) I (-3 I + Sqrt[15]))^n -
4 (-(1/2) + 1/2 I Sqrt[5/3])^n (15 I + Sqrt[15]))/(
60 (I + Sqrt[15]))
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
- 父子的年龄和是60岁,且父亲年龄是儿子是4倍,那么儿子多少岁?
- 追击应用题如何用方程解
- 一辆轿车3/4小时行驶了75千米,这辆车1小时行驶多少千米?这辆车从市中心到郊区办事行驶2/5小时,行驶了多少千
- 《我与地坛》佳句赏析
- 这些国家的半球位置和纬度位置
- 某自行车生产项目在正常年度的销售单价为180元(不含税),每辆自行车的变动成本为141元,年总固定成本110万元.如销售税率为5%,盈亏平衡点的销售额为( )万元.
- 已知函数f(m)=㎡+4m+3a,f(bm)=16㎡-16m+9,其中m∈R,ab为常数,则方程f(am+b)=o解集为?
- 黎曼函数在无理点处可导吗?为什么?
- 一定温度下,N2O5可发生下列反应,一:2N2O5=4NO2+O2,二:2NO2=2NO+O2
- 他说:“我——我——”
热门考点