R忽略文本标签对齐方式

mic*_*str 2 r ggplot2 r-plotly

我在ggplot2 3.0.0中使用plotly 4.8,并尝试向散点图添加文本标签并使其对齐。但是,似乎该hjust参数已被忽略geom_text(aes(....), hjust = "left")。(也尝试过hjust = 0。)

GGPLOT输出

看到它在绘图窗口中以ggplot对齐,标签保持对齐。

ggplot左对齐图表示例

全面输出

但是,对齐方式在转换中丢失,并且文本居中。

绘图中心图示例

因此,问题是,是否有可能通过情节修复这种对齐方式?

测试示例代码

library(ggplot2)
library(data.table)
library(plotly)

data(mtcars)

plotdata <- as.data.table(mtcars)
plotdata$carname <- rownames(mtcars)

# take a small demo subset
plotdata <- plotdata[1:10,]

gg <- ggplot(plotdata, aes(x = wt, y = mpg, label = carname)) +  
               geom_point()  + theme_minimal()
gg <- gg + geom_text(aes(label = carname),
                       size = 2,
                       hjust = "left")
print(gg)

# convert ggplot
p <- ggplotly(gg)
p
Run Code Online (Sandbox Code Playgroud)

Sau*_*han 5

您只需要添加文本位置textposition = "right"

ggplotly(p) %>% style(textposition = "right")
Run Code Online (Sandbox Code Playgroud)

输出:

从Plotly输出

参考:https : //github.com/ropensci/plotly/issues/769