754705_zh-CN

liliconcom

这种非标准形式该如何组织？

谢谢专家！我只会用这种愚蠢的方法来解决它，看看是否有更好的方法。

dt = Current Data Table();
ca = "这";
Column( ca ) << Formula(
	If( Left( 是, 1 ) == "#",
		r = Row();
		a = Substitute( 是, "#", "" );
		"";
	,
		b = Row() - r;
		If( a != "拉丁" | a != "拉丁" | a != "假名" | a != "數字、分數",
			Word( b, a, "、" ),
			a || Munger( 是, 3, 1 )
		);
	)
);
dt << run formulas;
Column( ca ) << deleteFormula;

基础数据分析与建模视窗回复： 这个不规范的表格该怎么整理？

这里的困难在于标题数量与行数不匹配。有没有更好的方法来处理这个问题？
谢谢！

回复：如何组织这种非标准形式？

我不太确定你想如何填充这些行，但这是一个猜测

Names Default To Here(1);

dt = Open("$DOWNLOADS/symbols.jmp");
newcol = dt << New Column("header", Character, Nominal);
dt << Move Selected Columns(newcol, To First);
Column(dt, 2) << Set Name("symbol");

cur_headers = {};
cur_header = "";

dt << Begin Data Update;
For Each Row(dt,
	If(Starts With(:symbol, "#"), // Header row
		cur_headers = Words(:symbol, "#、");
		cur_header = "";
	,
		If(N Items(cur_headers) > 0,
			cur_header = Remove From(cur_headers, 1)[1];
		);
	);
	:header = cur_header;
);
dt << End Data Update;