cp's OEIS Frontend

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.

A066841 a(n) = Product{k|n} k^(n/k); product is over the positive divisors of n.

This page as a plain text file.
%I A066841 #17 Sep 24 2017 10:45:34
%S A066841 1,2,3,16,5,432,7,2048,243,8000,11,143327232,13,87808,455625,67108864,
%T A066841 17,117546246144,19,1310720000000,15752961,5451776,23,
%U A066841 252428641478023053312,78125,35995648,387420489,3537090251849728,29
%N A066841 a(n) = Product{k|n} k^(n/k); product is over the positive divisors of n.
%H A066841 Harry J. Smith, <a href="/A066841/b066841.txt">Table of n, a(n) for n = 1..200</a>
%e A066841 a(6) = 432 = 1^6 * 2^3 * 3^2 * 6^1 because 1, 2, 3 and 6 are the divisors of 6.
%t A066841 Table[Times @@ Map[#^(n/#) &, Divisors@ n], {n, 29}] (* _Michael De Vlieger_, Sep 24 2017 *)
%o A066841 (PARI) { for (n=1, 200, d=divisors(n); p=1; for (i=2, length(d), k=d[i]; p*=k^(n/k)); write("b066841.txt", n, " ", p) ) } \\ _Harry J. Smith_, Apr 01 2010
%Y A066841 Cf. A140554.
%K A066841 nonn
%O A066841 1,2
%A A066841 _Leroy Quet_, Jan 20 2002