R多個函數變為lapply

Question

我有一個字符向量中的URL列表，我想暫停查詢之間的過程，因為如果不是x查詢被拒絕。

urls=c('url1','url2','url3')

這是我想做的

htmlpages=lapply(urls,function(x) readLines(x) Sys.sleep(0.3))

Answer 1

正如賈斯汀所說，格式化是關鍵。

htmlpages = lapply(
  urls,
  function(x) 
  {
    y <- readLines(x)
    Sys.sleep(0.3)
    y
  }
)