I have this section of code in SAS to convert 1 variable of a 5 point likert scale into numeric:
data Cal_1;
set d1;
if Cal_1 = 'Strongly Disagree' then Cl_1 = 1;
else if Cal_1 = 'Disagree' then Cl_1 = 2;
else if Cal_1 = 'Neutral' then Cl_1 = 3;
else if Cal_1 = 'Agree' then Cl_1 = 4;
else if Cal_1 = 'Strongly Agree' then Cl_1 = 5;
keep seq Cal_1 Cl_1;
run;
Where Cal_1 is the reference and Cl_1 will hold the value, is there a way to implement this into a loop so that I could do the same to Cal_2 until Cal_20? Any leads would be appreciated.
If you insist on using SAS:
data a (keep Cl1-Cl20);
array Cal $ {20} Cal1-Cal20;
array Cl {20} Cl1-Cl20;
do i= 1 to 20;
if Cal[i]='Strongly Disagree' then Cl[i]=1;
if Cal[i]='Disagree' then Cl[i]=2;
if Cal[i]='Neutral' then Cl[i]=3;
if Cal[i]='Agree' then Cl[i]=4;
if Cal[i]='Strongly Agree' then Cl[i]=5;
end;
Alternatively, you could use the comma delimiter:
options ps=400 ls=110 nodate nonumber pageno=1 formdlim="";
data a /*(keep=Cl1-Cl5)*/;
infile datalines delimiter=',';
array Cal {5} $ 18 Cal1-Cal5;
array Cl {5} Cl1-Cl5;
input Cal1-Cal5;
do i= 1 to 5;
if Cal[i]='Strongly Disagree' then Cl[i]=1;
if Cal[i]='Disagree' then Cl[i]=2;
if Cal[i]='Neutral' then Cl[i]=3;
if Cal[i]='Agree' then Cl[i]=4;
if Cal[i]='Strongly Agree' then Cl[i]=5;
end;
drop i;
datalines;
Strongly Disagree,Disagree,Neutral,Agree,Strongly Agree
Disagree,Neutral,Agree,Strongly Agree,Strongly Disagree
Strongly Disagree,Disagree,Strongly Disagree,Agree,Strongly Agree
Neutral,Disagree,Neutral,Agree,Neutral
Strongly Disagree,Agree,Neutral,Agree,Strongly Agree
;
proc print data=a;
run;
- Badges
- Science topic
- Similar topics
- Biological Science
- Kinesiology
- Running