|
Hallo, probier doch einfach mal, ob es mit einem korrekt geschriebenen TickFunction (mit "c") klappt. Auf jeden Fall solltest Du Needs ["ExtendGraphics`Ticks`"] und das erste Plot[] Kommando in *verschiedene* Zellen Deines Notebooks schreiben. Der Grund daf"ur ist, dass der Parser von Mathematica erstmal die zur Auswertung "ubergebenen Befehle nach Symbolen duchsucht. Die Symbole kommen dann in die interne Symboltabelle. Dann werden die Befehle erst ausgef"uhrt. Da im Plot[] Befehl ein TickFunction-Symbol vorkommt schiebt der Parser das Symbol in die Symboltabelle (mit Global` als Kontext). Danach versucht der Kernel das ExtendGraphics`Ticks Paket zu laden in dem TickFunction im Kontex ExtendGraphics`Ticks enthalten ist. Dadurch ist TickFunction schon im Kontext Global` und wird nicht als TickFunction f"ur Plot[] identifiziert, das nat"urich eigentlich ExtendGraphics`Ticks`TickFunction heisst. Annsonsten sind *.nb Dateien sogenannte Notebooks. Also eigentlich Text-Dokumente die einige Mathematica Aufrufe enhalten. *.m Dateien sind Packages, also weitere Funktionsdefinitionen, die einer Mathematica Sitzung hinzugef"ugt werden. "Programme" im eigentlichen Sinne gibt es bei einem Interpreter wie Mathematica nicht weil es keine Mathematica CPU gibt (wieso eigentlich nicht) die Mathematica Maschinen-Code ausf"uhren k"onnte. Zwische Version 3.0.0 und 3.0.1 unterscheiden sich vor allem in einigen behobenen Fehlern. Ein Paket f"ur 3.0.0 arbeitet jedenfalls auch mit 3.0.1. Gruss Jens Jens Peters 24-112-1 2495 wrote: > > Derweilen habe ich auf Rat von Jens Kuska > die neuste Version, die im Netz unter > > http://www.mathsource.com/Content/Enhancements/Graphics/3D/0208-976 > zu finden ist, geladen. > Dies funktioniert auch fuer die angegeben Testbeispielen fuer > Trigonometrie und Mandelbaum deren Programme die Endung .nb haben. > > Die Tests fuer Ticks > Needs["ExtendGraphics`Ticks`"]; > Plot[Sin[x],{x,0,2Pi}, > Ticks ->{ > TickFunction, > TickFunktion > }]; > Plot[Sin[x],{x,0,2Pi}, > Ticks ->{ > TickFunction[#1, #2, > MinorLength -> {0,0}]&, > TickFunktion}]; > Werden mit General::"spell1": > "Possible spelling error: new symbol name "TickFunktion" > is similar to existing symbol "TickFunction". > TickFunction::"shdw": > "Symbol "TickFunction" appears in multiple > contexts{ExtendGraphics`Ticks`",Global}; definitions in context > ExtendGraphics`Ticks` may shadow or be shadowed by other definitions." > MinorLength::shdw: > "Symbol MinorLength appears in multiple contexts > {ExtendGraphics`Ticks`,Global`}; definitions in context > (ExtendGraphics`Ticks`,Global) may shadow or be shadowed by other > definitions." > Ticks:ticks:TickFunction is not a valid tick specification." > > beantwortet. Es erscheinen zwei Kurven ohne jegliche Ticks. > > Das Programm hat allerdings auch die Endung .m . > Geht es nun doch nicht unter Mathematica 3.01 ? > Fuer eine Hilfe > oder Hinweise waere ich dankbar. > Mit freundlichen Gruessen Jens Peters > > > > > Jens Peters 24-112-1 2495 wrote: > > > > > > Problem : > > > Veraenderung der Ticklaenge und Dicke > > > > > > Ich habe festgestellt, dass die uebliche Ticklaenge und Dicke bei > > > Verkleinerung der Graphiken zu klein ist. In Mathematica 3.0 habe ich > > > keine Moeglichkeit gefunden, dieses zu aendern. > > > In dem Springer Buch Mathematica Graphics von Tom Wickham - Jones > > > ist eine Loesung beschrieben allerdings fuer Mathematica 2.2. > > > Wie vorgeschrieben wurde von mir ein Verzeichnis mit C:\TWJPACKS > > > eingerichtet in das ich die Diskette kopierte. Dann habe ich mit > > > AppendTo[ $Path, "C:\\TWJPACKS"] > > > in dem Mathematica Programm einen Pfad eingerichtet und mit > > > Get["DOSGRAPH.M"] und Needs["ExtendGraphics`Geometry`"] versucht, ein > > > Beispielprogramm zu starten. Die Antwort ist : > > > "Cannot open "DOSGRAPH.M." Kennt jemand dieses Problem ? Ist > > > vielleicht keine Kompatibilitaet mit Mathematica 3.0 vorhanden ? Fuer eine Hilfe > > > oder Hinweise waere ich dankbar. > > > Mit freundlichen Gruessen Jens Peters > > |