=是赋值,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]))
关于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这个对吗
分不是问题,最好答详细些
我要求
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这个对吗
分不是问题,最好答详细些
数学人气:738 ℃时间:2020-04-13 16:34:46
优质解答
我来回答
类似推荐
猜你喜欢
- 1when must i catch the bus?回答:i must be catch the
- 2求一篇"给家长的一封信"..500字左右...
- 3用火柴棒按图中的方式搭图形,按照这种方式搭下去,搭第n个
- 4两个矩阵相似的充要条件是什么?
- 5"一直是公众注意的焦点" 的英语翻译?
- 6如果M,N在数轴上表示的数是m,n,|m|=2|n|,m,n之间的距离是3.
- 7“泪眼蒙眬”这个词有没有错别字?
- 8把一个木块放入盛满酒精的容器中,溢出酒精的质量4g,该木块受到的浮力是——若把该木块放在盛满水面上的
- 9would引导的特殊疑问句怎么回答?Would you like to go shoping with me,mom?
- 10函数y=x^2-4x+1,x∈[2,正无穷)的反函数为