library(urltools)

# Read in the URLs
dat = read.csv("LandingPageURLs.csv", stringsAsFactors = F)

# Extract the scheme, domain, and path from the urls
dat$scheme = scheme(dat$LandingPage)
dat$domain = domain(dat$LandingPage)
dat$path = path(dat$LandingPage)

# Extract particular parameters from the URLs
x = param_get(dat$LandingPage, c("parameter1", "parameter2", "parameter3", "etc"))

#combine the original data set and the extracted parameters data set together into a new data frame
datNew = cbind(dat, x)

# Write the data frame to CSV
write.csv(datNew, "URL-Split.csv")