|
|
|
|
#19通过乔瓦尼·雷斯塔2019年4月12日星期五08:13:41 EDT |
|
|
|
#18通过乔格·阿恩特2019年4月12日星期五美国东部夏令时06:18:10 |
|
|
|
#17通过米歇尔·马库斯2019年4月12日星期五00:36:20 EDT |
|
|
|
#16个通过米歇尔·马库斯2019年4月12日星期五00:36:17 EDT |
| 数学
|
f[s_]:=追加[s,长度@Select[s,字符串位置[ToString@FromDigits@IntegerDigits[长度@秒+1,2],ToString@FromDigits@IntegerDigits[#,2]]!={} & ] ]; 巢[f,{1},79](*_Robert G.Wilson v_ *)_,11月 01 2006*)
|
| 状态
|
提出
编辑
|
|
|
|
#15通过罗伯特·伊斯雷尔2019年4月11日星期四23:04:20 EDT |
|
|
|
#14通过罗伯特·伊斯雷尔2019年4月11日星期四23:03:26 EDT |
| MAPLE公司
|
S[1]:=“1”:
S公司[1]:= "1":n从2到100 do
日期:
日:seq(A[i],i=1..100)#罗伯特·伊斯雷尔2019年4月11日
|
|
|
|
#13通过罗伯特·伊斯雷尔2019年4月11日星期四23:02:41 EDT |
|
|
|
#12通过罗伯特·伊斯雷尔2019年4月11日星期四23:00:23 EDT |
| 链接
|
Robert Israel,<a href=“/A122954号/b122954.txt“>n,a(n)表,n=1..10000</a>
|
| MAPLE公司
|
A[1]:=1:
S[1]:=“1”:表示n从2到100 do
B: =转换(转换(n,二进制),字符串);
A[n]:=否(选择(t->搜索文本(S[t],B)>0,[$1..n-1]));
S[n]:=转换(转换(A[n],二进制),字符串);
od:序列(A[i],i=1..100)#罗伯特·伊斯雷尔2019年4月11日
|
| 状态
|
经核准的
编辑
|
|
|
|
#11通过乔恩·肖恩菲尔德2015年3月21日星期六06:14:07 EDT |
|
|
|
#10个通过乔恩·肖恩菲尔德2015年3月21日星期六美国东部夏令时06:14:05 |
| 评论
|
k的首次出现:1、3、4、7、6、14、12、11、21、20、22、28、26、50、23、39、29、44、52、57、46、47、77、55、59。。。,。, ...
|
| 扩展
|
更多术语来自 _Robert G.Wilson诉 _,2006年11月1日
|
| 状态
|
经核准的
编辑
|
|
|
|