|
|
A078265
|
|
Integer part of the geometric mean of all the distinct numbers formed by permuting the digits of concatenation of numbers from 1 to n.
|
|
1
|
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
For n < 10 there are n! distinct numbers.
|
|
LINKS
|
|
|
EXAMPLE
|
a(3) = floor((123*132*213*231*312*321)^(1/6)) = floor(207.581...) = 207.
a(4) = floor((1234*1243*1324*1342*1423*1432*...*4312*4321)^(1/24)) = floor(2544.967...) = 2544.
|
|
MATHEMATICA
|
a[n_] := Floor[ (Times @@ FromDigits /@ Permutations[Range[n]])^(1/n!) ]; Table[a[n], {n, 1, 10}] (* Ryan Propper, Jul 21 2006 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|