 Usage:  gest = intest1(x,y,xg,h,g)  
 
 Input:

  x                      n x d matrix , the observed explanatory variable 
                         where the directions of interest have to be the 
                         first q columns 
                         
  y                      n x p matrix , the observed response variables 
                         
  xg                     m x q matrix , the grid with m points in each 
                         of the q directions of interest 
                         
  h                      q x 1 or 1 x 1 matrix , chosen bandwidth for 
                         the directions of interest 
                         
  g                      d x 1 or 1 x 1 matrix , chosen bandwidth for 
                         the directions not of interest 
                         
 Output:

  gest                   m x q x p matrix, containing the marginal 
                         integration estimators 
                         
--------------------------------------------------------------
(C) MD*TECH Method and Data Technologies, 17.8.2000
