gibt es eine Quersummenfunktion?

Mathematische Fragestellungen
Antworten
monarch87
hat sich hier eingelebt
hat sich hier eingelebt
Beiträge: 231
Registriert: 3. Jun 2011, 15:27

gibt es eine Quersummenfunktion?

Beitrag von monarch87 » 17. Mär 2012, 19:21

Hey Leuttz!

Ich wollte fragen, obs folgende Formel gibt, oder jemand weiss, wie ichs bei Wolfram schreiben könnte oder überhaupt als Formel.

Und zwar die Formel der Quersumme von Zahlen also Q(Xn)=Zn

zb. für 1: 1,2,4,8,16,23,28,38,49,62,70 usw.
3: 3,6,12,15,21,24,30,33,

also immer die Quersumme addieren . X ist die Zahl die wir einsetzen und n sollte der Wert der n-ten Quersumme sein

bei X=2 sieht man ja, dass die gleiche Folge wie bei 1 entsteht.
Also gehen einige Quersummenfunktionen ineinander über.

Naja weiss jemand etwas dazu??

mfg m87 :)
Wissenschaft ist Skepsis, also sei der Wissenschaft skeptisch gegenüber!

Nach der Wahrheit lässt es sich sterben!

monarch87
hat sich hier eingelebt
hat sich hier eingelebt
Beiträge: 231
Registriert: 3. Jun 2011, 15:27

Re: gibt es eine Quersummenfunktion?

Beitrag von monarch87 » 17. Mär 2012, 19:41

also X + quersummeX + quersummeX usw..

also wenn ich zb. 5 einsetze für x,
dann ist x1= 5+quersumme 5
x1=5+5=10

x2 wäre dann x2= 10 +quersumme10
x2= 10+ 1=11

x3= 11+quersumme 11
x3= 13
usw.
Wissenschaft ist Skepsis, also sei der Wissenschaft skeptisch gegenüber!

Nach der Wahrheit lässt es sich sterben!

positronium
Ehrenmitglied
Ehrenmitglied
Beiträge: 2832
Registriert: 2. Feb 2011, 20:13

Re: gibt es eine Quersummenfunktion?

Beitrag von positronium » 18. Mär 2012, 19:23

Was willst Du damit machen? Soweit ich weiss, sind Quersummen zu fast nichts nütze; auch sind sie vom Zahlensystem abhängig.
Eine Funktion für die Quersumme oder eine solche Reihe, wie Du sie angibst, kenne ich leider nicht, aber die beiden kann man sich ja leicht selbst schreiben.

positronium
Ehrenmitglied
Ehrenmitglied
Beiträge: 2832
Registriert: 2. Feb 2011, 20:13

Re: gibt es eine Quersummenfunktion?

Beitrag von positronium » 18. Mär 2012, 19:54

In Mathematica kann man schreiben:
Apply[Plus, IntegerDigits[x,b]]
wobei x die Zahl und b die Basis, also in Deinem Fall b=10 ist (b kann man auch weg lassen).
Das ist in wolframalpha z.B.
Plus IntegerDigits 543785

Die Reihe kriegst Du in Mathematica mit:
x = s; Table[x = x + Apply[Plus, IntegerDigits[x]], {n}]
Hier ist s der Startwert und n die Anzahl der gefragten Zahlen der Reihe.
Wie man eine Table in wolframalpha erstellt, weiss ich aber nicht - kannst Du natürlich auch als for schreiben, aber auch das kann ich in wolframalpha nicht.

So müsstest Du das eigentlich hinbekommen.

Ich hatte das schon einmal geschrieben, würde ich deshalb eigentlich nicht noch einmal erwähnen, aber nachdem Du kürzlich Dein Studiumsgebiet genannt hast, schreibe ich das noch einmal: Es wäre für Dich sinnvoll, Dich mit einem CAS zu beschäftigen - mit Maxima kriegst Du das alles im Handumdrehen hin.
Früher oder später kommst du eh nicht drum rum.

monarch87
hat sich hier eingelebt
hat sich hier eingelebt
Beiträge: 231
Registriert: 3. Jun 2011, 15:27

Re: gibt es eine Quersummenfunktion?

Beitrag von monarch87 » 20. Mär 2012, 23:54

erstma thx für die Antwort.
Ja ich glaub dir du hast bestimmt Recht. Ich werd jetzt auch versuchen mir alles einzuarbeiten und mich damit Schritt für Schritt auseinander zu setzen

mfg m87 :)
Wissenschaft ist Skepsis, also sei der Wissenschaft skeptisch gegenüber!

Nach der Wahrheit lässt es sich sterben!

Antworten