Graph[{{{1, 3}}, {{1, 4}}, {{2, 4}}, {{5, 7}}, {{5, 8}}, {{6, 7}}, {{6, 8}}}, 
 {{{0, 0}, VertexColor -> RGBColor[0., 0., 1.]}, 
  {{0, 1}, VertexColor -> RGBColor[0., 0., 1.]}, 
  {{1, 0}, VertexColor -> RGBColor[0., 0., 1.]}, 
  {{1, 1}, VertexColor -> RGBColor[0., 0., 1.]}, 
  {{3, 0}, VertexColor -> RGBColor[0., 1., 0.]}, 
  {{3, 1}, VertexColor -> RGBColor[0., 1., 0.]}, 
  {{4, 0}, VertexColor -> RGBColor[0., 1., 0.]}, 
  {{4, 1}, VertexColor -> RGBColor[0., 1., 0.]}}]
