# NOT RUN {
mdx <- "SELECT
NON EMPTY
{[month].[Jan],[month].[Feb],[month].[Mar]}
ON COLUMNS,
NON EMPTY
{[account1].[Price],[account1].[Units]}
ON ROWS
FROM [SalesCube]
WHERE
(
[actvsbud].[actvsbud].[Actual],
[region].[region].[Argentina],
[model].[model].[S Series 1.8 L Sedan]
)"
tm1_get_mdx_view(
tm1_connection("localhost", "8881", "admin", "apple"),
mdx, RowElementAsColumn=FALSE)
con_obj <- tm1_connection("localhost", "8881", "admin", "apple")
tm1_get_mdx_view(con_obj,mdx)
# }
Run the code above in your browser using DataLab