|
| |
|
| A138061号 |
| 该序列是由替换形成的三角形序列：（法语侧边图）1->1,2；2->3;3->4;4->1; 作为马尔可夫式替换形式。结果是微分多项式系数形式。（第一个零省略）。 |
|
0
|
|
|
|
2, 2, 6, 2, 6, 12, 2, 6, 12, 4, 2, 6, 12, 4, 5, 12, 2, 6, 12, 4, 5, 12, 7, 16, 27, 2, 6, 12, 4, 5, 12, 7, 16, 27, 10, 22, 36, 52, 2, 6, 12, 4, 5, 12, 7, 16, 27, 10, 22, 36, 52, 14, 30, 48, 68, 18, 2, 6, 12, 4, 5, 12, 7, 16, 27, 10, 22, 36, 52, 14, 30, 48, 68, 18, 19, 40, 63, 88, 23, 24
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
行总和为：
{0, 2, 8, 20, 24, 41, 91, 211, 389, 696, 1307}
这使用了法国侧向图形方法，如：
创建多项式形式的这些序列是为了查看
分形隐式图像看起来像序列，而不是序列：
清除[a，s，p，t，m，n，t，p，k]
（*替换*）
s[1]={1,2}；s[2]={3}；s[3]={4}；s[4]={1}；
t[a_]：=压扁[s/（AT）a]；
p[0]={1}；p[1]=t[p[0]]；
p[n]：=t[p[n-1]]；
a=表[p[n]，{n，0，12}]；
k=表[D[应用[Plus，表[
a[[n]][[m]]*x^（m-1），{m，1，长度[a[[n]]}]，x]，{n，3，13}]；
清除[x，y，a，b，f，z，p]；
nr=k/。x->z；
p[z_]=应用[次数，nr]；
z=x+I*y；
f[x_，y_]=Re[1/（p[z]）]；
轮廓图[f[x，y]，{x，-1.61,1.61}，{y，-1.61，1.61}，绘图点->{300，300}，图像大小->600，颜色函数->（色调[2#]&）]
|
|
|
链接
|
|
|
|
配方奶粉
|
（法语侧边图）1->1,2；2->3;3->4;4->1; 代换->p（x，n）；out_n，m=系数（dp（x，n）/dx）。
|
|
|
例子
|
省略了第一个零：
{2},
{2, 6},
{2, 6, 12},
{2, 6, 12, 4},
{2, 6, 12, 4, 5, 12},
{2, 6, 12, 4, 5, 12, 7, 16, 27},
{2, 6, 12, 4, 5, 12, 7, 16, 27, 10, 22, 36, 52},
{2, 6, 12, 4, 5, 12, 7, 16, 27, 10, 22, 36, 52, 14, 30, 48, 68, 18},
{2, 6, 12, 4, 5, 12, 7, 16, 27, 10, 22, 36, 52, 14, 30, 48, 68, 18, 19, 40, 63, 88, 23, 24, 50},
{2, 6, 12, 4, 5, 12, 7, 16, 27, 10, 22, 36, 52, 14, 30, 48, 68, 18, 19, 40, 63, 88, 23, 24, 50, 26, 54, 84, 116, 30, 31, 64, 33, 68, 105}
|
|
|
数学
|
清除[a，s，p，t，m，n]（*替换*）s[1]={1,2}；s[2]={3}；s[3]={4}；s[4]={1}；t[a_]：=压扁[s/@a]；p[0]={1}；p[1]=t[p[0]]；p[n]：=t[p[n-1]]；a=表[p[n]，{n，0，10}]；压扁[a]；b=表[系数列表[D[应用[Plus，表[a[n]][[m]]*x^（m-1），{m，1，长度[a[[n]]}]，x]，x]{n，1，11}]；压扁[b]表[Apply[Plus，Coefficient List[D[Apply[Plus，Table[a[n]][[m]]*x^（m-1），{m，1，Length[a[[n]]}]，x]，x]]，{n，1，11}]；
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,未经编辑的,标签
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
