Hi All,
I am currently trying to use a published script for transforming some data.
In particular, I am trying to use a published script which transforms 3-level survey data (EQ-5D-3L) into 5-level survey data (EQ-5D-5L).
The script is published here, with instructional video too. "Table3v5.csv" and "Table5v5.csv" are both necessary.
Mapping EQ-5D-5L to 3L | NICE Decision Support Unit | The University of Sheffield.
My question
When I run the script, I get the following error message: "Error in rename(., Output = X_EUUKcopula) :
unused argument (Output = X_EUUKcopula)"
Does anyone know how to fix the notation below such that the error message is resolved?
All help would be really appreciated.
library(here)
library(tidyverse)
library(readxl)
#SETTING WORKING DIRECTORY
here::here("My Working Directory")
#FUNCTIONS THAT RETURN ERROR
df_3 = read.csv(here("Table3v5.csv")) %>% mutate(Domain = str_c(X_Y3_1, X_Y3_2, X_Y3_3, X_Y3_4, X_Y3_5),
X_age = as.numeric(as.factor(X_age5grp)), X_U5 = round(X_U3UK,10)) %>%
rename(Output = X_EUUKcopula) # For mapping from 3L to 5L
df_5 = read.csv(here("Table5v5.csv")) %>% mutate(Domain = str_c(X_Y5_1, X_Y5_2, X_Y5_3, X_Y5_4, X_Y5_5),
X_age = as.numeric(as.factor(X_age5grp)), X_U5 = round(X_U5UK,10)) %>%
rename(Output = X_EUUKcopula) # For mapping from 5L to 3L