<h2 id="heading-url">URL</h2>
<p><a target="_blank" href="https://leetcode.com/problems/optimal-partition-of-string/description/">Optimal Partition of String - LeetCode</a></p>
<h2 id="heading-code">Code</h2>
<p><a target="_blank" href="https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/problems/2405/main.fsx">https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/problems/2405/main.fsx</a></p>
<pre><code class="lang-plaintext">let partitonString (s: string) : int =
    let rec partitonString' cs window acc =
        match cs with
        | [] -&gt; acc
        | h :: t -&gt;
            if Set.contains h window then
                partitonString' t (Set.add h Set.empty) (acc + 1)
            else
                partitonString' t (Set.add h window) acc

    partitonString' (Seq.toList s) Set.empty 1
</code></pre>


## URL

[Optimal Partition of String - LeetCode](https://leetcode.com/problems/optimal-partition-of-string/description/)

## Code

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

```plaintext
let partitonString (s: string) : int =
    let rec partitonString' cs window acc =
        match cs with
        | [] -> acc
        | h :: t ->
            if Set.contains h window then
                partitonString' t (Set.add h Set.empty) (acc + 1)
            else
                partitonString' t (Set.add h window) acc

    partitonString' (Seq.toList s) Set.empty 1
```

Shohei Yoshida's Blog

Shohei Yoshida's Blog

LeetCode 2405. Optimal Partition of String in F#

URL

Code