Question

以下循环需要很长时间。有没有什么方法可以更节省时间？以下data.table由27个变量和超过600k的观测值组成。

Capabilities cap = ((RemoteWebDriver) browserDriver).getCapabilities();
String browsername = cap.getBrowserName();
// This block to find out if it is IE
if ("internet explorer".equalsIgnoreCase(browsername)) {
  driver.findElement(By.id("overridelink")).click();
}

基本上，我需要索引X中唯一条目的每个外观，即第一次出现，第二次出现等，然后将其作为附加列合并到现有数据中。但是，我在编辑矢量时得到了股票。

谢谢。

Answer 1

首先，请使用fread：

DT <- fread("file.txt", sep = "|")

接下来，使用setnames：

setnames(DT, 1, "X")

最后，使用rowid：

DT[ , vector := rowid(X)]

R循环优化/循环太耗时

1 个答案: