|
|
|
|
|
|
|
|
|
#23通过OEIS服务器2024年4月9日星期二16:38:38 EDT |
|
| 链接
|
Chai Wah Wu，<a href=“/A018847号/b018847号_1.txt“>n的表，n=1..100000时a（n）（M.F.Hasler的术语1..648）
|
|
|
|
|
|
|
#22通过阿洛伊斯·海因茨2024年4月9日星期二16:38:38 EDT |
|
|
|
|
|
讨论
|
| 2009年4月2日
| 16时38分
| OEIS服务器：已将新的b文件安装为b018847.txt。旧的b文件现在为b018847_1.txt。
|
|
|
|
|
|
|
#21通过柴华武2024年4月9日星期二16:14:47 EDT |
|
|
|
|
|
|
|
#20通过柴华武2024年4月9日星期二16:14:36 EDT |
|
| 链接
|
M（M）.F类.哈斯勒柴 华 吴，<a href=“/A018847号/b018847号_1.txt“>n表，n=1时为a（n）。。64810000</年>> (条款 1..648 从 M（M）.F类.哈斯勒)
|
|
|
|
|
|
|
#19通过柴华武2024年4月9日星期二16:13:46 EDT |
|
| 黄体脂酮素
|
（Python）
从itertools导入计数，islice
从sympy导入isprime
定义A018847号_gen（）：#术语生成器
r、 t，u=“”。maketrans（“69”，“96”），集合（“0125689”），{0，1，2，5，8}
对于计数（1）中的x：
对于范围（10**（x-1），10**x）中的y：
如果y%10（单位：u）：
s=str（y）
如果集<=t且isprime（m:=int（s+s[-2:：-1].translate（r））：
产量m
对于范围（10**（x-1），10**x）中的y：
s=str（y）
如果集<=t且isprime（m:=int（s+s[：：-1].translate（r））：
产量m
A018847号_list=列表（岛屿(A018847号_发电机（），20））#柴华武2024年4月9日
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#18通过迈克尔·德弗利格2022年6月4日星期六22:33:06 EDT |
|
|
|
|
|
|
|
#17通过埃里克·罗兰2022年6月4日星期六22:32:41 EDT |
|
|
|
|
|
|
|
#16通过埃里克·罗兰2022年6月4日星期六22:32:36 EDT |
|
| 数学
|
lst={}；fQ[n_]：=块[{allset={0，1，2，5，6，8，9}，id=整数位数@n}，并集@Join[id，allset]==allset&&Reverse[id/.{6->9，9->6}]==id]；执行[If[底漆Q@n && fQ@n，附录[lst，n]{]], {n、 70万}] (* _}];第一次(* _Robert G.Wilson v_，2007年2月27日*）
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#15通过查尔斯·格里特豪斯四世2012年7月14日星期六11:40:44 EDT |
|
| 数学
|
lst={}；fQ[n_]：=块[{allset={0，1，2，5，6，8，9}，id=整数位数@n}，并集@Join[id，allset]==allset&&Reverse[id/.{6->9，9->6}]==id]；做[If[底漆Q@n && fQ@n时，附加到[lst，n]，{n，700000}] (*}] (* _罗伯特·威尔逊v(rgwv（相对湿度）(在)rgwv（相对湿度）.通用域名格式),_,2007年2月27日*）
|
|
|
|
|
讨论
|
| 7月14日星期六
| 11:40
| OEIS服务器以下为：https://oeis.org/edit/global/1816
|
|
|
|
|
|
|
#14通过乔格·阿恩特2012年5月5日星期六美国东部夏令时04:14:22 |
|
|
|
|
|
|
