R 用plotly绘制圆形线段

我想使用plotly绘制一个具有给定中心点和半径的圆线段

我在plotly文档中找不到任何方法，并尝试了以下代码，这些代码可以工作，但我不想看到中间点

我目前的尝试：

library(plotly)

from <- 0
to <-  180
by <- (to-from)/10

t <- seq(from*pi/180, to*pi/180 , by*pi/180)

x0 <- 1
y0 <- 1
r <- 5
y <- y0 + r*sin(t)
x <- x0 + r*cos(t)

plotly::plot_ly() %>% 
  add_trace(x=~x, y = ~y, line = list(shape = "spline"))

我想看到的是：

有什么提示吗？之后是否可以拆下中间点？或者直接用plotly画一个完美的圆？ 提前谢谢你

您可以使用圆形布局：

仅绘制一个半圆的另一个选项是使用具有更多线段的线型： 通过可以使用圆形布局：

仅绘制一个半圆的另一个选项是使用具有更多线段的线型：

---

谢谢，但我不需要形状，我需要圆周来进行可视化。上次编辑是否更接近您的需要？差异是由于我这边的一个错误：我没有看到y从1开始。更正。对于半圆，如果您不切割轴，形状可能不是正确的解决方案对于半圆，请参见第二个选项和线条形状，以了解您的努力，但这是否适用于任意角度？看起来很复杂，我真的很惊讶没有内置功能。谢谢，但我不需要形状，我需要周长来进行可视化。上次编辑是否更接近您的需要？差异是由于我这边的一个错误：我没有看到y从1开始。更正。对于半圆，如果您不切割轴，形状可能不是正确的解决方案对于半圆，请参见第二个选项和线条形状，以了解您的努力，但这是否适用于任意角度？看起来很复杂，我真的很惊讶没有内置函数。

library(plotly)
plot_ly() %>% layout(shapes = list(
                list(type = 'circle',
                     xref = 'x', x0 = -4, x1 = 6,
                     yref = 'y', y0 =  -4, y1 = 6,
                     line = list(color = 'blue'))),
                     yaxis = list(range=c(1,6.5)))

line <- list(
  type = "line",
  line = list(color = "blue"),
  xref = "x",
  yref = "y"
)

lines <- list()

for (i in 2:length(t)) {
  line[["x0"]] <- x[i-1]
  line[["x1"]] <- x[i]
  line[["y0"]] <- y[i-1]
  line[["y1"]] <- y[i]
  lines <- c(lines, list(line))
}

library(plotly)
plot_ly() %>% layout(shapes = lines,
                     yaxis = list(range=c(0,6.5)))