let n = Scanf.scanf " %d" @@ (+) 0
let xys = Array.init n @@ fun _ -> Scanf.scanf " %d %d" @@ fun a b -> a, b
let m0 = ref 0
let rec f c i a =
  if i > n then c
  else 
  if not a.(i) then c
  else f (c + 1) (i + 1) a
let _ =
  for i = 0 to n - 1 do
    let m = ref 1 in
    let x0, y0 = xys.(i) in
    for j = 0 to n - 1 do
      let x1, y1 = xys.(j) in
      let dx0, dy0 = x1 - x0, y1 - y0 in
      if dx0 <> 0 && dy0 <> 0 then
        let flags = Array.make (n + 1) false in
        for k = 0 to n - 1 do
          let x, y = xys.(k) in
          let dx, dy = x - x0, y - y0 in
          if dx <> 0 && dy <> 0 && dx mod dx0 = 0 && dy mod dy0 = 0 && dx / dx0 = dy / dy0 then
            if abs (dx / dx0) < n then flags.(abs @@ dx / dx0) <- true
        done;
        if dx0 > 0 then
          m := !m + f 0 1 flags
    done;
    m0 := max !m0 !m
  done;
  Printf.printf "%d\n" @@ max 1 @@ n - !m0