|
Liebe Kollegen von der DMUG, Mit einer der aelteren Mathematica Versionen konnte ich eine Zahl so wie folgt in eine Liste umwandeln: zahl=N[Pi,30] 3.14159265358979323846264338328 Characters[zahl] {3, ., 1, 4, 1, 5, 9, 2, 6, 5, 3, 5, 8, 9, 7, 9, 3, 2, 3, 8, 4, 6, 2, 6, 4, 3, 3, 8, 3, 2, 8} Jetzt funktioniert das nicht mehr. Daher versuche ich es so: k := 100 N[Pi, k] ToString[%] FullForm[%] Characters[%] Drop[%, {2}] Pi_Dezimalen := % Kann mir jemand vielleicht mit einer kuerzeren und eleganteren Variante zum Umwandeln eines numerischen Ergebnisses in eine Liste der einzelnen Ziffern helfen? Mit freundlichen Gruessen, Franz Szabo ============================================ F R A N Z G. S Z A B O Web-Designer Computer Mathematician Digital Artist, Pipe Sculptor Computer and Science Journalist Internet Editor of Wiener Journal Member of Presseclub Concordia Vienna Member of the New York Academy of Sciences Biographee of Marquis Who's Who in the World Information at: http://www.wienerjournal.at/SZABO.HTM http://www.concordia.at/concordia/szabo.html ============================================ |