login
a(n) = gcd(prime(n)-2, n).
1

%I #5 Aug 02 2019 21:19:05

%S 1,1,3,1,1,1,1,1,3,1,1,1,13,1,15,1,1,1,1,1,1,11,1,3,5,1,1,7,1,3,1,1,3,

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

%U 1,69,1,1,3,73,1,1,1,1,1,1,1,3,1,1,1,1,1,3,1,1,1,1,1,1,1,1,3,1,1,1,1,1,3

%N a(n) = gcd(prime(n)-2, n).

%t Table[GCD[n,Prime[n]-2],{n,200}]

%Y Cf. A084309, A084310, A180172.

%K nonn

%O 1,3

%A _Zak Seidov_, Aug 15 2010