Re: Kombinieren von Grafiken

[Martin Heimann <martin.heimann@XXXXXXX.de>]

dies ist genau das Problem: weil die Ticks unterschiedlich gross sind  
in den beiden Grafiken, werden sie beim Zusammenfügen unterschiedlich  
skaliert und dann sind die beiden horizontalen Achsen nicht mehr  
exakt ausgerichtet.

Es handelt sich doch um eine Standardanwendung, z.B. verschiedene  
Zeitreihen untereinander mit exakt ausgerichteten horizontalen Achsen  
darzustellen. Erstaunlich dass dies Mathematica nicht kann, resp.  
nicht ohne mit manuell gesetzten Offsets die Grösse der Ticks und  
Labels auszugleichen.

Gruss,
Martin


On May 25, 2007, at 13:00, Patrick Scheibe wrote:

> Moin,
>
> ich glaube, dass was hier gewuenscht war sind 2 Grafiken  
> uebereinander (also eine oben, die andere unten).
> Da die Grafiken separat gerendert werden und bei der einen die y  
> Achse im Negativen ist und somit jeder Tick ein Minuszeichen vor  
> seiner Zahl hat, sind beide Grafiken nicht exakt ausgerichtet.
>
> Die GraphicsColumn Funktion weiss doch aber gar nicht, was sie da  
> in die obere und in die untere Box packt und kann das Problem nicht  
> beheben. Man muesste von vornerein die beiden Grafiken in das selbe  
> Format bringe, so dass sie das gleiche Scaling haben und das die x- 
> Koordinaten uebereinstimmen.
>
> Ohne Ticks funktioniert das Ganze. Aber wie man das vernuenftig  
> hinkriegt... keine Ahnung.
>
> p1 = ListPlot[Range[10], FrameLabel -> None, Ticks -> None];
> p2 = ListPlot[-Range[10], FrameLabel -> {"x", "y"}, Ticks -> None];
> GraphicsColumn[{p1, p2}, Frame -> All]
>
> Cheers
> Patrick
>
> Am 25.05.2007, 11:59 Uhr, schrieb Jens-Peer Kuska  
> <kuska@XXXXXXX.de>:
>
> > Hallo,
> >
> > die gab es schon immer, die Version 6.0 Variante
> >
> > opts = {PlotRange -> {{0, 10}, {-10, 10}}, Frame -> True};
> > GraphicsColumn[{ListPlot[Range[10], Sequence @@ opts,
> >    FrameLabel -> {"", "y"}],
> >   ListPlot[-Range[10], Sequence @@ opts, FrameLabel -> {"x", "y"}]}]
> >
> >
> > aber
> > natürlich ist
> >
> > ListPlot[
> >  {Range[10], -Range[10]}, FrameLabel -> {"x", "y"},Frame->True]
> >
> > hübscher.
> >
> > Gruss
> >   Jens
> >
> >
> >
> > Martin Heimann wrote:
> > > Gibt es jetzt in Mathematica v6 ein einfaches Rezept, wie man zwei
> > > Grafiken so übereinander anordnen kann, dass die x-Achse bei beiden
> > > Grafiken die selbe Länge hat und gleichweit vom linken Rand beginnt?
> > >
> > > GraphicsColumn[{ListPlot[Range[10], FrameLabel -> None],
> > > ListPlot[-Range[10], FrameLabel -> {"x", "y"}]}]
> > >
> > > Gruss,
> > > Martin
> > >
> > > --------
> > > Max-Planck-Institute for Biogeochemistry, PF 100164, D-07701 Jena,
> > > Germany
> > > Street Address:  Beutenberg Campus, Hans-Knoell-Straße 10,  
> > > D-07745 Jena
> > > Office:     +49-3641-57-6350/6301
> > > *SIP (VoIP):   1-747-617-6659                 *
> > > *Mobile - (NEW):     +49-172-360 6519*
> > > Home:     +49-3641-618247
> > > Fax.:     +49-3641-57-7300
> > > Email:     martin.heimann@XXXXXXX.de
> > > <mailto:martin.heimann@XXXXXXX.de>
> > > Web:     http://www.bgc-jena.mpg.de/~martin.heimann
> > > <http://www.bgc-jena.mpg.de/%7Emartin.heimann>
>
>
>
> --
> Erstellt mit Operas revolutionärem E-Mail-Modul: http:// 
> www.opera.com/mail/

--------
Max-Planck-Institute for Biogeochemistry, PF 100164, D-07701 Jena,  
Germany
Street Address:  Beutenberg Campus, Hans-Knoell-Straße 10, D-07745 Jena
Office:     +49-3641-57-6350/6301
SIP (VoIP):   1-747-617-6659
Mobile - (NEW):     +49-172-360 6519
Home:     +49-3641-618247
Fax.:     +49-3641-57-7300
Email:     martin.heimann@XXXXXXX.de
Web:     http://www.bgc-jena.mpg.de/~martin.heimann