Hi:
It's a kludge, but try this:
ggplot(data = testdata, mapping = aes(x = var1, y = var2)) +
scale_x_continuous(limits = c(1, 10),
breaks = c(1, 1.5, 2, 3, 4, 4.5, 5, 6, 7, 7.5, 8, 9, 10),
labels = c('A', '\n1', 'B', '\n2', 'C', '\n3', 'D', '\n4',
'E', '\n5', 'F', '\n6', 'G')) +
opts(panel.grid.major = theme_blank(), panel.grid.minor = theme_blank()) +
geom_vline(xintercept = c(1, 2, 4, 5, 7, 8, 10), colour = 'white') +
geom_hline(yintercept = c(2, 4, 6, 8, 10), colour = 'white') +
geom_line() + opts(axis.ticks = theme_blank())
HTH,
Dennis