OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: a063850-编号:a063850
显示找到的24个结果中的1-10个。 第页12
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
A078970型 库存序列的周期(如A063850美元)从n开始由质数组成。 +20
4
39, 1319, 211319, 12311319, 41122319, 1431221319, 4114232219, 2431321319, 2214333119, 2231143319, 2233311419, 2233311419 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,1
评论
可以证明,任何库存序列都在一个周期中结束,所有周期的项都小于等于10^20。
链接
卡洛斯·里维拉,库存序列与自库存数
例子
以39开头的库存序列是:39、1319、211319、12311319、41122319、1431221319、4114232219、2431321319、2214333119、2231143319、2233114319、。。。。循环为223331141922333311419。。。。2233311419是质数。
数学
g[n_]:=模块[{seen,r,d,l,i,t},seen={};r={},d=整数位数[n];l=长度[d];对于[i=1,i<=l,i++,t=d[i]];如果[!MemberQ[seen,t],r=Join[r,IntegerDigits[Count[d,t]]];r=连接[r,{t}];seen=附加[seen,t]]];起始数字[r]];
pr[n_]:=模块[{r,t,p1,p,a},r={};t=g[n];a=正确;而[!MemberQ[r,t],r=Append[r,t];t=克[t]];r=附加[r,t];p1=压扁[位置[r,t]];p=PrimeQ[Drop[r,p1[[1]]];如果[MemberQ[p,False],a=False';a] ;l={};对于[k=1,k<=10^4,k++,如果[pr[k],l=Append[l,k]]]
交叉参考
囊性纤维变性。A063850美元,A078786号.
关键词
基础,美好的,非n
作者
约瑟夫·佩伊2003年1月14日
状态
经核准的
A112512型 说出上学期看到的内容,与A063850美元,但从2开始。 +20
4
2, 12, 1112, 3112, 132112, 311322, 232122, 421311, 14123113, 41141223, 24312213, 32142321, 23322114, 32232114, 23322114, 32232114, 23322114, 32232114 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,1
评论
最终是周期性的,最终是相同的(转变为)A063850美元.
链接
黄体脂酮素
(Perl)#/usr/bin/perl-l使用严格;使用警告;die“用法:$0<number>”,除非@ARGV==1$_=移位;{print;my(%cnt,%saw);$cnt{$_}++for//克;年月日$看到{$&}++?'':$cnt{$&}.$&/ge;<>中,重做;}__结束__
交叉参考
关键词
基础,容易的,非n
作者
Michele Dondi(blazar(AT)lcm.mi.infn.it),2005年9月9日
状态
经核准的
A112515型 说出上学期看到的内容,与A063850美元但从5开始。 +20
5, 15, 1115, 3115, 132115, 31131215, 23411215, 2213143115, 2241231415, 3224311315, 3322143115, 3322311415, 3322311415, 3322311415, 3322311415, 3322311415, 3322311415 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,1
链接
黄体脂酮素
(Perl)#/usr/bin/perl-l使用严格;使用警告;die“用法:$0<number>”,除非@ARGV==1$_=移位;{print;my(%cnt,%saw);$cnt{$_}++for//克;年月日$看到{$&}++?'':$cnt{$&}.$&/ge;<>,重做;}__结束__
交叉参考
关键词
基础,容易的,非n
作者
Michele Dondi(blazar(AT)lcm.mi.infn.it),2005年9月9日
状态
经核准的
A078786号 库存序列的周期(如A063850美元)以n开头。 +20
1
2, 2, 2, 2, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 1, 1, 1, 1, 1, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 1, 1, 1, 1, 1, 4, 2, 1, 2, 1, 1, 4, 4, 4, 4, 3, 1, 1, 1, 1, 1, 4, 3, 3, 3, 2, 1, 1, 1, 4, 4, 1, 3, 2, 2, 2, 1, 1, 1, 4, 3, 3, 1, 2, 2, 2, 1, 1, 1, 4, 3, 2, 2, 1, 2, 2, 1, 1, 1, 4, 3, 2, 2, 2, 1, 1 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,1
评论
可以证明,任何库存序列都在一个周期中结束,所有周期的项都小于等于10^20。猜想:对于所有n,a(n)<=4。对于以n开头的所有库存序列,检查这一点就足够了,其中n<=10^20。
链接
卡洛斯·里维拉,库存序列与自清点数量
例子
以1开头的库存序列是:1、11、21、1211、3112、132112、311322、232122、421311、14123113、41141223、24312213、32142321、23322114、3232114、2332114。。。。结束于周期2的周期32232114、23322114。因此a(1)=2。
数学
g[n_]:=模块[{seed,r,d,l,i,t},seed={};r={};d=整数[n];l=长度[d];对于[i=1,i<=l,i++,t=d[i]];如果[!MemberQ[seen,t],r=Join[r,IntegerDigits[Count[d,t]]];r=连接[r,{t}];seen=附加[seen,t]]];FromDigits[r]];
per[n_]:=模块[{r,t,p1,p},r={};t=g[n];而[!MemberQ[r,t],r=Append[r,t];t=克[t]];r=追加[r,t];p1=压扁[位置[r,t]];p=p1[2]]-p1[1]];p] ;表[每[i],{i,1,100}]
交叉参考
囊性纤维变性。A063850美元,A078970型.
关键词
基础,美好的,非n
作者
约瑟夫·佩伊2003年1月14日
状态
经核准的
A079466号 编号n,以便“库存”A063850美元of n是一个回文。 +20
1
1, 22, 112, 121, 211, 333, 1113, 1131, 1311, 3111, 4444, 11114, 11141, 11411, 14111, 22233, 22323, 22332, 23223, 23232, 23322, 32223, 32232, 32322, 33222, 41111, 55555 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,2
链接
库存序列与自清点数量在www.primepuzzles.net上
例子
112的“inventory”是2112(两个“1”,一个“2”),这是一个回文。因此112属于该序列。
数学
g[n_]:=模块[{seen,r,d,l,i,t},seen={};r={},d=整数位数[n];l=长度[d];对于[i=1,i<=l,i++,t=d[i]];如果[!MemberQ[seen,t],r=Join[r,IntegerDigits[Count[d,t]]];r=连接[r,{t}];seen=附加[seen,t]]];FromDigits[r]];isPalin[n_]:=(n==起始数字[Reverse[IntegerDigits[n]]]);选择[范围[10^5],isPalin[g[#]]&]
交叉参考
囊性纤维变性。A063850美元。不同于A079676号.
关键词
基础,非n
作者
约瑟夫·佩伊2003年1月14日
状态
经核准的
A079464美元 编号n,以便“库存”A063850美元n是素数。 +20
0
1, 3, 7, 9, 17, 23, 27, 33, 39, 51, 63, 69, 81, 93, 99, 111, 113, 127, 131, 133, 137, 193, 199, 203, 209, 223, 232, 233, 271, 299, 301, 311, 313, 331, 359, 361, 367, 371, 377, 414, 431, 433, 439, 441, 447, 451, 463, 469, 474, 477, 479, 481, 497, 499, 503, 523 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,2
链接
卡洛斯·里维拉,库存序列与自清点数量,(见问题7)
例子
299的“库存”是1229(一个“2”,两个“9”),这是最优的。因此299属于该序列。
数学
g[n_]:=模块[{seen,r,d,l,i,t},seen={};r={},d=整数位数[n];l=长度[d];对于[i=1,i<=l,i++,t=d[[i]];如果[!MemberQ[seen,t],r=Join[r,IntegerDigits[Count[d,t]]];r=连接[r,{t}];seen=附加[seen,t]]];FromDigits[r]];选择[Range[10^3],PrimeQ[g[#]]&]
交叉参考
囊性纤维变性。A063850美元.
关键词
基础,非n
作者
约瑟夫·佩伊2003年1月14日
状态
经核准的
A079465号 编号n,以便“库存”A063850美元n是一个完美的正方形。 +20
0
6, 55, 116, 161, 255, 511, 666, 969, 996, 5311, 9666, 9999, 12255, 12525, 12552, 41199, 41919, 41991, 54246, 54264, 54426, 71177, 71717, 71771, 72255, 72525, 72552, 77117, 77171, 77711, 78055, 83399, 83939, 83993, 89999, 97117, 97171 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,1
链接
库存序列与自清点数量www.primepuzzles.net(见问题7)
例子
511的“库存”是1521(一个“5”,两个“1”)=39^2。因此1521属于该序列。
数学
g[n_]:=模块[{seen,r,d,l,i,t},seen={};r={},d=整数位数[n];l=长度[d];对于[i=1,i<=l,i++,t=d[i]];如果[!MemberQ[seen,t],r=Join[r,IntegerDigits[Count[d,t]]];r=连接[r,{t}];seen=附加[seen,t]]];FromDigits[r]];选择[Range[10^5],IntegerQ[Sqrt[g[#]]&]
交叉参考
囊性纤维变性。A063850美元.
关键词
基础,非n
作者
约瑟夫·佩伊2003年1月14日
状态
经核准的
A079470型 带有主库存编号的主库存(如A063850美元). +20
0
3, 7, 17, 23, 113, 127, 131, 137, 193, 199, 223, 233, 271, 311, 313, 331, 359, 367, 431, 433, 439, 463, 479, 499, 503, 523, 587, 607, 641, 677, 691, 733, 773, 797, 809, 821, 823, 829, 853, 997, 1009, 1069, 1123, 1129, 1187, 1213, 1217, 1223, 1231, 1277, 1291 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,1
链接
卡洛斯·里维拉,库存序列和自清点数量
例子
素数127的库存编号为111217(一个“1”,一个“2”,一个“7”),也是素数。因此127属于该序列。
数学
g[n_]:=模块[{seen,r,d,l,i,t},seen={};r={},d=整数位数[n];l=长度[d];对于[i=1,i<=l,i++,t=d[i]];如果[!MemberQ[seen,t],r=Join[r,IntegerDigits[Count[d,t]]];r=连接[r,{t}];seen=附加[seen,t]]];FromDigits[r]];s={};对于[j=1,j<=10^3,j++,temp=Prime[j];如果[PrimeQ[g[temp]],s=附加[s,temp]]];
交叉参考
囊性纤维变性。A063850美元.
关键词
基础,容易的,非n
作者
约瑟夫·佩伊2003年1月15日
状态
经核准的
A112513型 等同于A063850美元,说出上学期看到的内容,但以3开头。 +20
0
3, 13, 1113, 3113, 2321, 221311, 223113, 222321, 421311, 14123113, 41141223, 24312213, 32142321, 23322114, 32232114, 23322114, 32232114, 23322114, 32232114, 23322114 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,1
评论
最终是周期性的。
链接
黄体脂酮素
(Perl)#/usr/bin/perl-l使用严格;使用警告;die“用法:$0<number>”,除非@ARGV==1$_=移位;{print;my(%cnt,%saw);$cnt{$_}++for//克;年月日$看到{$&}++?“”:$cnt{$&}.$&/ge;<>,重做;}__结束__
交叉参考
关键词
基础,容易的,非n
作者
Michele Dondi(blazar(AT)lcm.mi.infn.it),2005年9月9日
状态
经核准的
A112514号 说出上学期看到的内容,与A063850美元但从4开始。 +20
0
4, 14, 1114, 3114, 132114, 31131214, 23411214, 22132431, 32212314, 23322114, 32232114, 23322114, 32232114, 23322114, 32232114, 23322114, 32232114, 23322114, 32232114 (列表;图表;参考文献;;历史;文本;内部格式)
抵消
1,1
评论
最终是周期性的。
链接
黄体脂酮素
(Perl)#/usr/bin/perl-l使用严格;使用警告;die“用法:$0<number>”,除非@ARGV==1$_=移位;{print;my(%cnt,%saw);$cnt{$_}++for//克;年月日$看到{$&}++?'':$cnt{$&}.$&/ge;<>,重做;}__结束__
交叉参考
关键词
基础,容易的,非n
作者
Michele Dondi(blazar(AT)lcm.mi.infn.it),2005年9月9日
状态
经核准的
第页12

搜索在0.014秒内完成

查找|欢迎|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:2024年6月8日16:02 EDT。包含373224个序列。(在oeis4上运行。)