相关疑难解决方法(0)

我有一个对象列表.如何从列表中获取一个对象的名称？如:

LIST <- list(A=1:5, B=1:10)
LIST$A
some.way.cool.function(LIST$A)  #function I hope exists
"A"   #yay! it has returned what I want

名称(LIST)不正确,因为它返回"A"和"B".

仅针对上下文,我正在绘制一系列存储在列表中的数据帧.当我来到每个data.frame时,我想要包含data.frame的名称作为标题.所以名称(LIST)[1]的答案也不正确.

编辑:我添加了代码以获得更多问题的上下文

x <- c("yes", "no", "maybe", "no", "no", "yes")
y <- c("red", "blue", "green", "green", "orange")
list.xy <- list(x=x, y=y)

WORD.C <- function(WORDS){
require(wordcloud)

L2 <- lapply(WORDS, function(x) as.data.frame(table(x), stringsAsFactors = FALSE))

    FUN <- function(X){
        windows() 
        wordcloud(X[, 1], X[, 2], min.freq=1)
        mtext(as.character(names(X)), 3, padj=-4.5, col="red")  #what I'm trying that isn't working
    }
    lapply(L2, FUN)
}

WORD.C(list.xy)

如果这有效,名称x和y将在两个图的顶部显示为红色