Discussion :

[scud32]

Bonjour à tous,
Nouveau au sein du forum je souhaiterai vous soumettre un problème sur lequel je planche depuis un moment mais que je n'arrive pas à résoudre.

Voici la table de depart Exin
NC N
1 0
1 0
1 1
1 0
1 0
1 0
1 2
1 0
1 0
1 0


Et voici la table Exout que j'aimerai obtenir :
NC N
1 0
1 0
1 1
1 1
1 1
1 1
1 2
1 2
1 2
1 2


J'ai essayé des étapes data avec l'utilisation de fonction lag mais rien n'y fait je n'arrive au mieux qu'à obtenir le premier 1 vert et le premier 2 vert.

Voila mon esquisse de programme :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
data Exout;
set Exin;
 
lag_N=lag(N);
if N=0 
then do;
N=lag_N; 
lag_N=lag(N)     [COLOR="seagreen"]/* Afin de ne pas avoir le 0 sur la ligne suivante (mais cela ne semble pas fonctionner */
end;
 
run;
quit;

[Ericka]

Bonjour,

Je viens de passer un bon moment sur ton problème, je pense avoir le même souci dans l'un de mes programmes.
J'ai vraiment l'impression que c'est la fonction LAG qui a un problème, à partir du moment où une variable x est modifiée à une ligne n donnée, il est impossible d'obtenir le LAG(x) à la ligne d'après n+1.

A voir si qqun d'autre a déjà rencontré ce problème avec cette fonction, et comment a-t'il fait pour y remédier.

Ericka

[datametric]

Ceci vous va-t-il ?

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
16
17
18
19
20
21
22
data test;
input NC N;
cards;
1 0
1 0
1 1
1 0 
1 0
1 0
1 2
1 0
1 0
1 0
;
run;
 
data test;
retain N1 0;
set test;
N1=max(N1,N);
put N N1;
run;

[scud32]

Merci a vous qui avez été réactif.
Datametric merci pour ta solution elle marche en effet (c'est le bout de code que j'ai trouvé moi aussi lorsque j'en ai eu assez de plancher sur la fonction lag).

[sasadm]

Bonjour,

Il y a aussi la solution du retain simple :

Code :

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

1
2
3
4
5
6
7
8
DATA Exout;
SET Exin;
length N_ 8;
retain N_ 0;
if N<>0 then N_=N; 
drop N;
rename N_=N ;
run;