Tableau diverging colour scales (continuous)

dsub <- subset(diamonds, x > 5 & x < 6 & y > 5 & y < 6)
dsub$diff <- with(dsub, sqrt(abs(x-y))* sign(x-y))
d <- qplot(x, y, data=dsub, colour=diff)
d + scale_colour_gradient2_tableau()

## Warning: Non Lab interpolation is deprecated

d + scale_colour_gradient2_tableau('Orange-Blue')

## Warning: Non Lab interpolation is deprecated

d + scale_colour_gradient2_tableau('Temperature')

## Warning: Non Lab interpolation is deprecated