R/makeGETparameters.R

makeGETparameters <-
function (parameter, value) {
    if (!length(parameter) == length(value)) {
        stop("Parameter and Value have unequal length")
    }
    GET <- ""
    for (i in 1:length(parameter)) {
        GET <- paste(GET, "&", parameter[i], "=", curl_escape(value[i]), sep = "")
    }
    return(GET)
}
leeper/MTurkR documentation built on June 6, 2019, 7:38 a.m.