你如何检查列表是否存在？

Question

我正在阅读一个html表。因此，有时我会得到一个列表，有时我会得到两个列表。

url<-c("example.com/table")
q <- html(url1) %>% html_table(fill=T)
if(exists('q[[2]]')){

我需要检查一下，如果q [[2]]存在，那么现在只需处理q [[1]]

我尝试过存在并且

if(!is.na(q[[2]]))

我在这两个方面都遇到了这个错误：

Error in q[[2]] : subscript out of bounds

如何检查列表是否存在？