Hallo,
a) wenn die Distanz "gewichtet" ist, was wohl heißt das der
metrische Tensor *nicht* die Einheitsmatrix ist, ist es
auch nicht mehr die Euklidische Distanz
b) wie ist
With[{center=(-0.14 -0.19 -0.32)},
Sqrt[Transpose[#].g.#]&[#-center] & /@ points
]
allerdings fehlt noch der metrische Tensor g
c) nö, weil ich nicht weiß was eine "gewichtetet euklidische Distanz"
ist und nicht mal ahne, was man an so was lächerlichem wie
Sqrt[#.#]&[#-center] & /@ points
oder ähnlichem noch effizineter machen kann
Gruß
Jens
----- Original Message -----
From: "Philipp Mohl" <philmo@XXXXXXX.de>
To: <demug@XXXXXXX.ch>
Sent: Sunday, February 13, 2005 3:49 AM
Subject: Abstand zwischen Punkten (3D)
Hallo hilfsbereites Forum:
es wäre einfach herrlich, wenn mir jemand helfen könnte:
ich habe folgende unten aufgezeigte Liste mit 15 Länderwerten gegeben und
würde gerne die "gewichtetet euklidische Distanz" von jedem der 15 Punkte
zu
dem folgenden Schwerpunkt ausrechnen: (-0.14 -0.19 -0.32)
1 -1.296 -0.023 -0.899
2 -0.395 0.427 -0.721
3 -1.370 -0.706 -0.175
4 -0.383 0.460 -0.080
5 0.075 1.326 0.171
6 -0.425 -1.213 -0.793
7 2.221 0.532 0.462
8 0.093 -0.945 0.500
9 -1.180 -0.223 -0.763
10 -0.876 -0.520 -0.899
11 -0.676 -1.122 -0.961
12 -0.459 -0.917 -1.330
13 -0.035 0.350 -0.810
14 0.158 -0.792 -0.541
15 -1.539 -1.457 -2.613
Hat jemand eine Idee, wie man dies effizient mit mathematica berechnen
könnte?
Vielen Dank und schönes wochenende.
pm
|