|
%I #6 Jun 07 2022 15:20:39
%S 2,2,3,3,11,7,5,7,5,43,1093,1453,71,13,67,661,155191,103,2617,3461,
%T 420929,1319,1839833,129917,1531,1316537,91387,40841,30631,49506559,
%U 1176509,262069,14497151,7489,1860564731,1053007,4557398710937
%N Largest prime factor of A096421(n).
%H Daniel Suteu, <a href="/A097365/b097365.txt">Table of n, a(n) for n = 3..259</a>
%e A096421(19) = 79457792 = 2^9 * 155191, so a(19) = 155191.
%o (PARI) {m=39;v=vector(m);v[1]=1;for(n=2,m,s=0;for(j=1,n-1,if(gcd(j,n)==1,s=s+v[j]*v[n-j]));v[n]=s);for(i=3,m,fac=factor(v[i]);print1(fac[matsize(fac)[1],1],","))}
%Y Cf. A096421, A097366.
%K nonn
%O 3,1
%A _Klaus Brockhaus_, Aug 09 2004
|
