Выход из функции в R - PullRequest
       13

Выход из функции в R

0 голосов
/ 23 июня 2019

Я пишу веб-проект по извлечению имени пользователя из учетной записи Gmail в R. Я написал код, где e это список имени пользователя. Функция f содержит код для очистки и цикл for передает индекс в функцию f, используя индекс, мы отправим имя пользователя в удаленный браузер, а затем нажмите «Далее». Если мое имя пользователя имеет право контролировать, перейдем на следующую страницу. Если не так, я получу строку с сообщением Ошибка в имени пользователя . Если моя функция находит элемент для ошибки в имени пользователя, то я хочу выйти из функции и перейти к циклу for. Как я могу сделать это в R? Есть ли другой способ получить ожидаемый результат?

* 1005 код-*

e = list of Gmail username

f <- function(i){
 #Username
u <- remDr$findElement("css","value")
u$sendKeysToElement(list(e[i]))

 #click next
n <- remDr$fundElement("css","value")
n$sendKeysToElement(list("Enter"))

##if user name is wrong exit function & go to for loop
check <- tryCatch(remDr$findElemnt("css","value"), 
       error = function(e) print("error"))

if(typeof(check) =="S4"){
 ##what to do to exit function & go to for loop

 }else{
 print("continue")
}

for(i in sew(1,4))
 {
    f(i)
  }
...