Small correction :

\starttext

\startluacode
= =C2=A0 =C2=A0 =C2=A0function Binom(n,k)
=C2=A0 =C2=A0 =C2=A0 =C2=A0if k = > n then
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0return 0
= =C2=A0 =C2=A0 =C2=A0 =C2=A0elseif (n =3D=3D 0 or k =3D=3D 0) then
=C2=A0= =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0return 1
=C2=A0 =C2=A0 =C2=A0 = =C2=A0else
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0return (n*Bin= om(n-1,k-1))/k
=C2=A0 =C2=A0 =C2=A0 =C2=A0end
=C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0
=C2=A0 =C2=A0 end

=C2=A0 =C2=A0 context.startxtable= ({"align=3D{middle,lohi}, width=3D1cm,offset=3D0.8ex,bodyfont=3D9pt&qu= ot;})
=C2=A0 =C2=A0 for i =3D 0, 9 do
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 context.startxrow({"background=3Dcolor,backgroundcolor=3Dcyan"= ;})
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 for j =3D 0, i do
=C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 context.startxc= ell()
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0context(Binom(i,j))
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0 =C2=A0 context.stopxcell()
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2= =A0 =C2=A0 =C2=A0end
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 context.stopxrow= ()
=C2=A0 =C2=A0 end
=C2=A0 =C2=A0context.stopxtable()
=C2=A0 =C2= =A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0
\stopluacode

\stoptext

<= /div>

L= e=C2=A0sam. 18 juil. 2020 =C3=A0=C2=A022:25, Fabrice Couvreur <fabrice1.couvreur@gmail.com>= a =C3=A9crit=C2=A0:

Hi Wolfgang,

It w= orks but why did you ask this question since I finally use context ?=
Are you sure you want to use context(...) here?
How= not to display the .0 ?
F= abrice

Le=C2=A0sam. 18 juil. 2020 =C3=A0=C2=A022:22,= Wolfgang Schuster <wolfgang.schuster.lists@gmail.com> a =C3=A9crit= =C2=A0:
Fabrice = Couvreur schrieb am 18.07.2020 um 22:09:
> Hi,
> I improved the code to be able to display the grid but I cannot displa= y
> the coefficients.
> Thank you
> Fabrice
>
> \starttext
>
> \startluacode
>=C2=A0 =C2=A0 =C2=A0 =C2=A0function Binom(n,k)
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0if k > n then
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0return 0
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0elseif (n =3D=3D 0 or k =3D=3D 0) the= n
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0return 1
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0else
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0return (n*Binom(= n-1,k-1))/k
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0end
>
>=C2=A0 =C2=A0 =C2=A0 end
>
>=C2=A0 =C2=A0 =C2=A0 context.startxtable({"align=3D{middle,lohi}, =
> width=3D1.2cm,offset=3D0.8ex,bodyfont=3D9pt"})
>=C2=A0 =C2=A0 =C2=A0 for i =3D 1, 10 do
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 context.startxrow({"back= ground=3Dcolor,backgroundcolor=3Dcyan"})
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 for j =3D 1, i do
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 c= ontext.startxcell()
>=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0 = =C2=A0 =C2=A0\ctxlua{context(Binom(i,j))}

Remove \ctxlua:

context(Binom(i,j))

Wolfgang
___________________________________________________________________________= ________
If your question is of interest to others as well, please add an entry to t= he Wiki!

maillist : ntg-cont= ext@ntg.nl / http://www.ntg.nl/mailman/listinfo/nt= g-context
webpage=C2=A0 : http://www.pragma-ade.nl / http://context.aanhet.net=
archive=C2=A0 : https://bitbucket.org/phg/context-m= irror/commits/
wiki=C2=A0 =C2=A0 =C2=A0: http://contextgarden.net
___________________________________________________________________________= ________

--00000000000068a03d05aabd3af9-- --===============1409237664347784725== Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: base64 Content-Disposition: inline X19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19f X19fX19fX19fX19fX19fX19fX19fX19fX18KSWYgeW91ciBxdWVzdGlvbiBpcyBvZiBpbnRlcmVz dCB0byBvdGhlcnMgYXMgd2VsbCwgcGxlYXNlIGFkZCBhbiBlbnRyeSB0byB0aGUgV2lraSEKCm1h aWxsaXN0IDogbnRnLWNvbnRleHRAbnRnLm5sIC8gaHR0cDovL3d3dy5udGcubmwvbWFpbG1hbi9s aXN0aW5mby9udGctY29udGV4dAp3ZWJwYWdlICA6IGh0dHA6Ly93d3cucHJhZ21hLWFkZS5ubCAv IGh0dHA6Ly9jb250ZXh0LmFhbmhldC5uZXQKYXJjaGl2ZSAgOiBodHRwczovL2JpdGJ1Y2tldC5v cmcvcGhnL2NvbnRleHQtbWlycm9yL2NvbW1pdHMvCndpa2kgICAgIDogaHR0cDovL2NvbnRleHRn YXJkZW4ubmV0Cl9fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19f X19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fCg== --===============1409237664347784725==--