How to access the third element of a list `lst` in R?