我想制作一个现有的矢量大小n并使用NA.我知道我可以像这样填充矢量的末尾:
v1 <- 1:10
v2 <- diff(v1)
length(v2) <- length(v1)
v2
# 1 1 1 1 1 1 1 1 1 NA
Run Code Online (Sandbox Code Playgroud)
但我想以一般方式填写NA初学者.我的意思是这个特殊的例子我可以
v2 <- c(NA, diff(v1))
# NA 1 1 1 1 1 1 1 1 1
Run Code Online (Sandbox Code Playgroud)
但我希望有一些基本的R函数或库提供类似的东西 v2 <- pad(v2, n=length(v1), value=NA)
有什么类似我可以使用自我或我需要定义自己的功能:
pad <- function(x, n) { # ugly function that doesn't keep the attributes of x
len.diff <- n - length(x)
c(rep(NA, len.diff), x)
}
pad(1:10, 12) # …Run Code Online (Sandbox Code Playgroud) r ×2