还是不行哪

问题在第二页

[此贴子已经被作者于2007-4-20 17:57:53编辑过]

方法1：

> sampl.dat_importData("D:/sampl.xls",type="EXCEL")
> sampl.dat[1,]
C1 C2
1 01/01/1997 00:00:00.000 2
> sampl.dat[,1]=timeDate(as.character(sampl.dat[,1]),format="%Y/%m/%d")
> smpl.dat[1,]
C1 C2
1 1997/1/1 2
>

方法2：

导入后，可以在日期时间列点鼠标右键选择change data type.... or Properties都可以设置。

方法3：

一般设定时间对象的方法是用ts或timeSeries对象.比如说有dataframe类型的文件stock，这是没有日期格式的文件.

可以利用如下命令进行转换：

>stock.ts_timeSeries(stock)

>is.timeSeries(stock.ts)

不过这时候日期是从1960年1月1日算起的01/01/1960。

> slotNames(stock.ts)

[1] "data" "positions" "start.position"
[4] "end.position" "future.positions" "units"
[7] "title" "documentation" "attributes"
[10] "fiscal.year.start" "type"

其中，"positions"类可以改变日期格式。

[此贴子已经被作者于2007-4-21 8:39:06编辑过]

Modelling Financial Time Series with S-PLUS,Second Edition

也就是Finetrics自带的PDF帮助文件的第二章对构造时间序列的方法有详细的介绍，我就不多说了。自己看看：

2 Time Series Specification, Manipulation, and
Visualization in S-PLUS

关于日期的设置详见24-28，关于ts对象设置详见2.2.5小节。

数据输入是一个很重要的问题，方法很多，希望大家能够探讨，相互学习。

[此贴子已经被作者于2007-4-21 8:40:50编辑过]

那本书前八章我都看了的，不过就是解决不了我这个问题

真急死我了。。。

我现在大致懂2楼的意思了，他是让我在S中直接用“年-月-日”的格式，不过现在有这么个问题。

我的excel中格式是“年-月-日”，用imprtdata->files导入后，日期格式会消失

这个问题又是怎么回事呢？

前面可能理解有问题。

导入后，选中第一列，按鼠标右键，选择Properties...,弹出timeDate Column[1]对话框，如果不是timeDate格式按前面2楼方法设定一下。

在Data format选项下选择你需要的格式，比如YYYY-MM-DD

看来你的数据格式与ibm.txt相似

将ibm.txt放在c碟下. c:\ibm.txt

#S+FinMetrics Version 1.0.2

#Daily simple returns of IBM, VW, EW, SP

#Format: date, IBM, VW, EW & SP

# 19620703 0.00429 0.0113 0.0131 0.0113

# 19620705 -0.00427 0.0060 0.0069 0.0057

# 19620706 -0.01429 -0.0107 -0.0064 -0.0113

module(finmetrics)

axiaoLoad = function(file, fields.list = list(Date = "",ibm=0,vw=0,ew=0,sp=0))

{

if ((!is.element("Date", names(fields.list))))

stop("Fields of Date must be in the supplided fields.list!")

df = as.data.frame(scan(file = file, what = fields.list, multi.line=TRUE,

strip.white=TRUE),stringsAsFactors = F)

dates.tmp = timeDate(charvec = df[, "Date"], in.format = "%04Y%02m%02d" )

ans = timeSeries(data = df[, c("ibm","vw","ew","sp")], pos =dates.tmp)

ans

}

ibm.ts = axiaoLoad("C:/ibm.txt")

ibm.ts

输出结果如下

Positions ibm vw ew sp

07/03/1962 0.00429 0.0113 0.0131 0.0113

07/05/1962 -0.00427 0.0060 0.0069 0.0057

07/06/1962 -0.01429 -0.0107 -0.0064 -0.0113

按照peterf教我的，在excel中日期格式为“年-月-日”型，直接用ImportData-〉From files导入数据，日期那一列自动是timeDate结构，但是数据显示为“00：00：00”之类，选定这列，点右键，选properties，出现timeDate Column[1]对话框，设定Data format选项为MM/dd/yyyy，便可以解决我所说到的问题。

Yiyo900写的方法，非常清楚、霸道，感谢他如此出力帮助；我还是再自己仔细弄一下

谢谢所有回帖帮忙的好心人。。。

[此贴子已经被作者于2007-4-21 0:25:56编辑过]