A293201–OEIS公司

A293201型

具有本原根g的素数p，使得g^3=g^2+g+1模p。

7、11、13、17、19、41、47、53、73、107、131、139、149、163、167、199、227、257、263、269、271、293、311、347、349、359、373、401、419、421、431、479、523、557、599、617、683、701、757、761、769、809、827、863、877、907、911、929、937、953、991、1031、1033 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,1`
	评论	`因为g^3=g^2+g+1，我们有g^4=g^3+g^2+g，g^5=g^4+g^3+g^2，g^6=g^5+g^4+g^3。。。，g^（k+3）=g^A003147号，其中g^（k+2）=g^，（k+1）+g^k（参见Shanks参考）。`
	链接	`罗伯特·伊斯雷尔，n=1..10000时的n，a（n）表` `D.柄，斐波那契原根,文章结尾，光纤。夸脱。，10 (1972), 163-168, 181.`
	MAPLE公司	`过滤器：=proc（p）局部x，r；` `如果不是isprime（p），则返回false fi；` `对于地图中的r（t->rhs（op（t）），[msolve（x^3-x^2-x-1，p）]）do` `如果numtheory:-order（r，p）=p-1，则返回真fi` `od；` `假` `结束进程：` `选择（过滤器，[seq（i，i=3..2000，2）]）#罗伯特·伊斯雷尔2017年10月2日`
	数学	`selQ[p_]：=AnyTrue[PrimitiveRootList[p]，Mod[#^3-#^2-#-1，p]==0&]；` `选择[Prime[Range[2，200]]，selQ](Jean-François Alcover公司2020年7月29日）`
	黄体脂酮素	`（PARI）` `Z（r，p）=znorder（Mod（r，p））==p-1；\\r是否为本原根mod p` `Y（p）=对于（r=2，p-2，如果（Z（r，p）&&Mod（r^3-r^2-r-1，p）==0，return（1）））；0; \\ 测试p` `对于素数（p=2，10^3，如果（Y（p），打印1（p，“，”））；`
	交叉参考	`囊性纤维变性。A003147号（本原根g，使得g^2=g+1 mod p）。` `囊性纤维变性。A293200型（原始根g，使得g^3＝g+1 mod p）。` `上下文中的序列：A214786型 A176834号 A098414号A110583号 A270999型 A103486号` `相邻序列：A293198型 A293199型 A293200型A293202型 A293203型 A293204型`
	关键字	`非n`
	作者	`乔格·阿恩特2017年10月2日`
	状态	`经核准的`

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

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

上次修改时间：美国东部夏令时2024年4月23日15:20。包含371916个序列。（在oeis4上运行。）