PowerBI自定义视觉效果中的R plot_ly行或数据框

Question

我正在关注：http://radacad.com/create-custom-visual-with-r-and-json-part3

这里提到使用下面的R代码，我们可以绘制图表：

Values<-data.frame(X,Y,Legend,Row,Column)

g=ggplot(Values, aes(x=X, y=Y,colour = Legend)) 

我正在使用类似的实现方式。

下面的代码呈现仅带有轴的空白图表：

Values <- data.frame(mpg_test, cyl_test)
p <- plot_ly(Values,
  x = ~mpg_test,
  y = ~cyl_test,
  name = "SF Zoo",
  type = "bar"
)

空图表 以下代码还呈现空白图表：

Values <- data.frame(mpg_test, cyl_test)
p <- plot_ly(Values,
  x = mpg_test,
  y = cyl_test,
  name = "SF Zoo",
  type = "bar"
)

下面的代码呈现正确的图表：

Values <- data.frame(mpg_test, cyl_test)
p <- plot_ly(Values,
  x = ~mpg_test[1:nrow(Values), ], 
  y = ~cyl_test[1:nrow(Values), ],
  name = "SF Zoo",
  type = "bar"
)

更正图表：

我的疑问是，根据本教程，我必须在mpg_test和cyl_test中获得列，然后为什么在这里得到类似dataframe的内容。 使用~会不会以不同的方式处理事情？

请帮助。另外，有什么方法可以在plot_ly内使用mpg_test而不使用cyl_test

---

script.r

nrow(Values)

capabilities.json

source('./r_files/flatten_HTML.r')

############### Library Declarations ###############
libraryRequireInstall("ggplot2");
libraryRequireInstall("plotly")
####################################################

################### Actual code ####################
Values <- data.frame(mpt_test, cyl_test)

p <- plot_ly(Values,
  x = ~mpt_test[1:nrow(Values), ],
  y = ~cyl_test[1:nrow(Values), ],
  name = "SF Zoo",
  type = "bar"
)

####################################################

############# Create and save widget ###############
#p = ggplotly(p);
internalSaveWidget(p, 'out.html');
####################################################