小编Gab*_*nto的帖子

我正在写一个新的Shiny应用程序,我想使用plot3d()绘制一个旋转的3D散点图,如下所示:

# Spinning 3d Scatterplot
library(rgl)
plot3d(wt, disp, mpg, col="red", size=3)

我正在尝试使用与此处所做的类似的东西: shinyRGL示例,带有选项renderWebGL({})和webGLOutput().但我一直收到这个错误:

匹配错误(x,table,nomatch = 0L):'match'需要向量参数

我无法弄明白为什么.

这是我现在使用的数据集的示例:

n=100
taxi <- data.frame(conversion=c(rep(1,20),rep(0,80)),
         day = sample(1:7, n, TRUE),
         hour = sample(0:23,n, TRUE),
         source= sample(1:4, n, TRUE),
         service= sample(1:5, n, TRUE),
         relevancy= sample(1:4, n, TRUE),
         tollfree= sample(c(0,1), n, TRUE),
         distance= sample(0:15, n, TRUE),
         similarity= sample(seq(0,1,0.01), n, TRUE),
         simi.names= sample(c('[0,0.25)','[0.25,0.5)','[0.5,0.75)','[0.75,1]'), n, TRUE),
         dist.names= sample(c('[0,1)','[1,2)','[2,3)','[3,4)','[4,15]'), n, TRUE),
         week= sample(1:7, n, TRUE),
         rel= sample(c(1,4), n, TRUE))

我为ui.R做了这个:

shinyUI(navbarPage("",
               tabPanel("Data",
                        sidebarLayout( …