R中向量等长的函数

oxcyiej7 于 2023-01-06 发布在其他

关注(0)|答案(2)|浏览(120)

我想做一个函数，它应该remake列表的向量不同的长度，以列表的向量具有相同的长度。我做了两个函数，但第二个工作不好。我的代码是：第一个功能（运行良好）

delka<-function(x){
  delky<<-NULL
  for(i in 1:length(x)){
    delky[i]<<-length(x[[i]])
  }
}

这里我全局创建了一个对象“delky”。第二个函数是

uprava<- function(x){
  stejne<<- NULL
  for(i in 1:length(x)){
    stejne[[i]]<<-vector(x[[i]], length(max(delky)))
  }
}

我想全局地创建一个包含相同长度向量的对象“stejne”，但是R回答了我一个问题
向量（xi，长度（max（delky）））中的错误：“mode”参数无效
你知道我做错了什么吗？

来源：https://stackoverflow.com/questions/31399954/function-for-same-length-of-vectors-in-r

2条答案

按热度按时间

gywdnpxw1#

假设@RomanLuštrik正确地描述了您要做的事情，您可以使用以下命令更直接地完成此操作：

lapply(my, `length<-`, max(lengths(my)))
## $a
##  [1] 0.8669645 0.9224072 0.2003480 0.9476093 0.1095652        NA
##  [7]        NA        NA        NA        NA        NA
## 
## $b
##  [1] 0.6679763 0.2742245 0.7726615 0.4247057 0.7274648 0.8218540
##  [7] 0.4874759 0.4764729 0.3958279 0.1653358 0.2331573
## 
## $c
##  [1] 0.71882342 0.92852497 0.75134020 0.53098586 0.17515857
##  [6] 0.04997067 0.70350036         NA         NA         NA
## [11]         NA
##

lengths函数是最近才引入的，因此请确保您运行的是最新版本的R。

赞(0）回复(0）举报 2023-01-06

t0ybt7op2#

假设您可以一次处理整个列表，并且如果您想用NA填充较短的向量，这里有一种方法。

my <- list(a = runif(5),
           b = runif(11),
           c = runif(7))

maxl <- max(sapply(my, length))

sapply(my, FUN = function(x, ml) {
  difference <- ml - length(x)
  c(x, rep(NA, difference))
}, ml = maxl, simplify = FALSE)

$a
 [1] 0.91906470 0.68651070 0.07317576 0.52985130 0.27916889         NA         NA         NA         NA         NA         NA

$b
 [1] 0.86384953 0.79707167 0.88226627 0.91590091 0.03181455 0.86493584 0.89597354 0.80890065 0.92418156 0.72947596 0.13847751

$c
 [1] 0.2576621 0.6512487 0.5806530 0.8782730 0.0262019 0.1000885 0.5245472        NA        NA        NA        NA

在另一种表示中

sapply(my, FUN = function(x, ml) {
  difference <- ml - length(x)
  c(x, rep(NA, difference))
}, ml = maxl)

               a          b         c
 [1,] 0.91906470 0.86384953 0.2576621
 [2,] 0.68651070 0.79707167 0.6512487
 [3,] 0.07317576 0.88226627 0.5806530
 [4,] 0.52985130 0.91590091 0.8782730
 [5,] 0.27916889 0.03181455 0.0262019
 [6,]         NA 0.86493584 0.1000885
 [7,]         NA 0.89597354 0.5245472
 [8,]         NA 0.80890065        NA
 [9,]         NA 0.92418156        NA
[10,]         NA 0.72947596        NA
[11,]         NA 0.13847751        NA

赞(0）回复(0）举报 2023-01-06

我来回答

R中向量等长的函数

2条答案

相关问题

热门标签

最新问答