I fixed the perpendicular bars, but I having some difficulty getting it to read colors from a column in my data table (titled color). Neither of these really work.

ggplot(data = tbl,aes(x = x,y = y),colour=color) +
  geom_point() +  
  geom_errorbar(aes(ymin = y-SEy,ymax = y+SEy,height=.00)) +
  geom_errorbarh(aes(xmin = x-SEx,xmax = x+SEx,height=.00)) +
  scale_color_identity() + geom_abline(intercept = 0, slope = 1)

ggplot(data = tbl,aes(x = x,y = y),colour=color) +
  geom_point() +  
  geom_errorbar(aes(ymin = y-SEy,ymax = y+SEy,height=.00)) +
  geom_errorbarh(aes(xmin = x-SEx,xmax = x+SEx,height=.00)) +
  scale_color_manual(values = as.character(tbl$color)) + geom_abline(intercept = 0, slope = 1)

Any clue what is going on?