if (FALSE) {
# Register your Qualtrics credentials if you haven't already
qualtrics_api_credentials(
api_key = "",
base_url = ""
)
# Retrieve a list of surveys
surveys <- all_surveys()
# Get metadata for a survey
md <- metadata(surveyID = surveys$id[6])
# Get metadata with specific elements
md_specific <- metadata(
surveyID = id,
get = c("flow")
)
# Get specific question metadata
question_specific <- metadata(
surveyID = id,
get = c("questions"),
questions = c("Q1", "Q2")
)
# Example of a metadata file
file <- system.file("extdata", "metadata.rds", package = "qualtRics")
# Load
metadata_ex <- readRDS(file = file)
}
Run the code above in your browser using DataLab