r中的简单循环

Question

我有三个数据...

[C1]
CODE VALUE
c1    0.1757
c2    0.1757
c3    0.1757

[C2]
CODE VALUE
c1    0.1757
c2    0.1757
c3    0.1757

[C3]
CODE VALUE
c1    0.1757
c2    0.1757
c3    0.1757

我想使用循环函数在 digits=2 处对 VALUE 进行舍入，因为我想了解循环函数。

for(i in 1:3) {    
  a <-(paste0("c",i,"$VALUE"))
  a<-round(a,digits=2)  
}

以上代码无法处理我所做的...

如何调整我的代码...？

Answer 1

最简单的选择是将数据集放在 list 中，将其存储在 list 中，然后在 list

中进行处理

lst <- lapply(mget(paste0("C", 1:3)), transform, VALUE = round(VALUE, 2))

如果我们真的想使用for循环修改全局环境中的对象

nm1 <- paste0("C", 1:3)
for(nm in nm1) {
  tmp <- get(nm)
   assign(nm, `[[<-`(tmp, 'VALUE', value = round(tmp[['VALUE']], 2)))
  }
C1
#  CODE VALUE
#1   c1  0.18
#2   c2  0.18
#3   c3  0.18

r中的简单循环

Simple loop in r

loops

for-loop

r

rounding

paste