749512_zh-TW

liliconcom

隔離最小的日期差異

我有一個大型資料集，其中有一個主題的靜態日期（胸部 CT 掃描的日期），我需要找到最小的日期差異並保留該行（刪除其他行）。跳躍 16.2.0

下面的範例 - 我想保留第 2 行和第 4 行（主題 1 和 2 的最小日差）。

主題 ID。 CT 日期。肺功能日期。日差

1 2018年8月30日 18年1月29日 -213

1 2018 年 8 月 30 日 2018 年 8 月 31 日 1

1 2018年8月30日 2019年3月4日 186

2 2017年12月19日 2018年11月13日 329

2 2017 年 12 月 19 日 2019 年 9 月 3 日 623

2 17/12/19 21/10/4 1385

內容組織回覆：隔離最小的日期差異

嗨@jsolo01 ，

新增一個新的公式列「Col Rank」來根據主題 ID 對日差進行排名怎麼樣？

然後，您可以選擇“Col Rank”不等於 0 的行並刪除這些行。

為了;

主題 ID 1，最小日差為第二行。

主題 ID 2，最小日差為第 4 行

1）建立新的公式列：Col Rank

2) 前往行 > 行選擇 > 選擇位置

3) 定義條件：Col Ran 不等於 1 > 點選“新增條件”

4) 右鍵點選所選行 > 刪除行

5）最終結果如下

希望能幫助你。

如果是重複性分析，您可以透過工作流程或 JSL 自動執行這些步驟

回覆：隔離最小的日期差異

這是我對獲得您所要求的東西的簡單方法的看法；只是一個簡單的腳本

Names Default To Here( 1 );
dt = Current Data Table();
dt << select where( :day difference == Col Min( :day difference, :subject ID ) );

dt << subset( selected columns( 0 ), selected rows( 1 ) );

回覆：隔離最小的日期差異

只是擴充一下@WebDesignesCrow互動式解決方案：

如果您還沒有差異列，則可以以互動方式建立它（選擇兩個日期，右鍵單擊列標題並找到差異（逆序）。這將建立一個新列，其中差異以秒為單位。如果您想在您/天內查看它們，您可以雙擊創建的列並根據需要對其進行修改（例如添加除以天數（1）），但在這種情況下只需幾秒鐘

然後右鍵單擊這個新列的標題並從中建立絕對值列

取得該列後，右鍵單擊 subjectid 列並將其設為分組列

接下來，您可以右鍵單擊日期差異列並建立排名公式（注意分組）

從最後一列中，右鍵單擊其中一個“one”，選擇匹配的儲存格

從這裡您可以使用選定的行建立子集

或右鍵單擊行列表，反轉選擇並在反轉後刪除行

然後，如果您需要重複此操作，您可以建立工作流程或從增強日誌中擷取腳本

以下是工作流程建構器所建立的腳本。唯一缺少的是打開表，因為我沒有保存表（並且出於相同的原因，某些列名稱不正確），因此我添加了表創建腳本（也附加了工作流程）。

看更多...

Names Default To Here(1);

//Custom Action - Create table 'Untitled 2'
dt = New Table("Untitled 2",
	Add Rows(6),
	Compress File When Saved(1),
	New Column("subj", Numeric, "Continuous", Format("Best", 12), Set Values([1, 1, 1, 2, 2, 2])),
	New Column("day1",
		Numeric,
		"Continuous",
		Format("m/d/y", 12),
		Input Format("m/d/y"),
		Set Values([3618432000, 3618432000, 3618432000, 3596486400, 3596486400, 3596486400])
	),
	New Column("day2",
		Numeric,
		"Continuous",
		Format("m/d/y", 12),
		Input Format("m/d/y"),
		Set Values([3600028800, 3618518400, 3634502400, 3624912000, 3650313600, 3716150400])
	)
);;

//New formula column: day2-day1
Data Table("Untitled 2") << New Formula Column(
	Operation(Category("Combine"), "Difference (reverse order)"),
	Columns(:day1, :day2)
);

//New formula column: Abs[day2-day1]
Data Table("Untitled 2") << New Formula Column(
	Operation(Category("Transform"), "Absolute Value"),
	Columns(:"day2-day1"n)
);

//New formula column: Rank[Abs[day2-day1]][subj]
Data Table("Untitled 2") << New Formula Column(
	Operation(Category("Distributional"), "Rank"),
	Columns(:"Abs[day2-day1]"n),
	Group By(:subj)
);

//Select matching cells
Data Table("Untitled 2") << Select Where(:"Rank[Abs[day2-day1]][subj]"n == 1);

//Subset data table
Data Table("Untitled 2") << Select Where(:"Rank[Abs[day2-day1]][subj]"n == 1) <<
Subset(Selected Rows(1), Selected columns only(0));