method insert_data = fun i data ->
    let iter = self#insert i in
      self#set_data data ~row:iter