Discussion :

[PhYx]

Bonjour à tous

mon problème est le suivant :
je cherche à multiplier des variables (ici P011 jusqu'à P013) par des indicatrices (qui correspondent à des dates) et à stocker ces résultats dans des nouvelles variables (donc créer 3 nouvelles variables par indicatrices)

le problème est que j'ai 366 indicatrices et j'aimerai pouvoir nommer mes nouvelles variables de manière à pouvoir attribuer chaque variable à une date précise

j'aurai donc aimé pouvoir récupérer le nom des variables qui sont dans mon array et non pas me contenter d'un simple &i comme dans la partie rouge

voici ma macro :

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
%macro IndicCAR(table, sortie);

DATA _NULL_;
set &table;
ARRAY VECTEUR (*) date01_04_2007 -- date31_03_2008 ;
CALL SYMPUT ('nombre',dim(vecteur));
RUN;


data &sortie;
set &table;
array tab (*) date01_04_2007 -- date31_03_2008 ;

%do i=1 %to &nombre.;
	P011_&i. = P011*tab[&i.];
	P012_&i. = P012*tab[&i.];
	P013_&i. = P013*tab[&i.];
%end;
run;

%Mend IndicCAR;

[Bruno.Thevenin]

Bonjour,

Rajouter une simple macro-boucle ne convient-il pas ?

Code :

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

1
2
3
4
5
6
%do i=1 %to &nombre. ;
   %do j = 1 %to 366 :
      %let k = %substr(%eval(&j+1000),2,3) ;
      P&k._&i = P&k*tab(&i) ;
   %end ;
%end ;

Bon courage !

[PhYx]

ton code ne porte pas sur la bonne partie du problème

je veux garder mes P011 P012 P013, c'est la partir &i que je cherche à modifier par un nom plus identifiable que 1 .. 366

au final j'aurai 3*366 variables (car nombre = 366)
le but est de faire une MCO sous contrainte au final

[lhonolulu]

Je ferai un proc contents au début pour stocker le nom de chacune de tes variables dans une macro.

Code :

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

1
2
3
4
5
6
7
8
 
proc contents data = &table (keep = date01_04_2007 -- date31_03_2008 ) out = var noprint;
run;
 
data _null_;
  set var;
  call symput('nom_var'!!trim(left(put(_n_,best12.))), trim(name));
run;

ta boucle

Code :

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

1
2
3
4
5
6
 
%do i=1 %to &nombre.;
	P011_&&nom_var&i. = P011*tab[&i.];
	P012_&&nom_var&i. = P012*tab[&i.];
	P013_&&nom_var&i. = P013*tab[&i.];
%end;

Ce code doit un près marcher

[Bruno.Thevenin]

Bonjour,

désolé !
Je souscris complètement à la solution de lhonolulu !

Bon courage !

[datametric]

Tu peux regarder si ca fait ce que tu veux en changeant les p011_3 p012_3 et p013_3 par p011_366 p012_366 et p013_366 après avoir testé.

Les array Pxx créent les nouvelles variables à . , la boucle les renseigne.

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
23
24
25
26
 
data test;
input p011 p012 p013 date01_04_2007 date01_05_2007 date31_03_2008 8.;
datalines;
1 1 1 100 200 300
2 2 2 100 200 300
;
run;
 
data test;
set test;
 
array p11 (*) p011_1-p011_3 ;
array p12 (*) p012_1-p012_3 ;
array p13 (*) p013_1-p013_3 ; 
 
array tab (*) date01_04_2007 -- date31_03_2008 ;
 
do i=1 to dim(tab) ;
 
	p11(i) = p011*tab(i);
	p12(i) = p012*tab(i);
	p13(i) = p013*tab(i);
end;
 
run;

Concernant les MCO sous contraintes, tu as regardé la proc MODEL ou les proc NLP etc ... ?

[PhYx]

merci !
la solution de lhonolulu est la bonne
je n'avais jamais utilisé de proc contents dans ce contexte mais je retiens la méthode