`position_nudge_to()`

is generally useful for adjusting the position of
labels or text, both on a discrete or continuous scale.
`position_nudge_to()`

differs from `position_nudge`

in that the coordinates of the new position are given directly, rather than
as a displacement from the original location. It optionally sets an even
distance among positions. As other position functions in this package, it
preserves the original position to allow the text to be linked back to its
original position with a segment or arrow.

## Arguments

- x, y
Coordinates of the destination position. A vector of mode

`numeric`

, that is extended if needed, to the same length as rows there are in`data`

. The default,`NULL`

, leaves the original coordinates unchanged.- x.action, y.action
character string, one of

`"none"`

, or`"spread"`

. With`"spread"`

evenly distributing the positions within the range of argument`x`

or`y`

, if non-null, or the range the variable mapped to*x*or`y`

, otherwise.- kept.origin
One of

`"original"`

or`"none"`

.

## Details

The nudged to `x`

and/or `y`

values replace the original ones in
`data`

, while the original coordinates are returned in `x_orig`

and `y_orig`

. Values supported are those of *mode* numeric,
thus including dates and times.

If the length of `x`

and/or `y`

is more than one but less than
rows are present in the data, the vector is both recycled and reordered so
that the nudges are applied sequentially based on the data values. If their
length matches the number of rows in data, they are assumed to be already
in data order.

## See also

`position_nudge`

,
`position_nudge_repel`

.

Other position adjustments:
`position_dodgenudge()`

,
`position_jitternudge()`

,
`position_nudge_center()`

,
`position_nudge_keep()`

,
`position_nudge_line()`

,
`position_stacknudge()`

## Examples

```
df <- data.frame(
x = c(1,3,2,5,4,2.5),
y = c(2, 1, 2.5, 1.8, 2.8, 1.5),
label = c("abc","cd","d","c","bcd","a")
)
# default does nothing
ggplot(df, aes(x, y, label = label)) +
geom_point() +
geom_text(position = position_nudge_to())
# a single y (or x) value nudges all observations to this data value
ggplot(df, aes(x, y, label = label)) +
geom_point() +
geom_text(position = position_nudge_to(y = 3))
# with a suitable geom, segments or arrows can be added
ggplot(df, aes(x, y, label = label)) +
geom_point() +
geom_text_s(position = position_nudge_to(y = 3))
# alternating in y value order because y has fewer values than rows in data
ggplot(df, aes(x, y, label = label)) +
geom_point() +
geom_text_s(position = position_nudge_to(y = c(3, 0)))
ggplot(df, aes(x, y, label = label)) +
geom_point() +
geom_text_s(position = position_nudge_to(y = c(0, 3)))
# in data row order because y has as many values as rows in data
ggplot(df, aes(x, y, label = label)) +
geom_point() +
geom_text_s(position = position_nudge_to(y = rep_len(c(0, 3), 6)))
# spread the values at equal distance within the available space
ggplot(df, aes(x, y, label = label)) +
geom_point() +
geom_text_s(position =
position_nudge_to(y = 3, x.action = "spread"))
# spread the values at equal distance within the range given by x
ggplot(df, aes(x, y, label = label)) +
geom_point() +
geom_text_s(position =
position_nudge_to(y = 3, x = c(2,4), x.action = "spread"),
hjust = "center")
ggplot(df, aes(x, y, label = label)) +
geom_point() +
geom_text_s(position =
position_nudge_to(y = 3, x = c(0,6), x.action = "spread"),
hjust = "center")
```