Discussion :

[seb1122]

Bonjour,
j'essaye d'utiliser la fonction outer pour à partir de 2 vecteurs x et y, renvoyer la matrice f(x[i],y[j]).
J'essaye pour cela d'utiliser la fonction outer, mais j'ai des problèmes. Par exemple sur un cas simple, j'ai l'erreur suivante.

essai=function(i, j){
return(3*i+(5*j))
}

x=1:10
y=1:10
outer(x,y,essai)

Cela marche sans problème, maintenant en faisant :

essai=function(i, j){
return(1)
}

x=1:10
y=1:10
outer(x,y,essai)

J'obtiens l'erreur :
Erreur dans outer(x, y, essai) :
dims [produit 100] ne correspond pas à la longueur de l'objet [1]


Si quelqu'un pouvait me dire pourquoi, ça m'aiderait beaucoup.

Ou sinon, si quelqu'un connait une fonction pour calculer la matrice des f(x[i],y[j]), je suis preneur ici.
J'ai cherché également du côté de Vectorize mais ça conçait pour ce que je cherchais à faire ensuite.

Merci d'avance

[Sengar]

Salut,

Je ne connais pas outer mais mapply() est une fonction qui correspond à ce que tu veux:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
x=1:10
y=1:10
 
#outer(x,y,essai)   
#-> visiblement ca bug si ton return n'est pas fonction des deux arguments
 
#Toutes les combinaisons possibles de x et y
e<-expand.grid(x,y)
 
#Applique ta fonction essai pour toutes les combinaisons possibles de x et y
m<-mapply(essai,e[,1],e[,2])
 
#Transforme le vecteur obtenu en matrice
matrix(m,nrow=length(x),ncol=length(y))

[seb1122]

Génial, merci beaucoup Sengar