在 R 中使用 X4R 包连接到 SSAS(本地)数据立方体?

Lis*_*ark 1 ssas r olap-cube

我想弄清楚如何使用 X4R 包将本地数据多维数据集加载到 R 中。我可以将多维数据集加载到 Excel 中,但无法将其与 R 一起使用。

我的多维数据集文件名为“\scrsvr\Users\\Documents\Projects\Raw data\data.cub”。

我尝试了以下代码:

library(X4R)
handle<-xmlaConnect(url="\\scrsvr\\Users\\<MyName>\\Documents\\Projects\\Raw data\\data.cub")
Run Code Online (Sandbox Code Playgroud)

这不会产生错误。但是,尝试使用 xmlaDiscover 会导致以下错误:

first argument is not an open XMLA handle
Run Code Online (Sandbox Code Playgroud)

谁能帮我连接到我的本地多维数据集?我对此完全陌生,所以也许有人有一个我可以遵循的工作示例(使用示例数据立方体文件)?

谢谢!

Lis*_*ark 5

好的,以防万一其他人将来需要这样做,我设法解决了我的问题

# use some necessary packages
require(RDCOMClient)
require(data.table)
library(plyr)
library(Hmisc)

#create connection to SSAS datacube
con <- COMCreate("ADODB.Connection")
con[["ConnectionString"]] <- paste(
  "Provider=MSOLAP.5",
  "Data Source=\\\\scrsvr\\Users\\<MyName>\\Documents\\Projects\\Raw data\\data.cub",
    "Persist Security Info=True",
  sep = ";")
con$Open()

# define the MDX query here:
query = "SELECT ..."

rs <- COMCreate("ADODB.RecordSet")

# submit the MDX query to the cube
rs$Open(query, con)

rs$MoveFirst()    # move to the first row of the record set
nc <- rs$Fields()$Count()     # define number of columns

# get the data into a data array:
dd <- vector("list", length=nc)
dd <- rs$GetRows()  # get the raw data from the results
Run Code Online (Sandbox Code Playgroud)

对于连接,我使用了在设置从 MS Excel 到数据立方体的数据连接时配置的提供程序(“MSOLAP.5”)。一切正常,我现在可以直接使用 MDX 查询数据库。