Langage R - écrire une fonction

ardalion -  
 nezix -
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. :/

2 réponses

  1. ardalion
     
    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)}
    0
  2. nezix
     
    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))
    }
    
    0