%我#28 2022年9月8日08:45:47

%S 3,6,7,10,22,31,46,58,69,82106127140154160166178226286，

%电话：346358382466478502586767187487818388628869821001，

%电话：10181066118612821299130613813614381486152216141618167217041822

%N数k，使s（k）=s（k+1），其中s（k”）是k的除数d之和，使k/d是奇数（A002131）。

%H Amiram Eldar，<a href=“/A1645557/b164557.txt”>n表，a（n）表示n=1.-10000</a>

%H Daeyeoul Kim和Abdelmejid Bayad，<a href=“https://doi.org/10.1186/1687-1812-2013-81“>扭曲艾森斯坦级数和扭曲因子函数的卷积恒等式</a>，《不动点理论与应用》2013年第1期（2013年），第81条，<a href=”https://core.ac.uk/download/pdf/81538924.pdf“>替代链接</a>。

%H Daeyeoul Kim、Nazli Yildiz Ikikardes、Yan Li和Lianrong Ma，<a href=“http://journal.pmf.ni.ac.rs/filomat/index.php/filomat/article/view/7068“>关于问题sigma_od（n）=sigma_ od（n+1），Filomat，第33卷，第2期（2019年），第543-559页。

%e 3的顺序为A002131（3）=A002131（3+1）=4。

%t f[p_，e_]：=如果[p==2，p^e，（p^（e+1）-1）/（p-1）]；s[1]=1；s[1]=1；s[n_]：=倍@@（f@@@FactorInteger[n]）；s1=0；序列={}；Do[s2=s[n]；如果[s2==s1，则附加到[seq，n-1]]；s1=s2，{n，12000}]；序列

%o（岩浆）v:=[&+[d:d in Divisors（m）|IsOdd（Floor（m/d））]:m in[1..2000]]；[1..#v-1]|v[k]eq v[k+1]]中的[k:k；//_Marius A.Burtea，2019年8月12日

%Y参见A002131、A002961、A064115、A064125、A293183、A306985。

%K nonn公司

%O 1,1号机组

%A _Amiram Eldar，2019年8月12日