A046145-OEIS公司

A046145号

模n的最小本原根，如果不存在根，则为0。

0, 0, 1, 2, 3, 2, 5, 3, 0, 2, 3, 2, 0, 2, 3, 0, 0, 3, 5, 2, 0, 0, 7, 5, 0, 2, 7, 2, 0, 2, 0, 3, 0, 0, 3, 0, 0, 2, 3, 0, 0, 6, 0, 3, 0, 0, 5, 5, 0, 3, 3, 0, 0, 2, 5, 0, 0, 0, 3, 2, 0, 2, 3, 0, 0, 0, 0, 2, 0, 0, 0, 7, 0, 5, 5, 0, 0, 0, 0, 3, 0, 2, 7, 2, 0, 0, 3, 0, 0, 3, 0, 0, 0, 0, 5, 0, 0, 5, 3, 0, 0 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`0.4`
	评论	`索引0处的值0表示0没有基元根，但索引1处的0表示1有一个基元根0，这是序列中唯一的实数0。` `a（n）非零当且仅当n为2、4或形式p^k或2*p^k，其中p是奇素数且k>0-汤姆·埃德加2014年6月2日`
	链接	`T.D.Noe，n，a（n）表，n=0.-10000` `佩特里斯·西里什，有限域几何的交叉比格罗宁根大学学士论文（荷兰，2024年）。见第17页。` `埃里克·魏斯坦的数学世界，基本根。`
	MAPLE公司	`A046145号：=进程（n）` `如果n<=1，则` `0;` `其他的` `pr:=numtheory[primroot]（n）；` `如果pr=失败，则` `返回0；` `其他的` `回报率；` `结束条件：；` `结束条件：；` `结束过程：` `序列(A046145号（n），n=0..110）#R.J.马塔尔，2010年7月8日`
	数学	`smallestPrimitiveRoot[n_/；n<=1]=0；smallestPrimitiveRoot[n_]：=块[{pr=PrimitiveRoot[n]，g}，如果[！NumericQ[pr]，g=0，g=1；While[g<=pr，If[CoprimQ[g，n]&&MultiplicativeOrder[g，n]==EulerPhi[n]，Break[]]；g++]]；g] ；smallestPrimitiveRoot/@Range[0，100](Jean-François Alcover公司，2012年2月15日）` `f[n_]：=块[{pr=PrimitiveRootList[n]}，如果[pr=={}，0，pr[[1]]]；数组[f，105，0]（v10.0罗伯特·威尔逊v2014年11月4日）`
	黄体脂酮素	`（PARI）{A046145号（n） =对于（q=1，n-1，如果（gcd（q，n）==1&znorder（Mod（q，n））==eulerphi（n），返回（q）；）；0; } /V.拉曼，2012年11月22日，编辑马克斯·阿列克塞耶夫2017年4月20日/` `（Perl）使用theory“：all”；说“$_”，znprimroot（$_）\|0代表0..100#达娜·雅各布森，2017年3月16日`
	交叉参考	`囊性纤维变性。A001918号,A046144号,A046146号,A002233号,A071894号,A219027型,A008330号,A010554号,A111076号,A285512型,A285513型,A285514型.` `上下文中的序列：A118176号 A005731号 A132962号A103309号 A248207号 A174621号` `相邻序列：A046142号 A046143号 A046144号A046146号 A046147号 A046148号`
	关键词	`非n,容易的,美好的`
	作者	`埃里克·韦斯特因`
	扩展	`初始条款修改人哈里·史密斯2005年1月27日`
	状态	`已批准`