|
| |
|
| A276986型 |
| 有（1,2,3，…，n）置换p的数n，使得k+p（k）是1≤k≤n的加泰罗尼亚数。 |
|
1
|
|
|
|
0, 1, 3, 4, 9, 10, 12, 13, 28, 29, 31, 32, 37, 38, 40, 41, 90, 91, 93, 94, 99, 100, 102, 103, 118, 119, 121, 122, 127, 128, 130, 131, 297, 298, 300, 301, 306, 307, 309, 310, 325, 326, 328, 329, 334, 335, 337, 338, 387, 388, 390, 391, 396, 397, 399, 400, 415, 416
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,3
|
|
|
评论
|
n> 当且仅当加泰罗尼亚语数字c使得c/2<=n<c和c-n-1在序列中时，=1才在序列中-罗伯特·伊斯雷尔2016年11月20日
|
|
|
链接
|
|
|
|
配方奶粉
|
|
|
|
例子
|
3在序列中，因为（1,2,3）的置换（1,3,2）按项相加得到（2,5,5），而2和5都是加泰罗尼亚数。
|
|
|
MAPLE公司
|
S： ={0}：
因为我从1岁到8岁
c： =二项式（2*i，i）/（i+1）；
S： =S联合图（t->c-t-1，S）；
操作：
|
|
|
数学
|
加泰罗尼亚语收件人[n0_]：=
模[{n=n0}，k=1；L={}；
而[CatalanNumber[k]<=2*n，L={L，CatalanNumber[k]}；k++]；
L=压扁[L]]
perms[n0_]：=模块[{n=n0，S，func，T，T2}，
func[k_]：=案例[CatalanTo[n]，x_/；1<=x-k<=n]-k；
T=元组[表[func[k]，{k，1，n}]]；
T2=箱[T，x_/；长度[Union[x]]==长度[x]]；
长度[T2]]
选择[Range[41]，perms[#]>0&]
|
|
|
交叉参考
|
|
|
|
关键字
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
