[R] outer() problem

[Marc Girondot]

Dear list-members,

Can someone explains me why the last command gives an error. Thanks a lot:
 > outer(0:1, 0:1, FUN=function(x, y) {x+y})
      [,1] [,2]
[1,]    0    1
[2,]    1    2
 > outer(0:1, 0:1, FUN=function(x, y) {x})
      [,1] [,2]
[1,]    0    0
[2,]    1    1
 > outer(0:1, 0:1, FUN=function(x, y) {1})
Erreur dans outer(0:1, 0:1, FUN = function(x, y) { :
   dims [produit 4] ne correspond pas à la longueur de l'objet [1]

Of course I simplify a lot my problem.

Thanks a lot

Marc