如何引用R ..中列表中的元素？

Question

如何訪問以雙點開頭的列表元素.. ..？

我試圖隔離HTML的$ attr部分，以幫助在另一個問題變成一個變量，然後將它放在另一個MIME變量。 x $ parts $ attr給了我NULL。

感謝您的幫助。

例

library(gmailr) 
test_email <- mime() 
x <- html_body(mime = test_email, body = "I wish I had a nice body") 

str(x) 
List of 5 
$ parts :List of 2 
    ..$ : NULL 
    ..$ :List of 4 
    .. ..$ parts : list() 
    .. ..$ header:List of 2 
    .. .. ..$ MIME-Version: chr "1.0" 
    .. .. ..$ Date  : chr "Sun, 24 May 2015 09:44:59 GMT" 
    .. ..$ body : chr "I wish I had a nice body" 
    .. ..$ attr :List of 3       # << HOW do I get this? 
    .. .. ..$ content_type: chr "text/html" 
    .. .. ..$ charset  : chr "utf-8" 
    .. .. ..$ encoding : chr "base64" 
    .. ..- attr(*, "class")= chr "mime" 

Answer 1

試試這個：

str(x$parts[[2]]$attr) 

List of 3 
$ content_type: chr "text/html" 
$ charset  : chr "utf-8" 
$ encoding : chr "base64"