|
hi jens, a. nachdem philipp hoffentlich auch turing vollständig ist braucht er ja gar kein MMA oder ? b. falls er allerdings nicht turing vollständig ist wird im MMA doch auch nicht wirklich helfen oder ? c. kann man aus a. und b. schliessen das er gar kein MMA braucht ? mit vollständigen grüssen :-) robert -----Original Message----- From: Jens-Peer Kuska [mailto:kuska@XXXXXXX.de] Sent: Wednesday, February 16, 2005 2:59 PM To: Philipp Mohl; demug@XXXXXXX.ch Subject: Re: Euklidische Distanz (3D) Hallo, also das muß ich nicht verstehen oder ? Ob der Versuch, es besser zu formulieren gelungen ist, erscheint recht zweifelhaft. Insbesondere ist unklar wieso die 25 mal 3 Matrizen einmal Matrizen sind aber unten bolß noch 25 Punkte ... So jetzt die Antworten (1) ja (2) das habe ich schon beim ersten Versuch die Frage zu stellen geschrieben, allerdings scheint das entweder nicht gelesen oder nicht verstanden worden zu sein. data = Table[Random[], {25}, {3}]; center = {0.5, 0.5, 0.5}; Sqrt[#.#] &[# - center] & /@ data oder doStrangeComputation[data_,center_]:=Sqrt[#.#] &[# - center] & /@ data und wenn es alle zehn Zentren und Punktlisten MapThread[doStrangeComputation,{zehnPunktListenA25Punkten,zehnZentren}] (3) wenn es mit Mathematica nicht geht, dan geht es garnicht, den Mathematica ist Turing-Vollständig, d.h. es kann alles berechnen was man mit einem Computer berechnen kann Gruß Jens ----- Original Message ----- From: "Philipp Mohl" <philmo@XXXXXXX.de> To: <demug@XXXXXXX.ch> Sent: Wednesday, February 16, 2005 2:09 AM Subject: Euklidische Distanz (3D) > liebes Forum, > > meine letzte Frage war schlecht formuliert: daher ein neuer versuch: > > ich habe zehn 25 mal 3 matrizen in folgender form gegeben: {-1.296, > -0.023, -0.899 }, {-0.395, 0.427, -0.721}, > {-1.370, -0.706, -0.175}, > {-0.383, 0.460, -0.080}, > {0.075, 1.326, 0.171}, > {0.110, 1.679, 1.096}, > {-0.425, -1.213, -0.793}, > {2.221, 0.532, 0.462}, > {0.093, -0.945, 0.500}, > {-1.180, -0.223, -0.763}, > .. > {-0.398, -0.591, 0.689}}]; > > dazu habe ich für jede der zehn matrizen einen schwerpunkt gegeben > {-0.0968, > 0.1705, 0.2025}! > > > Nun möchte ich von jedem der 25 Punkte aus den zehn Matrizen die > euklidische > Distanz zu dem jeweiligen Schwerpunkt berechnen: > jetzt könnte ich natürlich mit copy und paste jeden wert in folgende > formel > eintragen: > > ((-0.395 - (-0.0968))^2 + ( 0.427 - (0.1705))^2 + (-0.721 - > (0.2025))^2)^0.5 > > das wäre aber angesichts der zehn matrizen mit enormem aufwand > verbunden. > > daher meine frage: > (1) ist es möglich das ganze zu automatisieren, d.h.: ich habe die 25 > mal > 3 > matrix gegeben plus mittelpunkt und mathematica berechnet automatisch den > abstand jedes einzelnen punktes? > (2) wenn ja, wie ist das möglich? > (3) wenn nein: gibt es ein programm, mit dem dies möglich wäre? > > > vielen dank. > gruß > philipp > > > |