Добавить к тексту в URL на основе вектора символьных строк в r - PullRequest
Новая
       7

Добавить к тексту в URL на основе вектора символьных строк в r

0 голосов
/ 06 февраля 2019

Предположим, у вас есть вектор строк символов, например, ряд мест, как показано ниже ... 

cities<-c("San Diego County","Fresno County", "Los Angeles County", 
             "Lake County")

... и, кроме того, у вас есть некоторый URL-адрес, такой как www.fakewebsite.com/search_loc=.Каков будет соответствующий синтаксис для вставки каждого значения из вектора «городов» в конец URL-адреса (после search_loc=), чтобы все пробелы между строками разделялись следующим $50, а каждый URL-адрес заканчивался наследующий %100.В идеале я хотел бы, чтобы результат выглядел следующим образом: 

cities               url
San Diego County     www.fakewebsite.com/search_loc=San$50Diego$50County%100
Fresno County        www.fakewebsite.com/search_loc=Fresno$50County%100
Los Angeles County   www.fakewebsite.com/search_loc=Los$50Angeles$50County%100
Lake County          www.fakewebsite.com/search_loc=Lake$50County%100

Примечание. Вектор cities содержит максимум три отдельные строки (т.е. два пробела) и минимум две отдельные строки (т.е. один пробел).

1 Ответ

0 голосов
/ 06 февраля 2019

Используя paste0 и gsub, мы можем заменить пустые пробелы на "$ 50" и завершить его "% 100" 

paste0(base_url, gsub("\\s+", "$50", cities), "%100")

#[1] "www.fakewebsite.com/search_loc=San$50Diego$50County%100"  
#[2] "www.fakewebsite.com/search_loc=Fresno$50County%100"       
#[3] "www.fakewebsite.com/search_loc=Los$50Angeles$50County%100"
#[4] "www.fakewebsite.com/search_loc=Lake$50County%100"

data 

cities<-c("San Diego County","Fresno County", "Los Angeles County", 
      "Lake County")
base_url <- "www.fakewebsite.com/search_loc="
...