The legend_justification parameter doesn't work if the legend_position='top'

[ASmirnov-HORIS]

Example:

data = {'x': [0, 1], 'y': [0, 1], 'g': ['A', 'B']}
ggplot(data, aes('x', 'y', color='g')) + \
    geom_point() + \
    theme(legend_position='top', legend_justification=[1, 1])

In ggplot2 the similar code gives: