Center horizontally and vertically a table with a graphic in a paragraph environment

* Center horizontally and vertically a table with a graphic in a paragraph environment
@ 2015-01-09 13:23 Fabrice Couvreur
  2015-01-09 17:09 ` Pablo Rodriguez
  0 siblings, 1 reply; 6+ messages in thread
From: Fabrice Couvreur @ 2015-01-09 13:23 UTC (permalink / raw)
  To: mailing list for ConTeXt users

[-- Attachment #1.1: Type: text/plain, Size: 2231 bytes --]

Hi,
Is it possible to center horizontally and vertically the table with the
graphics ?
Best regards,
Fabrice

\defineparagraphs[TwoColumns][n=2]
\setupparagraphs[TwoColumns][1][width=0.45\textwidth]

\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
\startTwoColumns
\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
\TwoColumns
\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
}
\stopTwoColumns
\stoptext

[-- Attachment #1.2: Type: text/html, Size: 3266 bytes --]

[-- Attachment #2: Type: text/plain, Size: 485 bytes --]

___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
archive  : http://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________

^ permalink raw reply	[flat|nested] 6+ messages in thread