%I#15 2017年10月30日08:32:20
%S 1,1,2,1,2,1,1,3,2,1,3,1,2,3,4,1,3,1,4,2,1,5,2,2,3,4,1,2,1,5,1,3,2,
%温度3,5,1,2,2,6,1,4,1,4,5,2,1,6,2,3,4,14,2,5,2,2,1,5,12,4,6,3,3,1,4,
%U 3,4,1,8,1,2,4,4,3,4,4,1,1,7,4,2,1,6,3,3,6,1,4,2,3,8,13,5,6,13,16,4
%N gcd(k-1,N)=1的N的除数k的个数。
%H Antti Karttunen,n的表格,n=1..16384的a(n)</a>
%e 8的正除数是1、2、4、8。(2-1)、(4-1)和(8-1)相对8为素数,因此a(8)=3。
%t表[DivisorSum[n,1&,CoprimQ[#-1,n]&],{n,105}](*_Michael De Vlieger_,2017年10月30日*)
%o(PARI)A056692(n)=汇总(n,d,(1==gcd(d-1,n)));\\_Antti Karttunen,2017年10月30日
%K nonn公司
%O 1,4型
%A _罗伊查询,2000年8月10日
|