SPSS基本架构3_循环宏代换多重响应集假设变量

*COMPUTE man6=0.

*do repeat #var=X336 X337 X335 X333 X334 X343.*if #var=1 man6=1.*end repeat.

*man6各⾃阅读率.VECTOR PPPP (6,f1).

DO REPEAT #var=X551 X560 X542 X524 X533 X614/#var4=PPPP1 to PPPP6.COMPUTE #var4=0.

+if #var=1 or #var=2 or #var=3 or #var=4 #var4=1.END REPEAT.

VARIABLE LABELSpppp1 '男⼈装阅读'pppp2 '时尚先⽣阅读'pppp3 '芭莎男⼠阅读'pppp4 '智族GQ阅读'pppp5 '男⼈风尚阅读'

pppp6 '时尚健康男⼠阅读'.

DEFINE !set(name=!CHAREND('/') /var=!CMDEND )MRSETS

/MDGROUP NAME=!name CATEGORYLABELS=VARLABELS VARIABLES=!var VALUE=1 /DISPLAY NAME=[!name].!ENDDEFINE.

DEFINE !ctable(row=!CHAREND('/') /col=!CMDEND )CTABLES

/VLABELS VARIABLES=!row !col DISPLAY=LABEL

/TABLE !HEAD(!row) !DO !v !IN (!TAIL(!row)) + !v !DOEND

BY (!HEAD(!col) !DO !v !IN (!TAIL(!col)) + !v !DOEND ) [COUNT F40.0]

/CATEGORIES VARIABLES=!row ORDER=D KEY=Count EMPTY=INCLUDE

/CATEGORIES VARIABLES=!col ORDER=A KEY=VALUE EMPTY=EXCLUDE TOTAL=YES LABEL='Total' POSITION=BEFORE.!ENDDEFINE.

!set name=$阅读率 /var=PPPP1 to PPPP6.!ctable row=$阅读率 /col=CITY.

* 定义多重响应集.MRSETS

/MDGROUP NAME=$man6 CATEGORYLABELS=VARLABELS VARIABLES=X336 X337 X335 X333 X334 X343 VALUE=1 /DISPLAY NAME=[$man6].

*watch avprice.

COMPUTE zhubaoavp=MEAN(X3399 TO X3450).COMPUTE watchavp=MEAN(X2813 TO X28).COMPUTE shoesavp=MEAN(X5162 TO X5208).COMPUTE clothsavp=MEAN(X4044 TO X4107).COMPUTE bagavp=MEAN(X4637 TO X4688).

COMPUTE caizhuangavp=MEAN(X6348 TO X10).COMPUTE hufuavp=MEAN(X6949 TO X7003).

COMPUTE xiangshuiavp=MEAN(X5723 TO X5783).

VARIABLE LABELS

zhubaoavp 'A平均单次花费'watchavp 'B平均单次花费'

shoesavp 'C平均单次花费'clothsavp 'D平均单次花费'bagavp 'E平均单次花费'caizhuangavp 'F平均单次花费'hufuavp 'G平均单次花费'xiangshuiavp 'H平均单次花费'.

* 设定表格--各项平均单次花费.CTABLES

/VLABELS VARIABLES=zhubaoavp watchavp shoesavp clothsavp bagavp caizhuangavp hufuavp xiangshuiavp $man6

DISPLAY=LABEL

/TABLE zhubaoavp [MEAN] + watchavp [MEAN] + shoesavp [MEAN] + clothsavp [MEAN] + bagavp [MEAN] + caizhuangavp [MEAN] + hufuavp [MEAN] + xiangshuiavp [MEAN] BY $man6 [C]

/CATEGORIES VARIABLES=$man6 EMPTY=INCLUDE TOTAL=YES POSITION=BEFORE.

DEFINE !set(name=!CHAREND('/') /var=!CMDEND )MRSETS

/MDGROUP NAME=!name CATEGORYLABELS=VARLABELS VARIABLES=!var VALUE=1 /DISPLAY NAME=[!name].!ENDDEFINE.

/***拥有率***.

!set name=$G5yy/var=X2652 to X2703.!set name=$H5yy /var=X3238 to X32.!set name=$I5yy /var=X3847 to X3910.!set name=$I17yy /var=X4476 to X4527.!set name=$I29yy /var=X5016 to X5062.!set name=$J5yy /var=X5535 to X5595.!set name=$J17yy /var=X6154 to X6216.!set name=$J29yy /var=X6779 to X6833./***预购率***.

!set name=$H5/var=X2868 to X2919.!set name=$G5/var=X3454 to X3505.!set name=$I5/var=X4111 to X4174.!set name=$I17/var=X4692 to X4743.!set name=$I29/var=X5212 to X5258.!set name=$J5/var=X5787 to X5847.!set name=$J17/var=X14 to X76.!set name=$J29/var=X7007 to X7061.

/***man6类杂志分品牌拥有率/预购率* 设定表格.

DEFINE !ctable(var=!CMDEND )CTABLES

/VLABELS VARIABLES=!var $man6 DISPLAY=LABEL

/TABLE !var [C] BY $man6 [COUNT F40.0, COLPCT.COUNT PCT40.1]

/CATEGORIES VARIABLES=!var ORDER=A KEY=VALUE EMPTY=INCLUDE TOTAL=YES POSITION=before /CATEGORIES VARIABLES=$man6 ORDER=A KEY=VALUE EMPTY=EXCLUDE TOTAL=YES POSITION=before!ENDDEFINE.!ctable var=$G5yy.!ctable var=$H5yy.!ctable var=$I5yy.!ctable var=$I17yy.!ctable var=$I29yy.!ctable var=$J5yy.!ctable var=$J17yy.!ctable var=$J29yy.!ctable var=$H5.!ctable var=$G5.!ctable var=$I5.!ctable var=$I17.!ctable var=$I29.!ctable var=$J5.!ctable var=$J17.!ctable var=$J29.

* 设定表格--背景信息.CTABLES

/VLABELS VARIABLES=X20 X9546 X9547 X9549 X9550 X9551 X9552 $man6 DISPLAY=LABEL

/TABLE X20 + X9546 + X9547 + X9549 + X9550 + X9551 + X9552 BY $man6 [C][COLPCT.COUNT PCT40.1]

/CATEGORIES VARIABLES=X20 X9546 X9547 X9549 X9550 X9551 X9552 ORDER=A KEY=VALUE EMPTY=INCLUDE

/CATEGORIES VARIABLES=$man6 EMPTY=INCLUDE TOTAL=YES POSITION=BEFORE.