1，1
文琴佐·利班迪，n=1..225的n，a（n）表
Prime[选择[范围[10^6]，PrimitiveRoot[Prime[#]]==24&]]
（*或*）
选择[Prime@Range@1000000，PrimitiveRoot@\35;==24&](*罗伯特·G·威尔逊五世2001年5月11日*）
（1249）如果！isprime（n），返回（0））；对于（k=2，23，if（znorder（Mod（k，n））==n-1，return（0））；znorder（Mod（24，n））==n-1\\查尔斯R格雷特豪斯四世2015年4月28日
囊性纤维变性。A001918号,A001126,A019351年.
上下文顺序：A237480号 A081637号 A010037号*A235076号 A269322号 A227497号
相邻序列：A061727型 A061728号 A061729号*A061731号 A061732型 A061733号
不
克劳斯·布罗克豪斯2001年5月6日
更多条款来自罗伯特·G·威尔逊五世2001年5月11日
经核准的
