 Usage:  gest = intest2d(t,y,h,g,loc{,opt})  
 
 Input:

  t                      n x p matrix , the observed explanatory variable 
                         where the directions of interest have to be the 
                         first and second column 
                         
  y                      n x q matrix , the observed 
                         response variables 
                         
  h                      2 x 1 or 1 x 1 matrix , chosen bandwidth for 
                         the directions of interest 
                         
  g                      p x 1 or 1 x 1 matrix , chosen bandwidth for 
                         the directions not of interest 
                         
  loc                    dummy, for loc=0 local constant (Nad. Wats.), 
                         for loc=1 local linear and for loc=2 local 
                         quadratic estimator will be used 
                         
  opt.tg                 ng x 2 vector, a grid for direction of interest. 
                         If tg is given, the nonparametric function will be 
                         computed on this grid. 
                         
  opt.shf                integer, (show-how-far) if exists and =1, an output 
                         is produced which indicates how the iteration 
                         is going on (additive function / point of estimation / 
                         number of iteration). 
                         
 Output:

  gest                   n(ng) x pp x q matrix, containing the marginal 
                         integration estimates 
                         
--------------------------------------------------------------
(C) MD*TECH Method and Data Technologies, 17.8.2000
