Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2010

[Date Index] [Thread Index] [Author Index]

Search the Archive

Combine these displays

  • To: mathgroup at smc.vnet.net
  • Subject: [mg111614] Combine these displays
  • From: "S. B. Gray" <stevebg at ROADRUNNER.COM>
  • Date: Sat, 7 Aug 2010 06:21:20 -0400 (EDT)
  • Reply-to: stevebg at ROADRUNNER.COM

dots = {13.450, 8.1090, -5.398, -6.511, -9.7456, 7.903, -8.392, -5.989, 
-4.612, 3.614, -8.564, -6.598, -6.794, -8.898, 7.082};

histo = {0, 0, 0, 0, 5, 79, 372, 2016, 4354, 2350, 776, 47, 0, 0, 0};

vertL=6;

Print[ColumnForm[Subsets[Range[vertL], {2}]],
   PaddedForm[ColumnForm[dots], {5, 3}]];


ListPlot[histo, Filling -> Axis, FillingStyle -> Blue,
  ImageSize -> 200]

I would like to have both the Print and the ListPlot side-by-side. I 
have tried various ways but the vertical middle of the ListPlot is 
aligned vertically with the first line of the Print, not what I want.

I'm pretty sure there's a way to do this,but ???

Second question: how can I easily convert this:

dots = {13.450267077799438`,
   8.109055556963629`, -5.398346580982599`, -6.511327150093379`, \
-9.74563291525153`,
   7.903094720434787`, -8.392664097832405`, -5.9892576996334`, \
-4.612703478034474`,
   3.6149284469532583`, -8.564611182475591`, -6.598329965767091`, \
-6.794209914139243`, -8.89863831014673`, 7.082991529239999`}

to this?

dots = {13.450, 8.1090`, -5.398, -6.511, -9.7456, 7.903, -8.392, -5.989, 
-4.612, 3.614, -8.564, -6.598, -6.794, -8.898, 7.082};

Thanks to all for many informative replies in the past few weeks.

Steve Gray


  • Prev by Date: Re: BinLists in Array
  • Next by Date: Re: A new graphic user interface
  • Previous by thread: Convex Hull again
  • Next by thread: Re: Combine these displays