|
| |
|
| A265120型 |
| 行读取的不规则数组：第n行给出了乘法组mod n（Z/nZ，*）中元素的数量，该组指数的每个除数d的顺序为d。 |
|
0
|
|
|
|
1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 2, 1, 3, 1, 1, 2, 2, 1, 1, 2, 1, 1, 4, 4, 1, 3, 1, 1, 2, 2, 2, 4, 1, 1, 2, 2, 1, 3, 4, 1, 3, 4, 1, 1, 2, 4, 8, 1, 1, 2, 2, 1, 1, 2, 2, 6, 6, 1, 3, 4, 1, 3, 2, 6, 1, 1, 4, 4, 1, 1, 10, 10, 1, 7, 1, 1, 2, 4, 4, 8
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
2,8
|
|
|
评论
|
|
|
|
链接
|
|
|
|
例子
|
{1}
{1, 1}
{1, 1}
｛1，1，2｝
{1, 1}
{1, 1, 2, 2}
{1, 3}
{1, 1, 2, 2}
{1, 1, 2}
{1, 1, 4, 4}
{1, 3}
{1, 1, 2, 2, 2, 4}
{1, 1, 2, 2}
{1, 3, 4}
{1, 3, 4}
{1, 1, 2, 4, 8}
{1, 1, 2, 2}
{1, 1, 2, 2, 6, 6}
{1, 3, 4}
{1, 3, 2, 6}
{1, 1, 4, 4}
{1, 1, 10, 10}
{1、7}，
{1, 1, 2, 4, 4, 8}
n=21的行为：1,3,2,6，因为乘法群mod 21（Z/21*Z，*）与C_6XC_2同构。这个组的指数是6。该组包含一个1阶元素、三个2阶元素、两个3阶元素和六个6阶元素。
|
|
|
数学
|
f[{p_，e_}]：={FactorInteger[p-1][[All，1]]^
因子整数[p-1][[All，2]]，
因子整数[p^（e-1）][[All，1]]^
因子整数[p^（e-1）][[All，2]]}；
乐趣[lst_]：=
模块[{int，num，res}，
int=排序/@GatherBy[Join@@（FactorInteger/@lst），First]；
num=次数@@Power@@@（最后一个@#&/@int）；
res=扁平[Map[Power@@#&，Most/@int，{2}]]；
{num，res}]
记录[lt_]：=
第一个@NestWhile[{附加[#[[1]]，有趣[#[2]][[1]]]，
乐趣[#[[2]]][[2]]}&，{{}，lt}，长度[#[2]]>0&]；
t[list_]：=
表[Count[Map[PermutationOrder，GroupElements[AbelianGroup[list]]，
d] ，{d，除数[First[list]]}]；
地图[t，表[
如果[！IntegerQ[n/8]，
删除案例[rec[Flatten[Map[f，FactorInteger[n]]]，1]，
删除案例[
rec[Join[{2，2^（FactorInteger[n][[1，2]]-2）}，
展平[Map[f，Drop[FactorInteger[n]，1]]]]，1]，{n，2，
25}] /. {} -> {1}]
|
|
|
交叉参考
|
|
|
|
关键字
|
非n,标签
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
