编辑
经核准的
表[Total[Boole[CoprimQ[n!!,Range[n]]],{n,80}](*哈维·P·戴尔2022年12月12日*)
检验过的
提出
囊性纤维变性。A006882号,A056171号,A070939号.
Robert Israel,<a href=“/A129843号/b129843.txt“>n,a(n)的表格,n=1..10000</a>
发件人罗伯特·伊斯雷尔,2022年12月8日:(开始)
如果n是奇数,a(n)=A070939号(n) ●●●●。
如果n>2是偶数,a(n)=1+A056171号(n) 。(结束)
f: =proc(n)局部t;
如果n::奇数,则ilog2(n)+1
else 1+数字理论:-pi(n)-numtheory:-pi(n/2)
fi(菲涅耳)
结束进程:
f(2):=1:
地图(f,[1..100]美元)#罗伯特·伊斯雷尔2022年12月8日
囊性纤维变性。A056171号,A070939号.