Discussion :

[ikuzar]

Bonjour,

j'ai un data.frame contenant deux colonnes: df$P (puissance) et df$DateTime (temps). Je souhaiterais ajouter une troisième colonne df$diffP (différence de puissance à l'instant T et T-2).

j'ai fait une boucle :

Code :

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

1
2
3
for (i in 3:length(df$DateTime)){
    df$diffP[i] = df$P[i] - df$P[i-2] 
}

La durée de l'execution est innaceptable: 24s !!

Y aurait-il un moyen de calculer la différence de puissance en O(n) ? par exemple en 2 ou 3s (au max 10s)

Quelqu'un trouverait - il mieux que ~24s ?

Merci d'avance pour votre aide

[A. D.]

Bonjour,

Quelqu'un trouverait - il mieux que ~24s ?

Difficile de répondre sans disposer de vos données ! Vous ne nous en indiquez même pas la taille...


Cordialement,

A.D.

[ikuzar]

j'ai 30242 lignes en tout

[lilly74]

Bonjour,

avez-vous essayé l'emploi de la fonction diff()?

Code :

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

?diff

Vous pouvez comparer les temps d’exécution avec:

Code :

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

system.time(z <- diff(x, lag = 2))

Bonne continuation

[ikuzar]

D'accord,
je testerai diff, j'ai une solution "à l'arrache" mais diff semble plus approprié, plus propre, encore merci.

Code :

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

1
2
3
4
5
df <- data.frame(power = c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)) 
 # add difference 
 diffGap <- 2 
 df$diff <- c(rep(NA, diffGap), head(df$power, -diffGap) - tail(df$power, -diffGap)) 
View( df )