[NTG-context] Center horizontally and vertically a table with a graphic in a paragraph environment

[Pablo Rodriguez]

On 01/09/2015 02:23 PM, Fabrice Couvreur wrote:
> Hi,
> Is it possible to center horizontally and vertically the table with the
> graphics?

Hi Fabrice,

adding an xtable might do what you want (but unless you have narrower
left and right margins, there is no room to fit both tables [I guess]).

\showframe
\setuplayout[backspace=2.5cm, width=middle]

\startsetups[table:initialize]

\setupTABLE[start][align={middle,lohi},width=1.5cm,offset=0.5ex,style=small]
  \setupTABLE[row][first][background=color,backgroundcolor=lightgray]
\stopsetups

\usemodule[graph]
\definecolor[mycolor][c=.4,m=0,y=0,k=0]
\starttext
\startxtable
\startxrow
\startxcell
\start
\switchtobodyfont[small]
\startMPpage[instance=graph]
    drawoptions(withpen pencircle scaled 1pt);
    w := 10cm; h := 8cm;
    ahlength := .25cm;
    draw begingraph (w,h)
        numeric xmin, xmax, ymin, ymax;
        xmin := 0; xmax :=100; ymax :=8000 ;ymin:=0;
        setrange((xmin,ymin),(xmax,ymax));
        for x=xmin step 10 until xmax:
            grid.bot(format("@g",x),x) withcolor \MPcolor{mycolor}
                withpen pencircle scaled .3pt;
        endfor
        for y=ymin step 1000 until ymax:
            grid.lft(format("@g",y),y) withcolor \MPcolor{mycolor}
                withpen pencircle scaled .3pt;
        endfor
        glabel.bot(textext("Nombre de chaises"),OUT);
        glabel.lft(textext("Euros") rotated 90,OUT);
        glabel.bot("${\cal C}$",(5,3000));
        glabel.top("${\cal R}$",(15,500));
        save a; numeric a[];
        a0 := 2000 ; a1 := 50 ; a2 := -0.2 ;
        gdraw makefunctionpath(xmin,90,1000,polynomial_function(a,2,x));
        b0 := 0 ; b1 := 80 ;
        gdraw makefunctionpath(xmin,90,1000,polynomial_function(b,1,x));
    endgraph ;
\stopMPpage
\stop
\stopxcell
\startxcell[align={lohi,middle}]
\framed[frame=off,width=local,align={lohi,middle},location=middle]{%
\bTABLE[setups=table:initialize]
\bTR
    \bTD Jours \eTD
    \bTD Entrées \eTD
\eTR
\bTR
    \bTD 1 \eTD
    \bTD \unknown \eTD
\eTR
\bTR
    \bTD 2 \eTD
    \bTD \unknown \eTD
\eTR
\bTR
    \bTD 3 \eTD
    \bTD \unknown \eTD
\eTR
\bTR
    \bTD 4 \eTD
    \bTD \unknown \eTD
\eTR
\bTR
    \bTD 5 \eTD
    \bTD 870 \eTD
\eTR
\bTR
    \bTD 6 \eTD
    \bTD 910 \eTD
\eTR
\bTR
    \bTD 7 \eTD
    \bTD 1\,000 \eTD
\eTR
\eTABLE
}
\stopxcell
\stopxrow
\stopxtable
\stoptext

Just in case it helps,


Pablo
-- 
http://www.ousia.tk