|
| |
| |
|
|
|
0, 1, 1, 2, 1, 3, 1, 4, 2, 5, 1, 6, 1, 7, 3, 8, 1, 9, 1, 10, 5, 11, 1, 12, 2, 13, 4, 14, 1, 15, 1, 16, 7, 17, 3, 18, 1, 19, 11, 20, 1, 21, 1, 22, 6, 23, 1, 24, 2, 25, 13, 26, 1, 27, 5, 28, 17, 29, 1, 30, 1, 31, 10, 32, 7, 33, 1, 34, 19, 35, 1, 36, 1, 37, 9, 38, 3, 39, 1, 40, 8, 41, 1, 42
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,4
|
|
|
评论
|
|
|
|
链接
|
|
|
|
公式
|
其他身份。对于所有n>=1，以下条件成立：
对于所有w>=0，a（p{i}*p_{j}*…*p_}k}）=a（p_{i+w}*p{j+w}*…*p_{k+w}）。
|
|
|
数学
|
a246277[n_Integer]：=模块[{f，p，a064989，a}，
f[x_]：=转置@FactorInteger[x] ；
p[x_]：=哪个[
x==1，1，
x==2，1，
真，NextPrime[x，-1]]；
a064989[x_]：=次数@@Power[p/@第一[f[x]]，最后[f[x]]]；
a[1]=0；
a[x_]：=如果[EvenQ[x]，x/2，NestWhile[a064989，x，OddQ]/2]；
a/@范围[n]]；a246277【84】(*迈克尔·德弗利格2014年12月19日*）
|
|
|
黄体脂酮素
|
（PARI）
A064989号（n） ={my（f）；f=因子（n）；如果（n>1&&f[1,1]==2），f[1,2]=0）；对于（i=1，#f~，f[i，1]=precprime（f[i、1]-1））；因子回退（f）}；
（PARI）A246277号（n） =如果（1==n，0，my（f=因子（n），k=素数（f[1，1]）-1）；对于（i=1，#f~，f[i，1]=素数（素数pi（f[i，1]）-k））；factorback（f）/2）\\安蒂·卡图恩2022年4月30日
（方案）；；两种不同的变体，第二种使用记忆定义（macro）
（Python）
来自sympy import factor，prevprime
从运算符导入mul
从functools导入reduce
定义a064989（n）：
f=因子（n）
如果n==1，则返回1，否则减少（mul，[1 if i==2，则返回原素数（i）**f[i]表示f中的i）
定义a（n）：如果n==1，则返回0；如果n%2==0，则返回n//2；否则返回a（a064989（n））
|
|
|
交叉参考
|
参见。A000040型,A001222号,A001358号,A003961号,A055396号,A064989号,A064216号,A243055型,46272英镑,A249810型,A249820型,A249735型,A252463型.
此序列也用于定义以下排列：A246274号,A246276号,A246675型,A246677号,A246683型,A249815型,A249817型(A249818型),A249823型,A249825型,A250244型,A250245型,250247英镑,250249英镑.
|
|
|
关键字
|
非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
