loichideux(L):={
  local v, a, b, c, dx, T, val;
  v:=L[0];
  a:=L[1];
  b:=L[2];
  dx:=L[3];
  c:=floor((b-a)/dx)+1;
  ct:=c+1;
  T:="\\begin{tabular}{*{"+ct+"}{|c}|}
       \\hline \\backslashbox{$\\nu$}{$\\alpha$}
        ";
  for(x:=1;x<=c;x:=x+1)
  {
           val:=a+(x-1)*dx;
     T:=T+"& \\cellcolor{Moccasin}"+val;
  }
  T:=T+" \\\\\\hline";
  for(y:=1; y<=v; y:=y+1)
  {
          for(x:=0; x<=c; x:=x+1)
          {
                  if(x==0)then{T:=T+"\\cellcolor{Moccasin}"+y+" &"}else{
                I:=evalf( chisquare_icdf(y,1-a-(x-1)*dx) );
                  if(x==c)then{T:=T+latex(I)+"\\\\\\hline"}else{T:=T+latex(I)+"&"}
                  }
        }
  }
  T:=T+"\\end{tabular}";
}
:;