Улучшение существующего l oop и задержки в R

Question

Я ищу другой способ улучшить свой l oop. Мне была предоставлена ​​функция patient_ID_extract(), которая принимает номер пациента, и она извлекает записи из ключа API. Ключ API будет сбрасывать ограничение на 300 каждые 5 минут.

Мой первый рабочий подход - написать al oop и установить временную задержку. Это будет брать пациента номер один за другим из набора строк идентификаторов.

for ( i in patient_number){ 
  patients[[i]] <- patient_ID_extract(i, api_key)
  Sys.sleep(1.5)
}

Мне интересно, есть ли способ извлечь 300 записей за раз, отложить 5 минут и снова запустить извлечение 300 записей.

patient_number <- c("10523563", "08989388", "12338490", "11362265", "08732885", "06464116", 
        "02841570", "09966472", "11260599", "06797991", "11047641", "09538121", 
        "01298039", "00875727", "SC464438", "11361061", "SC294938", "02450551", 
        "09447238", "12229772", "10562525", "11834746", "08226516", "11480020", 
        "SC255490", "11794931", "01298989", "09782645")