Question

How to count specific string occurrences in a list with F#

Answer 1

let count value list =
    Seq.where (fun x -> x = value) list |> Seq.length

let arr = ["f#"; "c"; "f#"; "f#"; "c#"; "c"; "php"]

let result1 = count "f#" arr
printfn "f# = %A" result1

let result2 = count "c" arr
printfn "c = %A" result2

let result3 = count "php" arr
printfn "php = %A" result3

     
 
    
(* 
run:
    
f# = 3
c = 2
php = 1
    
*)

 

70+ SQL courses for beginners and professionals