|
%I #12 Oct 20 2021 07:12:45
%S 1,1,1,1,1,3,1,3,5,1,3,3,9,3,5,11,1,9,3,15,5,3,9,3,21,5,11,23,21,9,3,
%T 9,29,15,9,5,33,11,35,3,9,15,39,27,41,3,21,5,11,15,23,21,15,51,53,9,9,
%U 29,55,15,9,63,21,65,5,27,33,11,69,23,35,21,75,9,15
%N Number of coprime squares modulo A081754(n): a(n) = A046073(A081754(n)).
%C Odd terms in A046073.
%H Jianing Song, <a href="/A348417/b348417.txt">Table of n, a(n) for n = 1..10000</a>
%e The number of coprime squares modulo A081754(61..64) = 131, 132, 133 and 134 is 65, 5, 27 and 33 respectively, so a(61..64) = 65, 5, 27 and 33.
%o (PARI) A046073(n) = my(z=znstar(n)); z[1]/2^(#z[2])
%o up_to_lim(n) = my(v=vector(n, k, A046073(k))); select(x->(x%2), v)
%Y Cf. A046073, A081754.
%K nonn
%O 1,6
%A _Jianing Song_, Oct 18 2021
|
