# How would I set the column width of a GraphicsRow?

I would like to place a sphere next to a table of text in a GraphicsRow. I am not using a GraphicsGrid because I only need one row.

My text table is truncated by the GraphicRow. I only see a few columns of my table of text.

borderSeg = {{-40, -120},{10,-80}};

borderGCVector = { (Sin[borderSeg[[1,1]]\[Degree] - borderSeg[[2,1]]\[Degree]] Sin[(borderSeg[[1,2]]\[Degree]+borderSeg[[2,2]]\[Degree])/2] Cos[(borderSeg[[1,2]]\[Degree]- borderSeg[[2,2]]\[Degree])/2])-
(Sin[borderSeg[[1,1]]\[Degree] + borderSeg[[2,1]]\[Degree]] Cos[(borderSeg[[1,2]]\[Degree]+borderSeg[[2,2]]\[Degree])/2] Sin[(borderSeg[[1,2]]\[Degree]- borderSeg[[2,2]]\[Degree])/2]),
(Sin[borderSeg[[1,1]]\[Degree] - borderSeg[[2,1]]\[Degree]] Cos[(borderSeg[[1,2]]\[Degree]+borderSeg[[2,2]]\[Degree])/2] Cos[(borderSeg[[1,2]]\[Degree]- borderSeg[[2,2]]\[Degree])/2])+
( Sin[borderSeg[[1,1]]\[Degree] + borderSeg[[2,1]]\[Degree]] Sin[(borderSeg[[1,2]]\[Degree]+borderSeg[[2,2]]\[Degree])/2] Sin[(borderSeg[[1,2]]\[Degree]- borderSeg[[2,2]]\[Degree])/2]),
(Cos[borderSeg[[1,1]]\[Degree]] Cos[borderSeg[[2,1]]\[Degree]] Sin[(borderSeg[[1,2]]\[Degree]- borderSeg[[2,2]]\[Degree])/2])};

GraphicsRow[
{
(* Simple graphic to show cross products *)
Graphics3D[ {{Opacity[0.05],Sphere[{0,0,0}]},
{Dashed, Line[{{0,0,0},{1,0,0}}]},
{Dashed, Line[{{0,0,0},{0,1,0}}]},
{Dashed, Line[{{0,0,0},{0,0,1}}]},
Arrow[{{1,0,0},{1.3,0,0}}],
Arrow[{{0,1,0},{0,1.3,0}}],
Arrow[{{0,0,1},{0,0,1.3}}],
Text[Style["x",Blue, Italic,12],{1.4,0,0}],
Text[Style["y",Blue, Italic,12],{0,1.4,0}],
Text[Style["z",Blue, Italic,12],{0,0,1.4}],
Arrow[{{0,0,0},#}]& /@ CGVectors},Boxed->False],
(* Table of values computed in Mathematica and values computed by C# methods *)
{"", "Mathematica", "Mathematica", "C#", "C#"},
ItemSize->12
Frame->All, FrameStyle->LightGray, ItemStyle->{{1->{FontSlant->Italic}},{1->{FontFamily->"Arial",FontSize->9}}}]]
}
]


Is there a way to set the size of a column in a GraphicRow?

• Suggestion: use Grid and (if necessary) option ItemSize even though you have only one row of two items. – m_goldberg Mar 2 '17 at 14:40
• Please provide definitions for borderGCVector and linkGCVector. Your code doesn't run without them. – MarcoB Mar 2 '17 at 15:11
• Vector definitions have been added. – Doug Kimzey Mar 2 '17 at 15:28
• In the Grid, is there a way to specify that the two items are on a single row instead of a vertical column? – Doug Kimzey Mar 2 '17 at 15:29

If you insist on using GraphicsRow, you can manipulate the size of an element by using spanning elements next to it.
GraphicsRow[{Graphics3D[...],Text[Grid[...]], SpanFromLeft, SpanFromLeft}]

Alternatively, as m_goldberg suggests above, use Gridand double curly brackets {{item1, item2}} or a simple Row
Actually, there is a typo in your code in the text table -- missing comma after ItemSize->12. If you insert it, the table gets bigger and you have to add few more spanning elements, but then the overall graphics size is limiting you, so you have to adjust it by using ImageSize -> {700, 100}.