R语言循环处理数据框

目标汇总23个数据，格式如下：

先宽表变长表

library(openxlsx)
library(reshape)
setwd("C:\\Users\\admin\\Desktop\\合表")
addCC<-read.xlsx("addCC.xlsx")
CTC<-read.xlsx("CTC.xlsx")edservs<-read.xlsx("edservs.xlsx")
edsubs<-read.xlsx("edsubs.xlsx")
fedEITC<-read.xlsx("fedEITC.xlsx")
fedSSI<-read.xlsx("fedSSI.xlsx")HCD<-read.xlsx("HCD.xlsx")
headstartpriv<-read.xlsx("headstartpriv.xlsx")
highered<-read.xlsx("highered.xlsx")
lib<-read.xlsx("lib.xlsx")
Medicaid_CHIP<-read.xlsx("Medicaid_CHIP.xlsx")
other_health<-read.xlsx("other_health.xlsx")
othercashserv<-read.xlsx("othercashserv.xlsx")
parkrec<-read.xlsx("parkrec.xlsx")
pk12ed<-read.xlsx("pk12ed.xlsx")
pubhealth<-read.xlsx("pubhealth.xlsx")
SNAP<-read.xlsx("SNAP.xlsx")
socsec<-read.xlsx("socsec.xlsx")
stateEITC<-read.xlsx("stateEITC.xlsx")
TANFbasic<-read.xlsx("TANFbasic.xlsx")
unemp<-read.xlsx("unemp.xlsx")
wcomp<-read.xlsx("wcomp.xlsx")
pell<-read.xlsx("pell.xlsx")dim(lib)vector=list(addCC,CTC,edservs,edsubs,fedEITC,fedSSI,HCD,headstartpriv,highered,lib,Medicaid_CHIP,other_health,othercashserv,parkrec,pk12ed,pubhealth,SNAP,socsec,stateEITC,TANFbasic,unemp,pell)#wcomp
vector_name=list('addCC','CTC','edservs','edsubs','fedEITC','fedSSI','HCD','headstartpriv','highered','lib','Medicaid_CHIP','other_health','othercashserv','parkrec','pk12ed','pubhealth','SNAP','socsec','stateEITC','TANFbasic','unemp','pell')#'wcomp'wcomp_melt<-melt(wcomp,id.vars="state",variable.name="Year")#,value.name="wcomp data"
names(wcomp_melt)=c("state", "variable" ,"wcomp value")dim(wcomp_melt)for (var in 1:length(vector)) {#var是索引df_melt<-melt(vector[var],id.vars="state",variable.name="Year")#,value.name="wcomp data"names(df_melt)=c("state", "variable" ,paste(vector_name[var],"value"))wcomp_melt=merge(wcomp_melt,df_melt)print(vector_name[var])#variable1<-melt(variable,id.vars="state",variable.name="Year")#,value.name="wcomp data")#wcomp_melt<-merge(wcomp_melt,variable1,all=T)
}

如果您对我的文章感兴趣，欢迎关注点赞收藏，如果您有疑惑或发现文中有不对的地方，还请不吝赐教，非常感谢！！

R语言循环处理数据框相关推荐

R语言学习笔记--数据框输出和查看
(1)将数据框C输出为.csv文件 write.table(C,file="ABC.csv",sep = ",",row.names=FALSE) #A ...
R语言数据结构之数据框
数据框是特殊的二维列表.数据框每一列都有一个唯一的列名,长度都是相等的,同一列的数据类型需要一致,不同列的数据类型可以不一样. data.frame(..., row.names = NULL, ch ...
R语言循环读取数据文件循环读取csv tsv xlsx数据
读取数据,XLSX 或者 TSV 或者 CSV [1]先读取一个试下,确认能正确读取进去下面三种格式提供参考 data <- read_excel("C:/XXX/1.xlsx&qu ...
R语言循环语句while和repeat
R语言循环语句 1.for语句 2.while循环语句 3.repeat语句 4.举例 5.引用看完如果对你有帮助,感谢点赞支持! 如果你是电脑端,看到右下角的 "一键三连" 了 ...
R语言处理表格数据（一）
目录写在前面 1. Excel有上百列数据,把每列数据首尾相接合并成一个向量(一列) 2. 合并多个数据表(.csv) 3. 实现2个Excel表相同数据的关联,并提取相同数据到新表 4. 获取Ex ...
python与r语言处理excel数据_R语言 | 读写txt、csv、excel文件
前段时间看到plotnine库(封装的R语言ggplot2)作的图太美了,有点想重新拾起R语言^_^ R语言代码略带凌乱,讲真的还是更喜欢Python代码简洁.不过好几年不琢磨R语言,对R语言代码的凌 ...
R语言处理缺失数据的5个常用包
R语言处理缺失数据的5个常用包 1.常用缺失数据处理包 2. MICE 包 2.1基本介绍 2.2 实例展示 3.Amelia包 3.1基本介绍 3.2实例展示 4.missForest包 4.1基本 ...
r语言读服务器数据,R语言数据实战 | 安装R语言
原标题:R语言数据实战 | 安装R语言 1.R的获取和安装获取和安装R很容易(这也是它"亲民"的地方),具体步骤如下: Step 1: 登陆R语言官方网站https://www. ...
在R中子集化数据框的5种方法
由于微信不允许外部链接,你需要点击文章尾部左下角的 "阅读原文",才能访问文中链接. 通常,我们在使用大型数据集时,只会对其中的一小部分感兴趣,用以进行特定分析. 那么,我们应该如 ...

R语言循环处理数据框

R语言循环处理数据框相关推荐

最新文章

热门文章