如何在R的列表中找到最长的向量/列表？

Question

给出以下列表：

myList<-list(a=c(1,2,3,4), b=c(5,6,7), c=c(8), d=c(9,1,2,3,4,5))

我该怎么做才能找出列表中最长的元素？我一直在尝试循环和if语句，但由于长度大于1而不断出现错误，因此仅使用了第一个元素。我目前没有任何可解决此问题的代码，但是我尝试过的是：

for(i in 1:length(n)){
   if(length(n[[i]])>=max){
      max<-length(n[[i]])
      longest<-names(n[[i]])
   }
}

任何帮助将不胜感激。