A344764 - OEIS

%I #10 May 31 2021 15:22:31

%S 1,1,1,1,1,3,1,1,1,2,1,4,1,7,5,1,1,2,1,5,3,11,1,3,1,2,1,7,1,15,1,1,11,

%T 2,7,4,1,19,3,5,1,2,1,4,9,23,1,16,1,2,17,13,1,27,5,8,3,2,1,15,1,31,9,

%U 1,5,11,1,4,23,10,1,9,1,2,3,4,7,6,1,16,1,2,1,12,17,43,29,8,1,5,13,23,3,47,19,3,1,2

%N a(n) = gcd(n, A011772(n)).

%H Antti Karttunen, <a href="/A344764/b344764.txt">Table of n, a(n) for n = 1..16384</a>

%H Antti Karttunen, <a href="/A344764/a344764.txt">Data supplement: n, a(n) computed for n = 1..65537</a>

%F a(n) = gcd(n, A011772(n)) = gcd(A011772(n), A344763(n)) = gcd(n, A344763(n)).

%o (PARI) A344764(n) = gcd(n, A011772(n));

%Y Cf. A011772, A344763, A344766.

%K nonn,look

%O 1,6

%A _Antti Karttunen_, May 30 2021