<h2 id="heading-url">URL</h2>
<a target="_blank" href="https://leetcode.com/problems/minimum-number-of-changes-to-make-binary-string-beautiful/">2914. Minimum Number of Changes to Make Binary String Beautiful</a>
<h2 id="heading-code">Code</h2>
<a target="_blank" href="https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202411/minimum_number_of_changes_to_make_binary_string_beautiful/main.fsx">https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202411/minimum_number_of_changes_to_make_binary_string_beautiful/main.fsx</a>
<pre><code class="lang-fsharp">let minChanges (s: string) : int =
 let rec minChanges' cs prev count acc =
 match cs with
 | [] -&gt; acc
 | h :: t -&gt;
 if h = prev then minChanges' t prev (count + 1) acc
 else if count % 2 = 0 then minChanges' t h 1 acc
 else minChanges' t h 2 (acc + 1)

 match Seq.toList s with
 | [] -&gt; 0
 | h :: t -&gt; minChanges' t h 1 0
</code></pre>

## URL

[**2914\. Minimum Number of Changes to Make Binary String Beautiful**](https://leetcode.com/problems/minimum-number-of-changes-to-make-binary-string-beautiful/)

## Code

[https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202411/minimum\_number\_of\_changes\_to\_make\_binary\_string\_beautiful/main.fsx](https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202411/minimum_number_of_changes_to_make_binary_string_beautiful/main.fsx)

```fsharp
let minChanges (s: string) : int =
    let rec minChanges' cs prev count acc =
        match cs with
        | [] -> acc
        | h :: t ->
            if h = prev then minChanges' t prev (count + 1) acc
            else if count % 2 = 0 then minChanges' t h 1 acc
            else minChanges' t h 2 (acc + 1)

    match Seq.toList s with
    | [] -> 0
    | h :: t -> minChanges' t h 1 0
```

LeetCode 2914. Minimum Number of Changes to Make Binary String Beautiful in F#

URL

Code