登录
OEIS基金会由OEIS的用户捐款和西蒙斯基金会的资助。

γ

标志


提示
问候整数序列的在线百科全书!)

T. D. Noe修正案

(也见)诺伊维基页面

(下划线的文本是附加,删除文本是一个删除

显示条目1-10μl旧变化
A000 54 79 素数卢卡斯数(CF.)A000 0 32
历史出版版本
α33诺德4月22日星期二下午2014点20分22秒
地位

编辑

提出

α32诺德4月22日星期二2014点
链接

N.T.D.NOE,<A000 54 79/B0.54 79. TXT>n表,a(n)n=1…28<a>

N.T.D.NOE,<A000 54 79/B0.54 79. TXT>n表,a(n)n=1…28<a>

α31诺德4月22日星期六2014时01分01秒
链接

N.T.D.NOE,<A000 54 79/B0.54 79. TXT>n表,a(n)n=1…28<a>

地位

经核准的

编辑

A08895 Beimrp:两个不同的素数颠倒后产生不同质数的素数。
历史出版版本
α16诺德4月22日星期二2014点
地位

编辑

提出

α15诺德4月22日星期二下午2014点EDT 10
链接

N.T.D.NOE,<A08895/B048 895Y1.TXT>n表,A(n)n=1…468</a。>>条款<*^

Mathematica

上下[ 0 ]=0;上下[ 1 ]=1;上下[6 ]=9;上下[8 ]=8;上下[9 ]=6;FQ[PY]:=模块[{Revp,UpDoup,RevUpDoupP},如果[交集[{2, 3, 4,5, 7 },联合[整数数字] [P] ]!= {},false,rvp= OffDigiTr[反[整数] [P] ];UpDoup= FRODITITS [UpDUn/@整数数字[P] ];RevUpDIPP=OFFICITITS [反向[整数数字[UpDoup] ] ];p!= RIPP & P!= UpDoup & P!= RevPuffDeP & Primeq[Revp]和Primeq [UpDoup] & Primeq [RevuppDIP] ];神经网络=t={};nN=6;do[p=10 ^ n;而[p<2*10 ^ n,p= nExtPrime[P];如果[fq[p],AppEdto[t,p] ],{n,nn}];t(*)诺德4月21日2014*)

α14诺德4月22日星期二2014点
链接

N.T.D.NOE,<A08895/B08895γtxt>n,a(n)n=1。一百八十八四百六十八</a>

Mathematica

上下[ 0 ]=0;上下[ 1 ]=1;上下[6 ]=9;上下[8 ]=8;上下[9 ]=6;FQ[PY]:=模块[{Revp,UpDoup,RevUpDoupP},如果[交集[{2, 3, 4,5, 7 },联合[整数数字] [P] ]!= {},false,rvp= OffDigiTr[反[整数] [P] ];UpDoup= FRODITITS [UpDUn/@整数数字[P] ];RevUpDIPP=OFFICITITS [反向[整数数字[UpDoup] ] ];p!= RIPP & P!= UpDoup & P!= RevUpDeP和& Primeq [Revp]和Primeq [UpDoup] & Primeq[RevUpDoupP],NN=7T= {};神经网络=选择[素数[范围[普里皮普=^N同时[<2×10 ^神经网络]N=下一素数[如果[FQ**[附录[T[],{N神经网络};T(*)4月21日,2014日

α13诺德在4月21日星期一19:03:13 EDT 2014
评论

所有的术语必须以一个开始和结束。-诺德4月21日2014

链接

N.T.D.NOE,<A08895/B048 895.TXT>n表,A(n)n=1…188<a>

Mathematica

上下[ 0 ]=0;上下[ 1 ]=1;上下[6 ]=9;上下[8 ]=8;上下[9 ]=6;FQ[PY]:=模块[{Revp,UpDoup,RevUpDoupP},如果[交集[{2, 3, 4,5, 7 },联合[整数数字] [P] ]!= {},false,rvp= OffDigiTr[反[整数] [P] ];UpDoup= FRODITITS [UpDUn/@整数数字[P] ];RevUpDIPP=OFFICITITS [反向[整数数字[UpDoup] ] ];p!= RIPP & P!= UpDoup & P!= RevUpDeP和& Primeq [Revp]和Primeq [UpDoup] & Primeq[RevUpDupp] ];NN=7;选择[Prim[PrimePi]*(10 ^ NN)],FQ](*)诺德4月21日2014*)

α12诺德在4月21日星期一16:55 30EDT 2014
数据

1061, 1091, 1601、1901, 10061, 10091、16001, 19001, 106861、109891, 168601, 198901、1106881, 1109881, 1606081、1806061, 1809091, 1886011、1889011, 1909081, 10806881、10809881, 11061811, 11091811、11609681, 11698691一千一百八十一万六千零一十一一千一百八十一万九千零一十一一千一百九十万六千九百八十一

α11诺德在4月21日星期六16:5237 EDT 2014
Mathematica

串参数[=串参数[=串参数[=串参数[=串参数[=FQ[PY]:=模块[{Revp,UpDoup,RevUpDoupP},如果[交集[{ 2, 3, 4,5, 7 },联合[整数数字] [P] ]!= {},false,rvp= OffDigiTr[反[整数] [P] ];UpDoup= FRODITITS [UpDUn/@整数数字[P] ];RevUpDIPP=OFFICITITS [反向[整数数字[UpDoup] ] ];p!= RIPP & P!= UpDoup & P!= RevUpDeP和& Primeq [Revp]和Primeq [UpDoup] & Primeq[RevUpDupp] ];NN=7;选择[ Prime[PrimePiPiPi](10 ^ NN]),FQ](*)诺德4月21日2014*)

α10诺德4月21日星期一16:51:39 EDT 2014
评论

在颠倒时产生其他酋长国的酋长国. [γ. []Lekrj-Bead SysI],APR 03 2009

倒数也是可逆素数的可逆素数. [γ. []Lekrj-Bead SysI],APR 04 2009

Mathematica

FQ[PY]:=模块[{Revp,UpDoup,RevUpDoupP},如果[交集[{ 2, 3, 4,5, 7 },联合[整数数字] [P] ]!= {},false,rvp= OffDigiTr[反[整数] [P] ];UpDoup= FRODITITS [UpDUn/@整数数字[P] ];RevUpDIPP=OFFICITITS [反向[整数数字[UpDoup] ] ];p!= RIPP & P!= UpDoup & P!= RevUpDeP和& Primeq [Revp]和Primeq [UpDoup] & Primeq[RevUpDupp] ];NN=7;选择[ Prime[PrimePiPiPi](10 ^ NN]),FQ](*)诺德4月21日2014*)

地位

经核准的

编辑

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ指数γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

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

最后修改4月1日10:33 EDT 2020。包含333159个序列。(在OEIS4上运行)