编辑

经核准的

模块[｛c=Select[Range[200]，CompositeQ]，len｝，len=长度[c]；表[PowerMod[2，n，c[[n]]]，{n，len}]](*哈维·P·戴尔2018年3月3日*）

经核准的

编辑

_拉博E类. (实验室(自动变速箱)安娜.索特.胡),埃利默_,2002年8月12日

OEIS服务器: https://oeis.org/edit/global/2029

表[Mod[2^j,,固定点[j+PrimePi[#]+1&，&,j]], {]], {j,,1,,128}]

非n,新的

非n

非n,新的

非n

拉博斯E.（拉博斯（AT）ana1型安娜.sote.hu），2002年8月12日

除法2^n/c[n]的余数，其中c[n]=A002808号，第n个复合物。

2, 4, 0, 7, 2, 4, 2, 1, 0, 16, 8, 1, 8, 16, 18, 16, 14, 8, 8, 0, 2, 30, 18, 28, 14, 4, 8, 16, 28, 19, 6, 16, 29, 34, 8, 40, 2, 14, 8, 16, 14, 4, 8, 4, 0, 49, 62, 52, 32, 4, 8, 46, 17, 20, 65, 22, 32, 16, 62, 64, 32, 64, 41, 16, 32, 64, 48, 70, 48, 24, 32, 22, 74, 84, 8, 16, 32, 52

1,1

表[Mod[2^j，FixedPoint[j+PrimePi[#]+1&，j]]，{j，1，128}]

囊性纤维变性。A000079号,A002808号,A015910号,A062173号,A064367美元,A073797号-A073799号.

非n

Labos E.（Labos（AT）ana1.sote.hu），2002年8月12日

经核准的