This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A120298 #10 Jul 29 2023 14:47:00 %S A120298 5,7,41,479,59,266681,63397,514639,178939,242101,18500393,40799043101, %T A120298 190297,1844659,78206663,616798327,38512247,86364397717734821, %U A120298 421950627598601,84786899,52030193,31411862913089,1422157053067,47961582392203,8408339,6269019298981 %N A120298 Largest prime factor of the n-th central factorial number A001819(n). %H A120298 Daniel Suteu, <a href="/A120298/b120298.txt">Table of n, a(n) for n = 2..180</a> %F A120298 a(n) = A006530(A001819(n)). - _Daniel Suteu_, Jun 10 2022 %t A120298 Table[Max[FactorInteger[Sum[1/i^2,{i,1,n}]/Product[1/i^2,{i,1,n}]]],{n,2,30}] %t A120298 Table[FactorInteger[n!^2*HarmonicNumber[n,2]][[-1,1]],{n,2,30}] (* _Harvey P. Dale_, Jul 29 2023 *) %o A120298 (PARI) a(n) = vecmax(factor(n!^2 * sum(k=1, n, 1/k^2))[,1]); \\ _Daniel Suteu_, Jun 10 2022 %Y A120298 Cf. A001819, A002701, A007406. %K A120298 nonn %O A120298 2,1 %A A120298 _Alexander Adamchuk_, Jul 11 2006 %E A120298 More terms from _Daniel Suteu_, Jun 10 2022