我正在绘图中创建一个 3D 散点图,并希望有一个几个句子长的标题(为了描述图形),标题左对齐,不干扰图形本身,并且不被地块面积。
下面的代码在plotly中包含了关于左对齐标题的stackoverflow答案,但是当你有一个需要超过3-4行的长标题时,它没有帮助。
使用 \n 会使标题的文本转到第二行,但它仍然会被绘图区域截断并且不会左对齐。
library(plotly)
metric1 <- c(116,230,120,200,210,188,130,99,101,120)
metric2 <- c(79,109,120,95,130,98,118,130,140,88)
metric3 <- c(30,28,42,22,6,2,17,43,20,28)
class <- c(3,4,2,1,1,4,4,3,2,3)
df <- data.frame(metric1,metric2,metric3,class)
my_colors=c("red", "blue", "green", "#000000")[df$class]
p <- plot_ly(df,
x = ~metric1,
y = ~metric2,
z = ~metric3, text = class, type = "scatter3d",
mode = "markers", marker = list(color = my_colors)) %>%
add_annotations(
x=0, y=1.15,
text="Figure: The title of the figure will explain what information can be gleaned from the figure. Then the next sentence, which is still …Run Code Online (Sandbox Code Playgroud)