在 SPSS 中生成语法的语法

Syntax to generate a Syntax in SPSS

我正在尝试构建一个语法以在 SPSS 中生成一个语法,但我遇到了一些问题…… 我有一个包含元数据的 excel 文件,我想使用它来创建从中提取信息的语法(像这样,如果我有一个庞大的数据库,我只需要保留 excel 更新 - add/delete 变量等 - 然后是 运行 提取新语法所需信息的语法)。 我还注意到生成的语法总是在 15Mb 左右,这是很多(应用于超过 500 行)! 由于不同计算机 and/or 配置中的 运行 语法,我不使用 Python。 有任何想法吗?谁能帮帮我吗? 提前谢谢你。

示例:
(test.xlsx – sheet 1)
Var 代码标签列表 Var_label(连接 Var+Label)
V1 3 性别 1 V1 “性别”
V2 1 作品 2 V2“作品”
V3 3 国家 3 V3 “国家”
V4 1 已婚 2 V4 “已婚”
V5 1 儿童 2 V5 “儿童”
V6 2 满意 1 4 V6 “满意 1”
V7 2 满足 2 4 V7 “满足 2”

(来自其他文件的信息)
列表 = 1
1 个“男”
2 “女”
列表 = 2
1 个“是”
2 “没有”
列表 = 3
1 个“欧洲”
2 “美国”
3 “亚洲”
4 “非洲”
5 “大洋洲”
列表 = 4
1 “非常不满意”
10“非常满意”

我想创建一个语法来生成新语法以应用“变量标签”和“值标签”。所以,我想到了这样的事情:

GET DATA
/TYPE=XLSX
/FILE="test.xlsx"
/SHEET=name 'sheet 1'
/CELLRANGE=FULL
/READNAMES=ON
/DATATYPEMIN PERCENTAGE=95.0.
EXECUTE.

STRING vlb (A15) labels (A150) value (A12) lab (A1500) point (A2) separate (A50) space (A2) list1 (A100) list2 (A100).

SELECT IF (Code=1).
COMPUTE vlb = "VARIABLE LABELS".
COMPUTE labels = CONCAT (RTRIM(Var_label)," ").
COMPUTE point = ".".
COMPUTE value = "VALUE LABELS".
COMPUTE lab = CONCAT (RTRIM(Var)," ").
COMPUTE list1 = '1 " Yes "'.
COMPUTE list2 = '2 "No".'.
COMPUTE space = " ".
COMPUTE separate="************************************************.".

WRITE OUTFILE = "list_01.sps" / vlb.
WRITE OUTFILE = "list_01.sps" /labels.
WRITE OUTFILE = "list_01.sps" /point.
WRITE OUTFILE = "list_01.sps" /value.
WRITE OUTFILE = "list_01.sps" /lab.
WRITE OUTFILE = "list_01.sps" /list1.
WRITE OUTFILE = "list_01.sps" /list2.
WRITE OUTFILE = "list_01.sps" /space.
WRITE OUTFILE = "list_01.sps" /separate.
WRITE OUTFILE = "list_01.sps" /space.

如果只有一个变量具有相同的列表(例如:V1),它工作正常。但是,如果有多个变量具有相同的列表,它会根据变量的数量(例如:V2、V4 和 V5)重现代码。

我有什么(例如:V2、V4 和 V5),在上面的 运行ning 代码之后:

变量标签
V2“工作”
.
价值标签
V2
1“是”
2“否”
***************************************************。
变量标签
V4“已婚”
.
价值标签
V4
1“是”
2“否”
***************************************************。
变量标签
V5“儿童”
.
价值标签
V5
1“是”
2“否”
***************************************************。

我想要的:

变量标签
V2“工作”
V4“已婚”
V5“儿童”
.
价值标签
V2 V4 V5
1“是”
2“没有”

我认为可能有一些方法可以更好地自动化整个过程,包括使用您的第二个数据源。但是对于这个问题的范围,我会建议一种方法来获得你具体要求的内容。

关键是为第一行和最后一行构建具有特殊条件的命令:

string cmd1 cmd2 (a200).
sort cases by code.
match files /file=* /first=first /last=last /by code. /* marking first and last lines.
do if first.
    compute cmd1="VARIABLE LABELS".
    compute cmd2="VALUE LABELS".
end if.
if not first cmd1=concat(rtrim(cmd1), " /"). /* "/" only appears from the second varname.
compute cmd1=concat(rtrim(cmd1), " ", Var_label).
compute cmd2=concat(rtrim(cmd2), " ", Var).
do if last.
    compute cmd1=concat(rtrim(cmd1), " .").
    compute cmd2=concat(rtrim(cmd2), " ", '  1 " Yes "  2 "No". ').
end if.
exe.

命令现在已经准备好了,但我们不想把它们弄混,所以我们将它们一个接一个地堆叠起来,然后才写出来:

add files /file=* /rename cmd1=cmd /file=* /rename cmd2=cmd.
exe.
WRITE OUTFILE = "var definitions.sps" / cmd .
exe.

编辑: 请注意,上面的代码假定您已经 运行 一个 select cases if code = ... 并且在所有剩余行中有一个 code
另请注意,我在末尾添加了一个 exe. 命令 - 没有 运行 新语法将显示为空。