jsonata：删除数组中的第一次出现项目

Question

我想删除JSONATA阵列中元素的第一次出现。

我尝试了以下操作：

(
    $largerArray := ["a","b","c","a","b","c"];
    $itemToExclude := "a";
    $expectedArray := ["b","c","a","b","c"];
    
    $doesNotWorkBecauseVariablesAreLocal := function($array, $element){(
        $found := false;
        $filter($array, function($v){(
            $isElem := $v = $element;
            $shouldDrop := $isElem and $not($found);
            $found := $found or $isElem;
            $not($shouldDrop)
        )})
    )};

    $doesNotWorkBecauseVariablesAreLocal($largerArray,"a");

    $reduced := $reduce($largerArray, function($acc,$arrayItem){(
        $array := $lookup($acc, "array");
        $foundAlready := $lookup($acc,"foundAlready");
        $itemToExclude := $lookup($acc,"itemToExclude");
        $shouldExclude := $arrayItem = $itemToExclude and $not($foundAlready);
        $foundAlready := $foundAlready or $shouldExclude;
        $shouldExclude ? {"array":$array, "foundAlready":$foundAlready, "itemToExclude":$itemToExclude} : {"array":$append($array,$arrayItem), "foundAlready":$foundAlready, "itemToExclude":$itemToExclude}
    )}, {"array":[], "foundAlready":false, "itemToExclude":$itemToExclude});

    $reduced.array;
)

do notworkbecaueabairablesareLocal不起作用，因为找到的变量是本地范围的。因此，我想我问题的第一部分是：可以使这种方法起作用吗？

它似乎没有工作的事实使我尝试了第二种方法，即通过包含array，foundalReady boolean和的对象进行状态。 ItemToExclude

它有效，但并不优雅。

实现这一目标的惯用方法是什么？

Answer 1

你是对的，似乎没有办法修改来自外部作用域的 $found 变量。真是太糟糕了！

您的基于归约的替代方案走在正确的轨道上。 @aeberhart 打败了我，但我想出了一个非常相似的解决方案：

(
  $largerArray := ["a","b","c","a","b","c"];

  $findFirstOccurenceIndex := function($array, $itemToFind) {
    $reduce($array, function($acc, $item, $index) {
      (
        $isItemToFind := $item = $itemToFind;
        $acc != null ? $acc : $isItemToFind ? $index : null
      )
      },
      null
    )
  };

  $firstOccurence := $findFirstOccurenceIndex($largerArray, "a");
  
  $filter($largerArray, function($item, $index) { $index != $firstOccurence })
)

如果你想尝试一下，这里有一个 在 JSONata Playground 中链接到它。

Answer 2

您可以使用$ drief（ https://docs.jsonata.org/docs.jsonata.org/higher-order-erord-erfor--prode-----功能＃降低）找到项目的第一次出现。 $减少迭代术语，并通过累加器（第一个索引）以及当前索引和值。我们可以将累加器初始化为-1，如果仍然为-1，并且该值与搜索匹配，则将索引返回为新的累加器值。

一旦有索引，我们就可以使用$ filter（ https：//docs.jsonata。 org/高级函数＃filter ）从数组中删除该索引：

(
    $largerArray := ["a","b","c","a","b","c"];
    $itemToExclude := "b";
    $expectedArray := ["b","c","a","b","c"];
    

    $dropFirst := function($array,$item){(
        $index := $reduce($array, function($accumulator, $value, $index){ $value = $item and $accumulator = -1 ? $index : $accumulator }, -1 );
        $filter($array, function($v, $i){$i != $index ? $v})
    )};

    $dropFirst($largerArray, $itemToExclude)
)