let n = stdin.ReadLine() |>  int
let s = stdin.ReadLine() 
let c = [|for i in 0..(n-1) do yield s.[i]|]

let x = ( c
|>Array.pairwise
|>Array.map (fun (x,y) -> if x=y then 0 else 1)
|>Array.sum
)

x+1
|>stdout.WriteLine