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 A345941 #19 Jul 19 2021 01:24:49 %S A345941 1,2,3,4,5,3,7,2,3,5,11,3,13,7,5,4,17,9,19,5,7,11,23,3,25,13,3,7,29,5, %T A345941 31,2,11,17,7,9,37,19,13,5,41,7,43,11,5,23,47,3,7,25,17,13,53,9,11,7, %U A345941 19,29,59,5,61,31,7,4,13,11,67,17,23,7,71,9,73,37,25,19,11,13,79,5,3,41,83,7,17,43,29,11,89 %N A345941 a(n) = gcd(n, A329044(n)). %C A345941 Only powers of primes (A000961) occur as terms. A346087 gives the exponents. - _Antti Karttunen_, Jul 07 2021 %H A345941 Antti Karttunen, <a href="/A345941/b345941.txt">Table of n, a(n) for n = 1..20000</a> %H A345941 <a href="/index/Pri#prime_indices">Index entries for sequences computed from indices in prime factorization</a> %H A345941 <a href="/index/Pri#primorialbase">Index entries for sequences related to primorial base</a> %H A345941 <a href="/index/Pri#primorial_numbers">Index entries for sequences related to primorial numbers</a> %F A345941 a(n) = gcd(n, A329044(n)). %F A345941 a(n) = n / A345942(n). %F A345941 a(n) = A329044(n) / A345943(n). %F A345941 a(p) = p for all primes p. %F A345941 From _Antti Karttunen_, Jul 07 2021: (Start) %F A345941 a(n) = A006530(n)^A346087(n) = A006530(n)^min(A071178(n), A329348(n)). %F A345941 a(n) = gcd(n, A346097(n)). %F A345941 A006530(a(n)) = A020639(A329044(n)) = A006530(n). %F A345941 (End) %o A345941 (PARI) A345941(n) = gcd(n,A329044(n)); \\ Rest of program given in A329044. %Y A345941 Cf. A000961, A006530, A020639, A071178, A108951, A324886, A329348, A329044, A345942, A345943, A346087, A346097. %K A345941 nonn %O A345941 1,2 %A A345941 _Antti Karttunen_, Jul 03 2021