
Re: Grids
Posted:
Jul 1, 2013 5:40 AM


x1 = Range[3, 3]; g[x_] := x^2; y1 = g[x1];
A Column is Column, not a List
Column[y1] // Head
Column
Grid[ Join[{{xVal, yVal}}, Thread[{x1, y1}]], Frame > All]
Grid[ Join[{{xVal, yVal}}, Transpose[{x1, y1}]], Frame > All]
Bob Hanlon
On Sun, Jun 30, 2013 at 3:28 AM, Mark <big.dog1@att.net> wrote:
> Hello: > ' > I am trying to get the x1 and y1 results of a basic function displayed in > two columns with a grid around each x1 and y1 entry. > ' > However, my result only appears with a grid around the exterior of the x1 > and y1 values, and the only the column headings. > There is a vertical divider between the x1 and y1 columns, but the row > dividers are missing. > > What is the syntax to get the row dividers to appear? > > Thanks in advance, and below is what I have tried so far: > > x1 = Range[3, 3](*Define the range of x1 values.*) > > g[x1_] := x1^2(*Define the function*) > > y1 = g[x1](*Calculate the y values of the function*) > > Out[21]= {9, 4, 1, 0, 1, 4, 9} > ' > ' > Grid[{{xVal, yVal}, {Column[x1], Column[y1]}}, Frame > All](*The result > of this function in columar format*) > ' > > ' > I also tried the the below statement as well but it gives the same result. > > Grid[{{xVal, yVal}, {Column[x1], Column[y1]}}, Frame > All, Dividers > > All] > > Mark > >

