transforming multi-response questions into several single response questions

#1
Hello!
I would really appreciate help on the following task.

Data
I have two multiple response sets of 10 variables each - which belong together.
- The first set contains up to 10 smartphone apps the respondent was able to indicate whether he/she is using (value labels range from 1 to 23, one label for each app category)
- The second set of up to ten varibales next to the above carries the intensity of usage for each app which has been stated (labels range from 1 to 6).

DATA LIST LIST /app1 app2 app3 app4 app5 appuse1 appuse2 appuse3 appuse4 appuse5.
BEGIN DATA.
11 15 3 11 18 3 2 2 3 3
11 11 8 15 17 4 3 2 1 4
13 13 16 13 15 5 5 4 3 1
14 18 20 18 10 3 3 4 4 4
END DATA.
LIST.

Task
I would like to have 23 variables which carry the usage of the respondent for each app.

I know that there is code for transforming a multi-response question into several single response questions (see below). But this code leads only to the information whether the app has been stated or not.

I hope I made myself clear and would be happy for any help.
Slys

Code for transforming multi-response question into several single response questions:
NUMERIC golf swimming running tennis cycling wt_train lacross baseball soccer football waterpolo rowing canoeing rugby gymnastics (f4).
VECTOR mr = sport1 to sport5 / md = golf to gymnastics.
LOOP #i = 1 to 5.
IF not(missing(mr(#i))) md(mr(#i)) = 1.
END LOOP.
RECODE golf to gymnastics (sysmis = 0).
EXECUTE.
 
Last edited: