%I#23 2021年4月28日09:59:34
%S 0,0,0,1,0,3,2,0,00,7,6,0,4,0,5,0,15,14,0,12,0,13,8,0,9,0,11,10,
%温度0,0,31,30,0,28,0,0,19,24,0,25,0,27,26,0,16,0,17,0,19,18,0,023,
%U 22,0,20,0,0,21,0,63,62,0,60,0,6,0,61,56,0,057,0,59,58,0,48,0,049,0,51,50,0,50,055,052,0,53,32
%N注入A048724的逆函数。
%C在a(0)=0之后,序列在A048724(k)=n的位置n处具有非零值a(n)=k,在A04872中不存在的位置n上具有零。
%C同样,当A065620的正项被替换为零并且负项的符号被反转时,就得到了序列。
%H Antti Karttunen,n的表格,n=0..8191的a(n)</a>
%F a(n)=(1/2)*A010059(n)*A006068(n)。
%F a(n)=-1*A010059(n)*A065620(n)。
%F a(n)=A246160(n)-A065620(n)。
%F a(n)=A010059(n)*A006068(A245710(n))。
%F对于所有n,a(A048724(n))=n。
%o(方案,三种不同的实现)
%o(定义(A246159 n)(*-1(A010059 n)(A065620 n))
%o(定义(A246159 n)(*(/12)(A010059 n)(A006068 n))
%o(定义(A246159 n)(*(A010059 n)(A006068(A245710 n)))
%o(PARI)a065620(n)=如果(n<3,n,if(n%2,-2*a0656200((n-1)/2)+1,2*a065720(n/2));
%o a(n)=-!(汉明威(n)%2)*a065620(n);
%o(n=0,100,打印1(a(n),“,”)\\安德拉尼尔·戈什,2017年6月7日
%o(Python)
%o定义a065620(n):如果n<3,则返回n;如果n%2==0,则返回2*a0656200((n-1)//2)+1
%o定义a(n):返回-(bin(n)[2:].count(“1”)%2==0)*a065620(n)
%o打印([a(n)表示范围(101)内的n)#_Indranil Ghosh,2017年6月7日
%Y参考A246160、A006068、A010059、A048724、A065620、A245710。
%K nonn公司
%0、6
%2014年8月18日,安蒂·卡图内
|