<h2 id="heading-url">URL</h2>
<a target="_blank" href="https://leetcode.com/problems/minimum-number-of-operations-to-make-array-empty/description/">https://leetcode.com/problems/minimum-number-of-operations-to-make-array-empty/description/</a>
<h2 id="heading-code">Code</h2>
<a target="_blank" href="https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/problems/2870/main.fsx">https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/problems/2870/main.fsx</a>
<pre><code class="lang-fsharp">let minOperations (nums: int list) : int =
 let freq =
 nums
 |&gt; List.fold (fun acc n -&gt; Map.add n ((Map.tryFind n acc |&gt; Option.defaultValue 0) + 1) acc) Map.empty

 if Map.values freq |&gt; Seq.tryFind ((=) 1) |&gt; Option.isSome then
 -1
 else
 Map.values freq
 |&gt; Seq.fold (fun acc n -&gt; if n % 3 = 0 then acc + (n / 3) else acc + (n / 3) + 1) 0
</code></pre>

## URL

[https://leetcode.com/problems/minimum-number-of-operations-to-make-array-empty/description/](https://leetcode.com/problems/minimum-number-of-operations-to-make-array-empty/description/)

## Code

[https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/problems/2870/main.fsx](https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/problems/2870/main.fsx)

```fsharp
let minOperations (nums: int list) : int =
    let freq =
        nums
        |> List.fold (fun acc n -> Map.add n ((Map.tryFind n acc |> Option.defaultValue 0) + 1) acc) Map.empty

    if Map.values freq |> Seq.tryFind ((=) 1) |> Option.isSome then
        -1
    else
        Map.values freq
        |> Seq.fold (fun acc n -> if n % 3 = 0 then acc + (n / 3) else acc + (n / 3) + 1) 0
```

Shohei Yoshida's Blog

Shohei Yoshida's Blog

LeetCode 2870. Minimum Number of Operations to Make Array Empty in F#

URL

Code