R中的动态日期插入到url中

时间:2016-08-12 08:58:56

标签: r

我正在使用Power BI,并且正在使用R脚本在URL中插入动态日期。

相关网址如下

Tests <- read.csv(file=paste0("https://www,testtest/getCsv?startdate_Day=1&startdate_Month=01&startdate_Year=2016"), header=TRUE, sep=";") 

我的问题是日月和年值必须始终是当前日期

我尝试了或者示例

Year<-Sys.Date() format(Year, format="%Y")

Month<-Sys.Date() format(Month, format="%m")

Day<-Sys.Date() format(Day, format="%d")

<- read.csv(file=paste0("read.csv(file=paste0("https://www,testtest/getCsv??startdate_Day=", Day,"&startdate_Month=", Month,"&startdate_Year=", Year"), header=TRUE, sep=",")

但后来我收到以下错误:

  

startdate_Day = 2016年8月12日&安培; startdate_Month = 2016年8月12日&安培; startdate_Year = 2016年8月12日

我的问题是我如何使用当前日,月和年自动填充Startdate_Day,Startdate_Month和Startdate_Year?

1 个答案:

答案 0 :(得分:0)

如果这是您正在运行的确切代码,那么您遇到了一些问题:

  1. 如上所述,您的网址(www.test)中有逗号,您的意思是?
  2. 您对Sys.Date()format的来电未写得不正确。
  3. 试试这个:

    # Get the date parts we need
    Year <-format(Sys.Date(), format="%Y")
    Month <- format(Sys.Date(), format="%m")
    Day <- format(Sys.Date(), format="%d")
    
    # Create the file string
    file_string <- paste0("https://www.testtest/getCsv??startdate_Day=", Day,"&startdate_Month=", Month,"&startdate_Year=", Year)
    
    # Run read.csv
    EnergyStockVolumeData  <- read.csv(file_string, header = TRUE, sep = ";")