小编vit*_*tor的帖子

如何将数据帧中的所有小数乘以常数?

data <- data.frame(id = c("10001", "10002", "10003", "10004"), V1 = c(10,11,15,9.3), V2 = c(5,7,21,30.2), V3 = c(10.3, 11, 19, 12))
> data
    id   V1   V2   V3
1 10001 10.0  5.0 10.3
2 10002 11.0  7.0 11.0
3 10003 15.0 21.0 19.0
4 10004  9.3 30.2 12.0
Run Code Online (Sandbox Code Playgroud)

如何将所有小数乘以100并使数据如下所示:

> data
    id    V1   V2     V3
1 10001   10    5   1030
2 10002   11    7     11
3 10003   15   21     19
4 10004  930 3020     12
Run Code Online (Sandbox Code Playgroud)

r

2
推荐指数
1
解决办法
2043
查看次数

将名称应用于多个对象

我有一个带名字的向量(只有一个),我想将它应用于多个对象,但是函数名只接受一个参数(一个对象),所以我必须为我想要命名的所有对象重复这个过程.

names(object_1) <- namesvector
names(object_2) <- namesvector
names(object_3) <- namesvector
Run Code Online (Sandbox Code Playgroud)

是否有可能只在一步中做到这一点?

谢谢!

r

1
推荐指数
1
解决办法
151
查看次数

删除少于1000个观察值的数据框的列

我有一个数据框,我想删除少于1000个观察的所有列.下面的方法工作正常,但还有更优雅的解决方案吗?

vec <- numeric()

for(i in 1:ncol(dat))
{
    if(length(dat[,i][!is.na(dat[,i])]) >= 1000) 
        vec <- c(vec, i)
}

dat <- dat[,vec]
Run Code Online (Sandbox Code Playgroud)

r

1
推荐指数
1
解决办法
707
查看次数

如何合并列表中元素的数据框?

请考虑以下列表.

lst <- list()
lst[[1]] <- data.frame(category = c(1:10), freq = rnorm(10))
lst[[2]] <- data.frame(category = seq(4,26,2), freq = rnorm(12))
lst[[3]] <- data.frame(category = 2:8, freq = rnorm(7))
Run Code Online (Sandbox Code Playgroud)

如果它们具有不同的维度和级别,我如何合并此类别中的数据框,因为它们具有不同的维度和级别,从而生成如下所示的data.frame?

category  freq.1      freq.2     freq.3
    1   1.2496154         NA         NA
    2  -1.3537722         NA -1.3257535
    3  -0.3976305         NA  0.5761957
    4   0.7721428 -0.2360636 -1.0953490
    5   0.7653834         NA  0.9037617
    6   0.2192559 -0.2543082 -1.6640824
    7   0.3400192         NA -1.2961707
    8  -0.8457081 -0.7431021  0.9321560
    9  -1.2132615         NA         NA
   10   1.8387899  0.8342264         NA
   12          NA -0.5409164         NA
   14          NA  0.1638546 …
Run Code Online (Sandbox Code Playgroud)

r

0
推荐指数
1
解决办法
170
查看次数

标签 统计

r ×4