问候，
我需要帮助编写多步骤过程的脚本，因为我无法抽象出可行的解决方案来完成一些数据准备工作。
我的时间序列数据以多个电子表格形式出现，其中包含多个选项卡，每个选项卡都包含带有列名称的数据，其中包含将数据置于上下文中的元数据。
在下面的示例中，带有“描述符”的列（第 1,3 和 5 列）实际上应该命名为“日期”，但包含分析所需的描述符。此外，单位列（2,4 和 6）实际上应该命名为数据，但包含度量单位。
| 大：小：湿 | 毫克 | 坏：好：丑 | 赫兹 | 左舷：右舷：速度 | 毫升 |
| 2021年12月15日 | 0 | 2021年12月15日 | 4 | 2021年12月15日 | 8 |
| 2021年12月16日 | 1 | 2021年12月16日 | 5 | 2021年12月16日 | 9 |
| 2021年12月17日 | 2 | 2021年12月17日 | 6 | 2021年12月17日 | 10 |
| 2021年12月18日 | 3 | 2021年12月18日 | 7 | 2021年12月18日 | 11 |
理想情况下，完成的数据表应具有以下结构。
| 日期 | 描述符类型1 | 描述符类型2 | 描述符类型3 | 单元 | 数据 |
| 2021年12月15日 | 大的 | 小的 | 湿的 | 毫克 | 0 |
| 2021年12月16日 | 大的 | 小的 | 湿的 | 毫克 | 1 |
| 2021年12月17日 | 大的 | 小的 | 湿的 | 毫克 | 2 |
| 2021年12月18日 | 大的 | 小的 | 湿的 | 毫克 | 3 |
| 2021年12月15日 | 坏的 | 好的 | 丑陋的 | 赫兹 | 4 |
| 2021年12月16日 | 坏的 | 好的 | 丑陋的 | 赫兹 | 5 |
| 2021年12月17日 | 坏的 | 好的 | 丑陋的 | 赫兹 | 6 |
| 2021年12月18日 | 坏的 | 好的 | 丑陋的 | 赫兹 | 7 |
| 2021年12月15日 | 港口 | 右舷 | 速度 | 毫升 | 8 |
| 2021年12月16日 | 港口 | 右舷 | 速度 | 毫升 | 9 |
我尝试将列标题拉入单独的表并使用嵌套 for 循环重新连接，但事实证明并没有成功。以下代码为所包含的示例数据提取并准备列名称数据。
Names Default to Here(1);
//Get MainDT column Names
colNames = Data Table("Data") << Get Column Names;
//Create Empty Table
dtCols = New Table("DTCols");
//Put in Columns into the table
dtCols << New Column( "Columns", Character, Values(colNames));
//Label every other row for splitting
dtCols << New Column( "Data", formula( sequence(1,2,1)));
//Remove formula from Data column
dtCols:Data << Delete Formula;
<BR />//New column from which to split from
dtCols << New Column( "Type", formula(
If(
contains(:Columns, "Desc"), "Meta",
"Unit_Raw"
);
);
);
//Deleting formula for handling
dtCols:Type << Delete formula;
//Splitting the row based on the labelling
splitdtCols = dtCols << Split(
Split By( :Type ),
Split( :Columns ),
Sort by Column Property,
Output Table( "SplitDTCols" )
);
//Text to Columns by ":"
splitdtCols << text to columns(delimiter(":"), columns(:Meta));嵌套的 for 循环（仅将完整描述放回到原始表中）不仅相对较慢（需要循环遍历 > 100 万个条目），而且仅将丢失的数据写入列中。
//Meta column back into Data
For(i = 1, i <= N Items(colNames), i++,
For(j = 1, j <= N Rows(splitdtCols), j++,
//show(splitdtCols:Meta[j]);
If( eval(char(colNames[i])) == eval(char(splitdtCols:Meta[j])),
Data Table("Data") << New Column("Descriptor", set Values(eval(char(splitdtCols:Meta[j]))))
)
)
);我愿意放弃将列名数据提取到单独的表中的方法。确实感觉我缺少一种更简单的方法。
这正是我所希望的。一些简单但我忽略了的事情。我能够很快地实现这一点。
交互式地，这很容易通过多系列堆栈。
使用 Tables->Stack 并将所有列添加到堆栈列列表。 然后单击复选框多系列堆栈。 放系列数到 2 并且不检查连续的。
你会得到一个像这样的表：
重命名数据列至日期和标签2列至单位。
然后，您可以使用 Cols->Utilities->发短信给科尔斯...使用冒号（“：”）作为分隔符将标签列拆分为三列。
你会得到这个：
如果您需要为此编写脚本，因为这是您需要自动化的事情或者您经常这样做，您可以从源脚本中获取堆栈的脚本：
stacked_dt = Data Table( "445470" ) << Stack(
columns(
:"Big:Small:Wet"n, :mg, :"Bad:Good:Ugly"n, :Hz, :"Port:Starboard:Speed"n,
:mL
),
Source Label Column( "Label" ),
Stacked Data Column( "Data" ),
Number of Series( 2 )
);
您需要使用<<设置名称更改列名称的消息。
stacked_dt:"Data" << Set Name( "Date" );
stacked_dt:"Label 2" << Set Name( "Units" );
最后，“文本到列”也可以编写脚本。
stacked_dt << Text To Columns(
delimiter( ":" ),
columns( :Label )
);
