dir.create in R is not working for Power BI service.

Thanks v-piga-msft  for your reply.

My code works in a following : - first it will create a directory if it does not exists. then if it exisits then Message will be printed as  "Folder exists" else Message will be printed as "Folder does not exists". Ideally it should never go into else part because i am creating my direcory in the first line.

It does work fine in Power BI desktop as you can see the result in the above image itself.

When i publish to Power BI services, it does not creates the directory and falls in to the else part. Please find below image :

Please find the below full R code and can you please replicate the same. Just copy-paste it into R visual script and pass 1 dummy column. It will be very helpful for me.

# Sheet name
ExportSheet    =  "Sheet 1"
# Appends data to existing file or overwrites existing fle
AppendToPreviousFile  = FALSE
# Includes header. Better to set to false if AppendToPreviousFile is TRUE
WithHeader    = TRUE  

### Export functions ##################################################################################

Message <- function(Text,Comment) { 
    
    par(mar=c(1,1,1,1)) 
    NoPlot = c(0) 
    barplot(NoPlot)
    plot(1:1, 1:1, main = "", sub = "", fg="white")
    text(1, 1.2, Text, cex = 2, fg="white")
    text(1, 0.8, Comment, cex = 1.5, fg="white")
    return()
}
ExportFile   = "C:/RData/AssetData.xlsx"
dir.create("C:/RData/")  #This creates a folder if not exists
ExportFolder = dirname(ExportFile)
if (dir.exists(ExportFolder)){     #If folder exists then execute below code
    Message("Folder  exist",ExportFolder)
} else {                           #else
    Message("Folder does not exist",ExportFolder)
}