Вот мой рабочий пример:

library(ggplot2)
library(directlabels)  # ver 2014.6.13 via r-forge
DF <- expand.grid(z = seq(1, 3001, by=10), k = seq(from=0.5, to=5, by=0.25))

# Defines the function value for each z-k combination
DF$dT <- with(DF, -0.07 * z * (1/2.75 - 1/k))

p <- ggplot(DF, aes(x = z, y = k, z = dT)) +  theme_bw() + 
 stat_contour(aes(colour=..level..), breaks=c(seq(from=-40, to=0, by=5), c(seq(from=5, to=150, by=10))))
angled.boxes <- list("far.from.others.borders","calc.boxes","enlarge.box","draw.rects")
direct.label(p, "angled.boxes")

Который выглядит так:

Я хочу изменить цвет рамки надписи на «белый», но не вижу, как это сделать. В новостях за пакет написано так:

2,5 --- 6 апреля 2012 г.

draw.rects с настраиваемым цветом, по умолчанию черный.

И видеть как «angled.boxes» это список, содержащий:

angled.boxes <- list("far.from.others.borders","calc.boxes","enlarge.box","draw.rects")

Я полагаю, это возможно, но как?