Visualizing Vargha and Delaney's A with ggplot-CodePudding

I would like to visualize Vargha & Delaney's A in ggplot for educational purposes.

A is an effect size used to compare ordinal data of two groups that depend on each data point's upward/downward/sideways comparison to all data points of the other group.

For this, I would like to be able to show all upward, downward, and equal comparisons of data points in different colors. For an example of what I'm looking for, check out this rough scribble

For reproducibility's sake here is some data to try it with:

library(tidyverse)

data_VD <- tibble(
  A = c(1, 2, 3, 6),
  B = c(1, 3, 7, 9)
)

For reference to how A is calculated, see