搜索： a226227-编号：a2262270
|
| |
|
|
A005811号
|
| n（n>0）二进制展开的运行次数；n的格雷码中1的数量。
（原名M0110）
|
|
+10
217
|
|
|
|
0, 1, 2, 1, 2, 3, 2, 1, 2, 3, 4, 3, 2, 3, 2, 1, 2, 3, 4, 3, 4, 5, 4, 3, 2, 3, 4, 3, 2, 3, 2, 1, 2, 3, 4, 3, 4, 5, 4, 3, 4, 5, 6, 5, 4, 5, 4, 3, 2, 3, 4, 3, 4, 5, 4, 3, 2, 3, 4, 3, 2, 3, 2, 1, 2, 3, 4, 3, 4, 5, 4, 3, 4, 5, 6, 5, 4, 5, 4, 3, 4, 5, 6, 5, 6, 7, 6, 5, 4, 5, 6, 5, 4, 5
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,3
|
|
|
评论
|
从a（1）=0开始镜像所有初始2^k段并增加1。
a（n）给出沿龙曲线走n步后的净旋转（以直角测量）克里斯托弗·亨德里（Hendrie（AT）acm.org），2002年9月11日
此序列生成A082410号：（0,1,1,0,1,1，0,0,0,1，1,1，1，…）和A014577号; 与后者相同，但从1、1、0……开始。。。；如果a（n+1）>a（n），则写入“1”；如果没有，则写入“0”。例如。，A014577号（2） =0，因为a（3）<a（2）或1<2-加里·亚当森2003年9月20日
作曲家佩尔·诺尔加德的名字也写在了OEIS中，名为佩尔·诺尔加德。
可用作二项式变换算子：设a（n）=任意S（n）中的第n项；然后提取2^k个字符串，添加词条。这导致S（n）的二项式变换。假设S（n）=1,3,5。。。；然后我们得到字符串：（1），（3，1）（1，3，5，…）=（1，4，12，32，80，…）的二项式变换。示例：8位字符串的和为32，分布为（1，3，3，1）或1，3 3，3 5，1 7；如预期-加里·亚当森2012年6月21日
将所有正奇数视为图的节点。当且仅当对应的两个奇数之和是2的幂时，两个节点才连接。那么a（n）是2n+1和1之间的距离-宋嘉宁2019年4月20日
|
|
|
参考文献
|
N.J.A.Sloane和Simon Plouffe，《整数序列百科全书》，学术出版社，1995年（包括该序列）。
|
|
|
链接
|
J.-P.Allouche、G.-N.Han和J.Shallit，关于P.Barry的一些猜想，arXiv:2006.08909[math.NT]，2020年。
J.-P.Allouche和J.Shallit，k-正则序列的环，理论。计算机科学。，307（2003），3-29。
钱德勒·戴维斯（Chandler Davis）和唐纳德·科努特（Donald E.Knuth），《数字表征和龙曲线——I和II》，《休闲数学杂志》，第3卷，第2期，1970年4月，第66-81页，第3期，70年7月，第133-149页，趣味与游戏论文集2010年，第571-614页。方程式3.2 g（n）=a（n-1）。
S.Kropf和S.Wagner，q-拟加性函数，arXiv:1605.03654[math.CO]，2016年。
萨拉·克罗夫和S.瓦格纳，关于q拟加法和q拟乘法函数，arXiv预印本arXiv:1608.03700[math.CO]，2016。
Helmut Prodinger和Friedrich J.Urbanek，无长相邻相同块的无穷0-1-序列《离散数学》，第28卷，第3期，1979年，第277-289页第一作者的副本在定义3.4中，它们的“变化”v（k）是a（k）。
|
|
|
配方奶粉
|
a（2^k+i）=a（2|k-i+1）+1，对于k>=0和0<i<=2^k-莱因哈德·祖姆凯勒2001年8月14日
a（2n+1）=2a（n）-a（2n）+1，a（4n）=a（2n。
a（j+1）=a（j）+（-1）^A014707号（j） .-克里斯托弗·亨德里（Hendrie（AT）acm.org），2002年9月11日
通用公式：（1/（1-x））*Sum_{k>=0}x^2^k/（1+x^2*（k+1））-拉尔夫·斯蒂芬2003年5月2日
a（0）=0，a（2n）=a（n）+[n奇数]，a（2 n+1）=a[n）+[n偶数]-拉尔夫·斯蒂芬2003年10月20日
a（0）=0，则a（n）=a（楼层（n/2））+（a（楼层）（n/2-贝诺伊特·克洛伊特2014年1月20日
|
|
|
例子
|
将其视为每行有2^k个术语的三角形，前几行为：
1
2, 1
2, 3, 2, 1
2, 3, 4, 3, 2, 3, 2, 1
...
第n行变为下一行的右半；左半部分是第n行的镜像项，增加了一个-加里·亚当森2012年6月20日
|
|
|
MAPLE公司
|
局部i、b、ans；
如果n＝0，那么
返回0；
结束条件：；
ans：=1；
b:=换算（n，基数，2）；
对于i从nops（b）-1到1 by-1 do
如果b[i+1]<>b[i]，则
ans：=ans+1
fi（菲涅耳）
od；
返回ans；
结束进程：
#第二个Maple项目：
a： =n->添加（i，i=位[分割]（位[Xor]（n，iquo（n，2）））：
|
|
|
数学
|
表[Length[Length/@Split[Integer Digits[n，2]]，{n，1，255}]
|
|
|
黄体脂酮素
|
（PARI）a（n）=总和（k=1，n，（-1）^（（k/2^估值（k，2）-1）/2）
（PARI）a（n）=如果（n<1，0，a（n \2）+（a（n \ 2）+n）%2）\\贝诺伊特·克洛伊特2014年1月20日
（哈斯克尔）
导入数据。列表（组）
a005811 0=0
a005811 n=长度$组$a030308_row n
a005811_list=0:f[1]，其中
f（x:xs）=x:f（xs++[x+x`mod`2，x+1-x`mod` 2]）
（Python）
定义a（n）：返回bin（n^（n>>1））[2:].count（“1”）#因德拉尼尔·戈什2017年4月29日
|
|
|
交叉参考
|
囊性纤维变性。A056539号,A014707号,A014577号,A082410号,A030308号,A090079号,A044813号,A165413号,A226227号,A226228型,A226229型.
|
|
|
关键词
|
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
262228元
|
| 对m进行编号，使m的二进制表示中1的所有长度都是质数。 |
|
+10
4
|
|
|
|
3, 6, 7, 12, 14, 24, 27, 28, 31, 48, 51, 54, 55, 56, 59, 62, 96, 99, 102, 103, 108, 110, 112, 115, 118, 119, 124, 127, 192, 195, 198, 199, 204, 206, 216, 219, 220, 223, 224, 227, 230, 231, 236, 238, 248, 251, 254, 384, 387, 390, 391, 396, 398, 408, 411, 412, 415, 432
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
链接
|
|
|
|
数学
|
选择[范围@432，和@@PrimeQ[（长度/@Split@整数位数[#，2]）[[；；；；2]]&](*乔瓦尼·雷斯塔2013年6月1日*）
|
|
|
黄体脂酮素
|
（C）
#包括<stdio.h>
#包括<stdlib.h>
typedef unsigned long long U64；
U64运行[]={0，2，3，5，7，11，13，17，19，23，29，31，37，41，43}，*wr；
#定义MemUSAGE 1ULL<<33
#如果MemUSAGE=1ULL<<33，则定义TOP（1ULL<<9）//<<40 ok
int compare64（常量无效*p1，常量无效*p2）{
如果（*（U64*）p1＝＝*（U64*）p2）返回0；
返回（*（U64*）p1<*（U64*）p2）-1 : 1;
}
void rec（U64位）{
对于（U64 i=0，b；（b=（（位*2+1）<<运行[i]）-1）<TOP++i）
如果（b）*wr++=b，rec（b）；
}
整型main（）{
U64*wr0=（wr=（U64*）malloc（MemUSAGE））；
rec（0）；
//printf（“%llu\n”，wr-wr0）；
q排序（wr0，wr-wr0，8，compare64）；
while（wr0<wr）printf（“%llu，”，*wr0++）；
返回0；
}
（哈斯克尔）
导入数据。列表（group，genericLength）
a226228 n=a226228_列表！！（n-1）
a226228_list=过滤器（全部（==1）。
地图（a010051.genericLength）。
其他。相反。组。a030308_低）[1..]
其中其他[]=[]；其他[x]=[x]；其他（x:_：xs）=x:other xs
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,基础
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
3、7、12、24、28、31、51、56、96、99、103、115、124、127、199、204、224、227、231、248、384、387、396、408、412、415、455、460、499、508、775、792、796、799、819、824、896、899、908、920、924、927、992、995、999、1016、1539、1548、1587、1592、1632、1635、1639、1651、1660
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
此外，只有质数部分的成分的指数。有关合成索引的定义，请参见A298644型例如，387是在序列中，因为它的二进制形式是110000011，而组成[2,5,2]的部分是质数。540不在序列中，因为它的二进制形式是1000011100，并且不是组成[1,4,3,2]的所有部分都是质数。
Maple程序的命令c（n）生成索引为n的合成（End）
|
|
|
链接
|
|
|
|
MAPLE公司
|
运行次数：=proc（L）local j，r，i，k:npr:j:=1；r[j]：=L[1]：对于i从2到nop（L）do，如果L[i]=L[i-1]，那么r[j]:=r[j'，L[i]else j:=j+1:r[j]：=L[i]end if end do:[seq（[r[k]]，k=1..j）]end proc:运行长度：=proc（L）map（nops，Runs（L）））end proc:=proc（n）ListTools:Reverse（convert（n，base，2）））：运行长度（%）结束进程：npr：=进程局部q，j:q:=0：对于j到nopdo if isprime（s[j]）=true则q:=q+1 else end if end do end proc:A:={}：对于n到1661 do如果npr（c（n））=nops（c（n））则A:=`union`（A，{n}）else end-if end do:A；#枫叶计划的大部分原因是W·埃德温·克拉克. #Emeric Deutsch公司2018年1月27日
|
|
|
数学
|
选择[范围@1660，和@@PrimeQ[Length/@Split@Integer Digits[#，2]]&](*乔瓦尼·雷斯塔，2013年6月1日*）
|
|
|
黄体脂酮素
|
（哈斯克尔）
导入数据。列表（group，genericLength）
a226229 n=a226229_列表！！（n-1）
a226229_list=过滤器
（全部（==1）。地图（a010051.genericLength）。组。a030308_低）[1..]
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,基础
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.009秒内完成
|
