manuelle Mittelwertberechnung < Mathematica < Mathe-Software < Mathe < Vorhilfe
|
Status: |
(Frage) beantwortet | Datum: | 18:59 Mo 09.06.2008 | Autor: | danm357 |
Ich habe diese Frage in keinem anderem Forum gestellt.
Hallo liebe Forengemeinde,
ich möchte mit Mathematica von importierten Daten den Mittelwert berechnen, wobei ich Werte, die kleiner sind als Null, ausschliessen möchte. Bis jetzt war ich damit einigermassen erfolgreich:
Meine Daten importiere ich mit:
siehe (1) Datei-Anhang
Die Summe der positiven Daten berechne ich mit folgendem Befehl:
siehe (2)
DatenAll,3] verwende ich, da meine Daten in Matrix- bzw. Tabellenform sind. Damit greife ich bloss auf die Daten zu, die in z.B. in der 3 Spalte stehen. Man sieht, dass ich durch den If-Befehl die negativen Daten mit einem negativen Vorzeichen versehe und zur Summe addiere.
Als kleines Bsp: Wenn meine Werte 0.2, -0.3, 0.2, -0.1, 0.3, etc. sind, dann rechnet mein Befehl: 0.2 + (-0.3) +(-(-0.3))+0.2 etc. Das ist sicher nicht sehr elegant aber funktioniert für kurze Tabellen.
Nun habe ich folgendes Problem: Für lange Tabellen funktioniert das ganze sehr langsam, da es sicher nicht schön programmiert ist. Und: Es gibt mir plötzlich falsche Werte zurück. Dieses kann ich leider überhaupt nicht verstehen. Selbiges passiert auch mit meinem Counter, der mir die Anzahl positiver Werte zählen soll (durch den muss ich ja teilen, um den Mittelwert zu bekommen). Diesen programmiere ich analog zu obigem Bsp. mit:
siehe (3)
Kann mir vielleicht einer von Euch helfen und mir sagen, wo ich was falsch mache und wie ich das ganze besser programmieren kann?
Für eine Antwort wäre ich echt dankbar
Dateianhänge: Anhang Nr. 1 (Typ: txt) [nicht öffentlich]
|
|
|
|
Ich vermute mal, dass dich das hier kaum weiterbringen wird:
Du kannst versuchen ein Programm in C zu schreiben, mit dem du deinen Programmteil ausrechnest, und diesen über MathLink einbindest. Der Vorteil an derartigen Berechnungen ist, dass sie viel schneller sind (mathematica ist grundsätzlich eher die langsame Variante). Der Nachteil ist, dass ich noch niemanden kenne, der damit umgehen kann ;)
MfG Sunny
|
|
|
|
|
Hallo,
wenn du die Daten erstmal eingelesen hast, dann solltest du einfach mal direkt die positiven Werte aus deiner 3. Spalte selektieren, was so geht:
posDaten = Select[Daten[[All, 3]], Positive[#] &]
Darauf kannst du nun die Funktionen Length und Mean anwenden um die Elemente zu zählen und zu mitteln.
Gruß
Martin
|
|
|
|
|
Status: |
(Mitteilung) Reaktion unnötig | Datum: | 08:02 Di 10.06.2008 | Autor: | danm357 |
Hallo,
herzlichen Dank für Deine wunderbare Lösung!
Ich verwende lediglich NonNegative statt Positive, da ich Zahlen grösser gleich Null berücksichtigen will. Aber das ganze funktioniert jetzt sehr gut, sehr schnell und richtig!
Nochmals Danke!
|
|
|
|