如何在R中创建函数以创建列的子集?

公主夫人

我在R中有一个数据框架,其中有将近40年(从1980年到2019年)的列,我需要一个函数来创建几个使用相同变量并重命名的子集,然后我必须在下面放置其他数据框架。

X1980 <- subset(all_data,select=c("Pais","RubroId","X1980"))
names(X1980)[names(X1980) == 'X1980'] <- 'Valor'
X1980$ANIO <- 1980

X1981 <- subset(all_data,select=c("Pais","RubroId","X1981"))
names(X1981)[names(X1981) == 'X1981'] <- 'Valor'
X1981$ANIO <- 1981

X1982 <- subset(all_data,select=c("Pais","RubroId","X1982"))
names(X1982)[names(X1982) == 'X1982'] <- 'Valor'
X1982$ANIO <- 1982

final_data <- rbind(X1980,X1981,X1982)
阿克伦

我们可以创建一个带有列的函数,以选择(cols_select)作为字符向量names_to_change(“ Valor”或任何其他列名),通过select对数据集(“ dat”)进行子集设置,设置列名并创建一个新列“阿尼奥

f1 <- function(dat, cols_select, names_to_change){
     yearcol <- grep("^X\\d{4}$", cols_select, value = TRUE)
     tmpdat <- subset(dat,select=cols_select)
     names(tmpdat)[names(tmpdat) == yearcol] <- names_to_change
     tmpdat$ANIO <- as.integer(sub("^X", "", yearcol))
     tmpdat
  }

并用在 lapply

nm1 <- paste0("X", 1980:1982)
out <- do.call(rbind, lapply(nm1, function(x)
         f1(dat, cols_select = c("Pais","RubroId", x), "Valor")))

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

如何在Powershell中编写函数以创建函数

来自分类Dev

如何在Powershell中编写函数以创建函数

来自分类Dev

如何在JavaScript中创建构造函数以创建构造函数?

来自分类Dev

R中的人如何在矩阵上使用“ if”语句应用“ for”函数以创建平滑函数

来自分类Dev

如何在R中创建一个函数以计算纵向研究参与者的每周调查?

来自分类Dev

如何在矩阵中创建行的子集

来自分类Dev

如何在C ++中创建max函数以搜索数字序列中的max

来自分类Dev

如何在视图中创建匿名函数以获取数据?

来自分类Dev

如何在fortran中创建随机函数以将相同的随机分布生成数组?

来自分类Dev

创建函数以重命名Pandas数据框中的列

来自分类Dev

在R中创建一个函数以比较行

来自分类Dev

在R中创建函数以查找债券的息票率

来自分类Dev

聚合函数以在R中创建频率矩阵

来自分类Dev

如何编写函数以在OCaml中创建列表的循环版本?

来自分类Dev

如何更正此函数以在Tkinter Python中创建标签?

来自分类Dev

如何在JDBC查询中传递参数以创建表?

来自分类Dev

如何在R中创建的导入函数中更改引用?

来自分类Dev

创建由R中的灵活值子集的函数

来自分类Dev

在R中创建季度子集

来自分类Dev

在R中创建季度子集

来自分类Dev

如何在数据框中遍历列的子集以创建新变量

来自分类Dev

如何在熊猫中为不同子集元素创建滚动均值列?

来自分类Dev

使用数据子集时如何在data.table中创建新列并计算中位数

来自分类Dev

如何在R中创建类似的python函数?

来自分类Dev

如何在R中编写循环以根据列名创建多个不同的数据子集?

来自分类Dev

如何在R脚本中从数据集1创建子集(数据集2)

来自分类Dev

我将如何在 Python 中创建另一个 int() 函数以便我理解它?

来自分类Dev

使用 R 中的嵌套行子集创建新列

来自分类Dev

如何创建递归函数以创建值列表

Related 相关文章

  1. 1

    如何在Powershell中编写函数以创建函数

  2. 2

    如何在Powershell中编写函数以创建函数

  3. 3

    如何在JavaScript中创建构造函数以创建构造函数?

  4. 4

    R中的人如何在矩阵上使用“ if”语句应用“ for”函数以创建平滑函数

  5. 5

    如何在R中创建一个函数以计算纵向研究参与者的每周调查?

  6. 6

    如何在矩阵中创建行的子集

  7. 7

    如何在C ++中创建max函数以搜索数字序列中的max

  8. 8

    如何在视图中创建匿名函数以获取数据?

  9. 9

    如何在fortran中创建随机函数以将相同的随机分布生成数组?

  10. 10

    创建函数以重命名Pandas数据框中的列

  11. 11

    在R中创建一个函数以比较行

  12. 12

    在R中创建函数以查找债券的息票率

  13. 13

    聚合函数以在R中创建频率矩阵

  14. 14

    如何编写函数以在OCaml中创建列表的循环版本?

  15. 15

    如何更正此函数以在Tkinter Python中创建标签?

  16. 16

    如何在JDBC查询中传递参数以创建表?

  17. 17

    如何在R中创建的导入函数中更改引用?

  18. 18

    创建由R中的灵活值子集的函数

  19. 19

    在R中创建季度子集

  20. 20

    在R中创建季度子集

  21. 21

    如何在数据框中遍历列的子集以创建新变量

  22. 22

    如何在熊猫中为不同子集元素创建滚动均值列?

  23. 23

    使用数据子集时如何在data.table中创建新列并计算中位数

  24. 24

    如何在R中创建类似的python函数?

  25. 25

    如何在R中编写循环以根据列名创建多个不同的数据子集?

  26. 26

    如何在R脚本中从数据集1创建子集(数据集2)

  27. 27

    我将如何在 Python 中创建另一个 int() 函数以便我理解它?

  28. 28

    使用 R 中的嵌套行子集创建新列

  29. 29

    如何创建递归函数以创建值列表

热门标签

归档