Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #6 Oct 08 2018 08:09:48
%S 1,5,7,55,13,70,3,275,49,715,13,1540,3,75,637,3025,13,980,3,39325,147,
%T 715,13,15400,39,75,343,9075,13,140140,3,15125,637,715,507,43120,3,75,
%U 147,2162875,13,14700,3,39325,31213,715,13,338800,9,10725,637,9075,13,13720,507,226875,147,715,13,30830800,3,75,7203,166375,507,140140,3
%N a(n) = Product_{d|n, d>1} prime(1+(d mod 6)).
%H Antti Karttunen, <a href="/A320116/b320116.txt">Table of n, a(n) for n = 1..8192</a>
%F a(n) = Product_{d|n, d>1} prime(1+(d mod 6)).
%o (PARI) A320116(n) = { my(m=1); fordiv(n,d,if(d>1, m *= prime(1+(d%6)))); (m); };
%Y Cf. A320114, A320117 (rgs-transform),
%Y Cf. also A319986.
%K nonn
%O 1,2
%A _Antti Karttunen_, Oct 06 2018