求助,文件数据读取,急!!!-经管之家官网!

人大经济论坛-经管之家 收藏本站
您当前的位置> 数据>>

数据资源

>>

求助,文件数据读取,急!!!

求助,文件数据读取,急!!!

发布:Aimee_Song | 分类:数据资源

关于本站

人大经济论坛-经管之家:分享大学、考研、论文、会计、留学、数据、经济学、金融学、管理学、统计学、博弈论、统计年鉴、行业分析包括等相关资源。
经管之家是国内活跃的在线教育咨询平台!

获取电子版《CDA一级教材》

完整电子版已上线CDA网校,累计已有10万+在读~ 教材严格按考试大纲编写,适合CDA考生备考,也适合业务及数据分析岗位的从业者提升自我。

完整电子版已上线CDA网校,累计已有10万+在读~ 教材严格按考试大纲编写,适合CDA考生备考,也适合业务及数据分析岗位的从业者提升自我。

写一个R函数,要求如下1.Datafile(objective:tosimplifythedataimport/export)writeafunctiontoreaddatafileswiththefollowinginputsa.thenumberofdatafiles(i.e.3)b.datafilename&location(i.e."c:\datadir\dat ...
坛友互助群


扫码加入各岗位、行业、专业交流群


写一个R函数,要求如下

1. Data file (objective : to simplify the data import/export )

write a function to read data files with the following inputs

a. the number of data files (i.e. 3)

b. data file name & location (i.e. "c:\datadir\datafilename1"

"...datafilename2" " .... "3)

c. it shall be able to store date and time data types

d. it shall replace with a "0" if there is no data

e. it shall be able to export selected column / row to a csv file

下面是我写的程序,还不能很好的完成上面的功能,请高手指点

task1=function(n,f){
#输入f的格式f=c("C:\\Users\\Aimee\\Desktop\\R_job\\tt_mb_20071003\\tt1.txt","C:\\Users\\Aimee\\Desktop\\R_job\\tt_mb_20071003\\tt1.txt")
if(length(f)!=n) stop("Pls check the value of n or input the f again")
else{
task11=function(b){
t1=read.fwf(b,widths=c(5,9,8,11,1,2,2,2,4,2,2,2))
t1[is.na(t1)]=0
time=ISOdatetime(t1[,9],t1[,10],t1[,11],t1[,6],t1[,7],t1[,8])
data.frame(t1[,1],t1[,2],t1[,3],t1[,4],t1[,5],time,t1[,12])
}
#上面的task11执行的还可以,可是下面是不是不能这样存贮? 应该怎么处理最好呢?

#e的功能也还没完成,应该用sink函数吧?

for(i in 1:n){
x=task11(f[1])
ff=as.list(rep(x,n))
ff[]=task11(f)

}
}
}


恳请高手指点方向,谢谢!!!


下面是读取的数据的格式,tt1和tt2都是类似这样的数据

000012155010 126.500 1000A15475220071003 0
000012155010 126.500 1000A15475220071003 0
000012155010 126.500 2000A15472220071003 0
000012155010 126.500 2000A15475220071003 0
000012155010 126.600 1000A15481320071003 0
000012155010 126.600 4000A15475220071003 0
000012155010 126.600 5000A15593420071003 0

扫码或添加微信号:坛友素质互助


「经管之家」APP:经管人学习、答疑、交友,就上经管之家!
免流量费下载资料----在经管之家app可以下载论坛上的所有资源,并且不额外收取下载高峰期的论坛币。
涵盖所有经管领域的优秀内容----覆盖经济、管理、金融投资、计量统计、数据分析、国贸、财会等专业的学习宝库,各类资料应有尽有。
来自五湖四海的经管达人----已经有上千万的经管人来到这里,你可以找到任何学科方向、有共同话题的朋友。
经管之家(原人大经济论坛),跨越高校的围墙,带你走进经管知识的新世界。
扫描下方二维码下载并注册APP
本文关键词:

本文论坛网址:https://bbs.pinggu.org/thread-472207-1-1.html

人气文章

1.凡人大经济论坛-经管之家转载的文章,均出自其它媒体或其他官网介绍,目的在于传递更多的信息,并不代表本站赞同其观点和其真实性负责;
2.转载的文章仅代表原创作者观点,与本站无关。其原创性以及文中陈述文字和内容未经本站证实,本站对该文以及其中全部或者部分内容、文字的真实性、完整性、及时性,不作出任何保证或承若;
3.如本站转载稿涉及版权等问题,请作者及时联系本站,我们会及时处理。
联系客服
值班时间:工作日(9:00--18:00)