Langage R - écrire une fonction Fermé

Question

Bonjour, 

J'aimerais savoir comment on peut écrire en R une fonction dont l'argument soit un vecteur? Le logiciel bloque lorsque j'utilise la syntaxe pour une fonction réelle. :/

Configuration: Windows 7 / Firefox 3.6.25

ardalion · Answer

En fait, je ne vois pas où est l'erreur dans cette fonction :

 f<-function(x) {
+ +                 y=rep(0, length(x))
+ +                 for (i in 1:(length(x))) {
+                                             y[i]<-((x[i] - mean(x))^4)}
+                   return (sum y)}

nezix · Answer

Voici la bonne façon de faire:


f=function(x){
	lenx=length(x)
	meanx=mean(x) #evite de refaire la moyenne a chaque iteration
	y=NULL #Cree un vecteur vide

	for(i in 1:lenx){
		y[i]=(x[i]-meanx)^4
	}
	return(sum(y))
}

Langage R - écrire une fonction

2 réponses

Discussions similaires