fix

Carol-seven · Carol-seven · commit d56e5dea3c3d · 2023-04-17T02:06:50.000+08:00
diff --git a/R/data_WIOD.R b/R/data_WIOD.R
@@ -76,7 +76,7 @@ data_WIOD <- function(version = c("2013 release", "2016 release", "long run"),
     }
   } else if (version == "long run") {
     if (year %in% c(1965L:2000L)) {
-      data_name <- paste0("WIODlr_WIOT", year, ".rda")
+      data_name <- paste0("WIODlr_WIOT_", year, ".rda")
       url <- paste0(url, "WIOD%20long-run/", data_name)
       data_size <- 28e+5
     } else {

Original file line number	Diff line number	Diff line change
`@@ -76,7 +76,7 @@ data_WIOD <- function(version = c("2013 release", "2016 release", "long run"),`
`76`	`76`	`}`
`77`	`77`	`} else if (version == "long run") {`
`78`	`78`	`if (year %in% c(1965L:2000L)) {`
`79`		`- data_name <- paste0("WIODlr_WIOT", year, ".rda")`
	`79`	`+ data_name <- paste0("WIODlr_WIOT_", year, ".rda")`
`80`	`80`	`url <- paste0(url, "WIOD%20long-run/", data_name)`
`81`	`81`	`data_size <- 28e+5`
`82`	`82`	`} else {`