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 A178646 #15 Feb 20 2023 06:14:13
%S A178646 1,1,1,1,1,6,1,4,1,10,1,144,1,14,15,8,1,324,1,400,21,22,1,13824,1,26,
%T A178646 9,784,1,27000,1,512,33,34,35,46656,1,38,39,64000,1,74088,1,1936,2025,
%U A178646 46,1,5308416,1,2500
%N A178646 a(n) = product of divisors d of n such that d^k is not equal to n for any k >= 1.
%F A178646 a(n) = A007955(n) / A157068 (n).
%F A178646 a(1) = 1, a(p) = 1, a(pq) = 1, a(pq...z) = (pq…z)^2((k-1)-1), for p, q = primes, k = natural numbers, pq...z = product of k (k > 2) distinct primes p, q, ..., z.
%e A178646 For n = 16, set of such divisors is {1, 8}; a(16) = 1*8=8.
%o A178646 (Sage) A178646 = lambda n: prod(d for d in divisors(n) if not n.is_power_of(d)) # _D. S. McNeil_, Dec 28 2010
%Y A178646 Cf. A007955, A157068.
%K A178646 nonn
%O A178646 1,6
%A A178646 _Jaroslav Krizek_, Dec 25 2010