9

在（大部分）回答这个问题的过程中，我偶然发现了一些我觉得我以前真的应该已经看过的东西。假设您有一个列表：

l <- list(a = 1:3, b = letters[1:3], c = runif(3))

尝试强制l转换为各种类型会返回错误：

> as.numeric(l)
Error: (list) object cannot be coerced to type 'double'
> as.logical(l)
Error: (list) object cannot be coerced to type 'logical'

然而，我显然被允许强制列出一个字符，我只是没想到会出现这样的结果：

> as.character(l)
[1] "1:3"                                                        
[2] "c(\"a\", \"b\", \"c\")"                                     
[3] "c(0.874045701464638, 0.0843329173512757, 0.809434881201014)"

相反，如果我被允许强制列出角色，我会认为我会看到更像这样的行为：

> as.character(unlist(l))
[1] "1"                  "2"                  "3"                  "a"                  "b"                 
[6] "c"                  "0.874045701464638"  "0.0843329173512757" "0.809434881201014"

请注意，我指定列表元素的方式最初会影响以下输出as.character：

l <- list(a = c(1,2,3), b = letters[1:3], c = runif(3))
> as.character(l)
[1] "c(1, 2, 3)"                                                 
[2] "c(\"a\", \"b\", \"c\")"                                     
[3] "c(0.344991483259946, 0.0492411875165999, 0.625746068544686)"

我有两个问题：

  1. 如何as.character从我最初创建的列表中挖掘信息l以便吐出1:3与c(1,2,3).
  2. 究竟在什么情况下我想这样做？我什么时候想调用as.character()列表并获取此表单的输出？
4

2 回答 2

7

对于非平凡列表，as.character用于deparse生成字符串。

  1. 只有当向量是整数和 1,2,3,...,n - 然后它解析为1:n.

    c(1,2,3)是双倍1:3的，而是整数...

  2. 不知道 ：-）

...但是看看deparse你是否想在as.character这里理解：

deparse(c(1L, 2L, 3L)) # 1:3
deparse(c(3L, 2L, 1L)) # c(3L, 2L, 1L)
deparse(c(1, 2, 3))    # c(1, 2, 3)
于 2011-09-29T02:04:56.710 回答
6

帮助文件确实说

对于列表，它单独解析元素，除了它提取长度为一个字符向量的第一个元素。

我之前在尝试回答 [非在线] 关于grep. 考虑：

> x <- list(letters[1:10],letters[10:19])
> grep("c",x)
[1] 1 2

grep使用as.characteron x，结果是，由于两者都c(在其中，因此两个组件都匹配。这需要一段时间才能弄清楚。

关于“它为什么这样做？ ”，我猜 R core 的一位成员希望它这样做。

于 2011-09-29T02:07:44.967 回答