(MAGMA公司岩浆)[n eq 1选择1 else Seqint(排序(Intseq(2*Self(n-1))):[1..30]]中的n//布鲁诺·贝塞利2015年10月19日
OEIS服务器: https://oeis.org/edit/global/2944
编辑
经核准的
NestList[FromDigits[ReverseSort[IntegerDigits[2#]]]&,1,30](*需要Mathematica版本11或更高版本*)(*哈维·P·戴尔2019年5月17日*)
囊性纤维变性. 这个 下列的 是 平行 家庭: A000079号 (2^n个), A004094号 (2^n个 颠倒的), A028909号 (2^n个 已排序 向上的), A028910号 (2^n个 已排序 向下), A036447号(双向和反向 数字), 2005年5月15日 (双重的 和 分类 向上的), A263451型 (双重的 和 分类 向下); A000244号 (三^n个), A004167号 (三^n个 颠倒的), A321540型 (三^n个 已排序 向上的), A321539型 (三^n个 已排序 向下), A163632号 (三倍的 和 颠倒), 321542美元 (三倍的 和 分类 向上的), A321541型 (三倍的 和 分类 向下).
囊性纤维变性。A004186号(数字降序)。
a(n+1)=A004186号(2*a(n))-莱因哈德·祖姆凯勒2015年10月19日
(哈斯克尔)
a263451 n=a263451_list!!(n-1)
a263451_list=迭代(a004186.(*2))1
--莱因哈德·祖姆凯勒2015年10月19日
提出
乔恩·肖恩菲尔德:好的,谢谢!
(MAGMA)[n eq 1选择1 else Seqint(排序(Intseq(2*Self(n-1))):n in[1..30]]//布鲁诺·贝塞利2015年10月19日