<h2 id="heading-url">URL</h2>
<a target="_blank" href="https://leetcode.com/problems/count-elements-with-maximum-frequency/">https://leetcode.com/problems/count-elements-with-maximum-frequency/</a>
<h2 id="heading-code">Code</h2>
<a target="_blank" href="https://github.com/syohex/dotnet-study/blob/master/fsharp/leetcode/challenge/202403/count_elements_with_maximum_frequency/main.fsx">https://github.com/syohex/dotnet-study/blob/master/fsharp/leetcode/challenge/202403/count_elements_with_maximum_frequency/main.fsx</a>
<pre><code class="lang-fsharp">let maxFrequencyElements (nums: int list) : int =
 let max, freq =
 nums
 |&gt; List.fold
 (fun (max, freq) n -&gt;
 let v = Map.tryFind n freq |&gt; Option.defaultValue 0
 System.Math.Max(max, v + 1), Map.add n (v + 1) freq)
 (0, Map.empty)

 freq |&gt; Map.fold (fun acc _ v -&gt; if v = max then acc + v else acc) 0
</code></pre>

## URL

[https://leetcode.com/problems/count-elements-with-maximum-frequency/](https://leetcode.com/problems/count-elements-with-maximum-frequency/)

## Code

[https://github.com/syohex/dotnet-study/blob/master/fsharp/leetcode/challenge/202403/count\_elements\_with\_maximum\_frequency/main.fsx](https://github.com/syohex/dotnet-study/blob/master/fsharp/leetcode/challenge/202403/count_elements_with_maximum_frequency/main.fsx)

```fsharp
let maxFrequencyElements (nums: int list) : int =
    let max, freq =
        nums
        |> List.fold
            (fun (max, freq) n ->
                let v = Map.tryFind n freq |> Option.defaultValue 0
                System.Math.Max(max, v + 1), Map.add n (v + 1) freq)
            (0, Map.empty)

    freq |> Map.fold (fun acc _ v -> if v = max then acc + v else acc) 0
```

LeetCode 3005. Count Elements With Maximum Frequency in F#

URL

Code