For loops in ocaml

I want to do something like the following.

let switchgraph cases =  let g = Graph.makeGraph() in  let g = (Graph.addNode g 1) in  for i = 2 to cases do     let g = (Graph.addNode g i) in  done  g

But apparently, this is not possible. How else can I achieve this?