login
a(n) = A023900(A276086(n)).
2

%I #6 Oct 21 2019 19:27:22

%S 1,-1,-2,2,-2,2,-4,4,8,-8,8,-8,-4,4,8,-8,8,-8,-4,4,8,-8,8,-8,-4,4,8,

%T -8,8,-8,-6,6,12,-12,12,-12,24,-24,-48,48,-48,48,24,-24,-48,48,-48,48,

%U 24,-24,-48,48,-48,48,24,-24,-48,48,-48,48,-6,6,12,-12,12,-12,24,-24,-48,48,-48,48,24,-24,-48,48,-48,48,24,-24

%N a(n) = A023900(A276086(n)).

%H Antti Karttunen, <a href="/A328583/b328583.txt">Table of n, a(n) for n = 0..32768</a>

%H <a href="/index/Pri#primorialbase">Index entries for sequences related to primorial base</a>

%F a(n) = A023900(A276086(n)).

%F abs(a(n)) = A324650(n) / A328572(n).

%o (PARI) A328583(n) = { my(m=1, p=2); while(n, m *= (1-p)^!!(n%p); n = n\p; p = nextprime(1+p)); (m); };

%Y Cf. A023900, A276086, A324650, A328572.

%K sign

%O 0,3

%A _Antti Karttunen_, Oct 21 2019