Primzahl-Umformung < Mathematica < Mathe-Software < Mathe < Vorhilfe
|
Mathematica v7:
Folgender Input:
[mm] 3^4 [/mm] / [mm] (2^4 [/mm] * 5)
soll ausgegeben werden als:
2^-4 [mm] 3^4 [/mm] 5^-1
Gibt es dafür eine Funktion?
DANKE!
Ich habe diese Frage in keinem Forum auf anderen Internetseiten gestellt.
|
|
| |
|
Hey,
ich bin mir zwar nicht ganz sicher, was deine Frage ist, aber ich glaube, dass du das:
> [mm]3^4[/mm] / [mm](2^4[/mm] * 5)
>
zu dem
>
> 2^-4 [mm]3^4[/mm] 5^-1
umformen möchtest, liegt ich richtig mit meiner vermutung??
Also wenn ja, dann musst du nur ein wenig umformen, ein Tipp:
[mm] \bruch{3^4}{2^4*5}=3^4*\bruch{1}{2^4}*\bruch{1}{5}=....
[/mm]
Hilft dir das weiter?? Ist das, das wonach du suchst??
Hast du eine Fktn, wie "Faktorisieren" oder so?? Das würde ich mal versuchen, aber ob das klappt...
LG
pythagora
|
|
|
| |
|
| Status: |
(Mitteilung) Reaktion unnötig  | | Datum: | 22:38 Mi 20.01.2010 | | Autor: | Herby |
Hallo Pythagora,
du bist hier im Unterforum der Software "Mathematica" - ich denke hier ist eher nach einem entsprechenden Befehlswort/Befehlszeile gefragt.
> ich bin mir zwar nicht ganz sicher, was deine Frage ist,
> aber ich glaube, dass du das:
> > [mm]3^4[/mm] / [mm](2^4[/mm] * 5)
> >
> zu dem
> >
> > 2^-4 [mm]3^4[/mm] 5^-1
> umformen möchtest, liegt ich richtig mit meiner
> vermutung??
> Also wenn ja, dann musst du nur ein wenig umformen, ein
> Tipp:
> [mm]\bruch{3^4}{2^4*5}=3^4*\bruch{1}{2^4}*\bruch{1}{5}=....[/mm]
> Hilft dir das weiter?? Ist das, das wonach du suchst??
> Hast du eine Fktn, wie "Faktorisieren" oder so?? Das
mit "faktorisieren" hat das nichts zu tun.
LG
Herby
ps: ich stelle die Frage wieder statuslos 
|
|
|
| |
|
| Status: |
(Mitteilung) Reaktion unnötig | | Datum: | 22:48 Mi 20.01.2010 | | Autor: | pythagora |
Oh mist, verklickt,danke Herby^^.
LG
pythagora
|
|
|
| |
|
| Status: |
(Mitteilung) Reaktion unnötig | | Datum: | 22:50 Mi 20.01.2010 | | Autor: | Herby |
Hallo,
null problemo
Lg
Herby
|
|
|
| |
|
Zur Verdeutlichung:
Suche Funktion in Mathematica (Version7)
Folgender Input wird als Bruch eingegeben:
$ [mm] 3^4 [/mm] $ / $ [mm] (2^4 [/mm] $ * 5)
Nun soll eine autom. Funktion dieses ausgegeben als Folge von Primzahl-Multiplikationen:
2^-4 $ * $ [mm] 3^4 [/mm] $ * $ 5^-1
(Also nicht von Hand umzuformen).
|
|
|
| |
|
| Status: |
(Mitteilung) Reaktion unnötig | | Datum: | 22:10 Do 21.01.2010 | | Autor: | nancarrow |
Meine letzte Mitteilung enthält eine Präzisierung der ersten Frage.
(Aus Versehen als Mitteilung formatiert...).
Bin für weitere Hinweise dankbar!
|
|
|
| |
|
Moin,
mir unklar, fuer was man das braucht, aber ja es geht
| 1: |
| | 2: | SetAttributes[FactorRational, HoldFirst];
| | 3: | FactorRational[expr_?NumberQ] :=
| | 4: | DisplayForm[
| | 5: | RowBox@Riffle[(SuperscriptBox @@ (ToString /@ #)) & /@
| | 6: | Sort[Join[FactorInteger[Numerator[Unevaluated[expr]]],
| | 7: | Times[{1, -1}, #] & /@
| | 8: | FactorInteger[Denominator[Unevaluated[expr]]]],
| | 9: | Less[First@#1, First@#2] &], "\[CenterDot]"]]
| | 10: |
| | 11: | FactorRational[3^4/(2^4*5)]
|
Wenn du dich fragst, warum diese leichte Aufgabe so kompliziert aussieht: Sobalt man in Mathematica Zahlen eingibt werden diese sofort vereinfacht. Man muss ihn also mit Gewalt zwingen diese selbstverstaendlichen Umformungen nicht zu machen damit man den Nenner und den Zaehler des Bruchs unveraendert bearbeiten kann. Auch bei der Ausgabe kann man keine normalen Zahlen nehmen, weil auch diese Potenzen sofort zusammengefasst werden wuerden.
Cheers
Patrick
PS: Gibts hier eigentlich eine Moeglichkeit Code zu posten ohne die html-tags zu benutzen? Die Zeilennummern vorn dran sind nervig beim Kopieren des Codes?
|
|
|
| |
|
| Status: |
(Mitteilung) Reaktion unnötig | | Datum: | 01:21 Fr 22.01.2010 | | Autor: | reverend |
Hallo halirutan,
ja, Du kannst Code posten. Nur ist die Einschließung nicht in spitzen, sondern in eckigen Klammern vorzunehmen:
[code]
...
[/code]
...und dies zu schreiben, war schon eine Kunst für sich, aber dazu vielleicht ein andermal mehr. Schau ggf. in den Quelltext.
Außerdem muss jede Zeile einzeln als Quellcode definiert sein!
Dein Text läse sich dann so:
SetAttributes[FactorRational, HoldFirst];
FactorRational[expr_?NumberQ] :=
DisplayForm[
RowBox@Riffle[(SuperscriptBox @@ (ToString /@ #)) & /@
Sort[Join[FactorInteger[Numerator[Unevaluated[expr]]],
Times[{1, -1}, #] & /@
FactorInteger[Denominator[Unevaluated[expr]]]],
Less[First@#1, First@#2] &], "\[CenterDot]"]]
FactorRational[3^4/(2^4*5)]
Besser? Die Blaudefinition dient hier übrigens nur der Hervorhebung. Wie du siehst, kann sie auch über mehrere Zeilen laufen, anders als die Code-Definition. Warum auch immer.
Zugegeben, für lange Programme ist das nervig. Ich habe aber noch keinen Ausweg gefunden.
lg
reverend
|
|
|
| |
|
Hallo zusammen,
ich habe ein wenig gepröbelt und bin auf diese
Lösung gekommen:
r sei ein beliebiger rationaler Term, also z.B. $\ [mm] r=\frac{3^4}{2^4*5}$
[/mm]
wie im Beispiel oder einfach ein Bruch wie etwa $\ r=637/72$
Dann leisten die folgenden zwei Zeilen das Gewünschte:
L:=FactorInteger[r]
Product[Superscript[Part[L,k,1],Part[L,k,2]],{k,Length[L]}]
Ich habe jetzt allerdings noch gemerkt, dass der ent-
stehende Term zwar richtig aussieht, aber in dieser
Form z.B. nicht als Input für weitere Rechnungen
geeignet ist ...
dreiviertel Stunde später:
Heureka !
so funktioniert's:
L:=FactorInteger[r]
Product[SuperscriptBox[Part[L,k,1],Part[L,k,2]],{k,Length[L]}] // DisplayForm
LG Al-Chw.
|
|
|
| |
|
| Status: |
(Mitteilung) Reaktion unnötig | | Datum: | 02:16 Fr 22.01.2010 | | Autor: | halirutan |
Ja, nur das meine Loesung sich wirklich alle Potenzen aufhebt, auch wenn die in Zaehler und Nenner gemeinsam vorkommen. Die wuerden ja sonst gekuerzt werden.
Cheers
Patrick
|
|
|
| |
|
> Ja, nur das meine Loesung sich wirklich alle Potenzen
> aufhebt, auch wenn die in Zaehler und Nenner gemeinsam
> vorkommen. Die wuerden ja sonst gekuerzt werden.
>
> Cheers
> Patrick
Aber wieso um Himmels Willen soll denn nicht
einmal gekürzt werden, wenn es möglich ist ?
Bei mir hat übrigens die Sache mit dem
"RowBox@Riffle" nicht funktioniert, also wird
auch der Term nicht wirklich so wie gewünscht
ausgegeben ...
(ich benütze Mathematica nur so hie und da
einmal)
Gruß Al-Chw.
|
|
|
| |
|
| Status: |
(Mitteilung) Reaktion unnötig | | Datum: | 08:27 Fr 22.01.2010 | | Autor: | halirutan |
Moin,
na weil es aus der Frage des Themenstellers nicht klar wurde, ob gemeinsame Primfaktoren oben und unten zusammengefasst werden duerfen oder ob er wirklich alle aufheben will.
Riffle gibts erst ab Mathematica Version 6.
Cheers
Patrick
|
|
|
| |
|
Hallo Patrick,
> Moin,
>
> na weil es aus der Frage des Themenstellers nicht klar
> wurde, ob gemeinsame Primfaktoren oben und unten
> zusammengefasst werden duerfen oder ob er wirklich alle
> aufheben will.
OK
> Riffle gibts erst ab Mathematica Version 6.
danke für die Information - ich fahre noch Version 5
Schönen Tag
Al
|
|
|
| |
|
| Status: |
(Mitteilung) Reaktion unnötig | | Datum: | 17:05 Sa 23.01.2010 | | Autor: | nancarrow |
> r sei ein beliebiger rationaler Term, also z.B. [mm]\ r=\frac{3^4}{2^4*5}[/mm]
>
> wie im Beispiel oder einfach ein Bruch wie etwa [mm]\ r=637/72[/mm]
>
>
> Dann leisten die folgenden zwei Zeilen das Gewünschte:
>
> L:=FactorInteger[r]
>
> dreiviertel Stunde später:
>
> Heureka !
>
> so funktioniert's:
>
> L:=FactorInteger[r]
>
> Product[SuperscriptBox[Part[L,k,1],Part[L,k,2]],{k,Length[L]}]
> // DisplayForm
>
Herzlichen Dank an Alle, die sich den Kopf zerbrochen haben!
Es funktioniert vorzüglich.
Warum ich diesen Output brauche?
Ich habe hunderte solcher, durch FactorInteger erstellten Brüche, die als reiner Textoutput in der von mir gewünschten Formatierung erscheinen sollen.
Das dies nun automatisiert geht, ist sehr zeitsparend!
Für L habe ich nun direkt eingegeben:
L:= FactorInteger[ [mm]3^4[/mm] / [mm](2^4[/mm] * 5) ]
nancarrow
|
|
|
| |
|
> Mathematica v7:
>
> Folgender Input:
> [mm]3^4[/mm] / [mm](2^4[/mm] * 5)
>
> soll ausgegeben werden als:
>
> 2^-4 [mm]3^4[/mm] 5^-1
>
> Gibt es dafür eine Funktion?
> DANKE!
Hallo nancarrow,
das Wesentliche liefert der Befehl FactorInteger:
FactorInteger [mm] [3^4/(2^4*5)] [/mm] liefert [mm] \{\{2,-4\},\{3,-4\},\{5,-1\}\}
[/mm]
Das ist die Primfaktorzerlegung in Listenform.
LG Al-Chw.
|
|
|
|
