r - `as.na` 函数

Question

在 R 中，我能想到的几乎每个 is.* 函数都有一个相应的 as.*。有 is.na 但没有 as.na。为什么不呢？如果这样的功能有意义，您将如何实现它？

我有一个向量x，它可以是逻辑、字符、整数、数字 或 complex，我想将其转换为相同类别和长度的向量，但填充适当的:NA、NA_character_ 、NA_integer_、NA_real_ 或 NA_complex_。

我当前的版本:

as.na <- function(x) {x[] <- NA; x}

Answer 1

为什么不使用 is.na<-按照 ?is.na 中的指示？

> l <- list(integer(10), numeric(10), character(10), logical(10), complex(10))
> str(lapply(l, function(x) {is.na(x) <- seq_along(x); x}))
List of 5
 $ : int [1:10] NA NA NA NA NA NA NA NA NA NA
 $ : num [1:10] NA NA NA NA NA NA NA NA NA NA
 $ : chr [1:10] NA NA NA NA ...
 $ : logi [1:10] NA NA NA NA NA NA ...
 $ : cplx [1:10] NA NA NA ...