login
a(n) = gcd(n,A241909(n)).
4

%I #6 Jan 10 2017 19:12:04

%S 1,2,1,1,1,3,1,1,3,1,1,1,1,1,3,1,1,3,1,5,3,1,1,1,1,1,1,1,1,15,1,1,3,1,

%T 1,1,1,1,3,1,1,3,1,1,5,1,1,1,1,5,3,1,1,3,1,7,3,1,1,5,1,1,1,1,1,3,1,1,

%U 3,5,1,1,1,1,15,1,1,3,1,1,1,1,1,7,1,1,3,1,1,3,1,1,3,1,1,1,1,1,1,25,1,3,1,1,15,1,1,1,1,5,3,1,1,3,1,1,1,1,1

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

%H Antti Karttunen, <a href="/A280489/b280489.txt">Table of n, a(n) for n = 1..8192</a>

%F a(n) = gcd(n,A241909(n)).

%F a(n) = n / A280488(n).

%F Other identities. For all n >= 1:

%F a(A241909(n)) = a(n).

%o (Scheme) (define (A280489 n) (gcd n (A241909 n)))

%Y Cf. A241909, A280488, A280491.

%K nonn

%O 1,2

%A _Antti Karttunen_, Jan 09 2017