我正在运行来自博客帖子的以下示例,以绘制3D图表。 代码运行没有任何错误,但输出结果与预期不符。以下是代码:
library(plotly)
pp <- function (n,r=4) {
x <- seq(-r*pi, r*pi, len=n)
df <- expand.grid(x=x, y=x)
df$r <- sqrt(df$x^2 + df$y^2)
df$z <- cos(df$r^2)*exp(-df$r/6)
df
}
qplot(x, y, data=pp(100), geom="tile", fill=z)
ggplotly()
py
。我猜你只是想运行ggplotly()
。 - Axemanplotly
发展非常迅速,这篇博客文章已经写了几年了,可能有一种新的正确语法来完成这个任务...?? - Ben Bolker