Thema Datum  Von Nutzer Rating
Antwort
Rot Iterationsverfahren
 21.06.2010 21:06:02 Andi
NotSolved

Ansicht des Beitrags:
Von:
Andi		 Datum:
21.06.2010 21:06:02		 Views:
1696		 Rating:
     
Antwort:
  Ja
Thema:
Iterationsverfahren
Hallo liebe Mathematiker,

ich habe folgendes Problem:

Ich habe mir ein Excel-Makro gebastelt welches ausgehend von einem Startwert über eine Spalte von 100 Zellen länge einen Zielwert am Ende dieser Spalte einiteriert. Ich habe mir dafür den am Ende eingefügten Algorithmus überlegt, der auch in den meisten Fällen sehr gut funktioniert. Manchmal konvergiert er jedoch nicht. Gibt es für solche Fälle ein sicheres nummerisches Verfahren. bzw einen Algorithmus, der immer funktioniert? Es sei vielleicht dazu gesagt dass die Startwerte teilweise extrem klein sind (z.B E-13).

Danke schon mal.
Gruß,Andi


sllv = Aktueller Wert am Ende der Tabelle
sllvs = Zielwert
sl01 = startwert
i = 1
n = 1
Abweichung = Abs(sllv - sllvs)
a = sllv - sllvs


If a g 'Solange i Genauigkeit

Do While a g And i 0 And Abweichung > g And i g 'Solange i Genauigkeit

Do While a > 0 And Abweichung > g And i g And i < 100 'Solange sllv zu klein wird sl01 um sl01/n(verfeinert) vergrößert

sl01 = sl01 + sl01 / n

ActiveSheet.Cells(4, 2).Value = sl01 'Aktualisierung der Werte
sllv = ActiveSheet.Cells(104, 2).Value
a = sllv - sllvs
i = i + 1
Abweichung = Abs(sllv - sllvs)

Loop


n = n * 10 'Durchlauf der zwei Schleifen bis Genauigkeit erreicht oder i=100

Loop


End If

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Iterationsverfahren
 21.06.2010 21:06:02 Andi
NotSolved