[問題] 如何在取data其中一部份算mean

作者: shingetsu (shingetsu)   2016-03-11 23:17:49
[問題類型]:
[軟體熟悉度]:
新手(沒寫過程式,R 是我的第一次)
[問題敘述]:
我想把data的資料分段算出平均數,例如 gsprice 第1筆到第50筆算出1個平均數,
第51筆到第100筆再取一個平均數
[程式範例]:
rm(list=ls()) #清除所有內容
library(TSA);library(tseries);library(FinTS);library(fGarch);library(dynlm)
datain <- read.table("C:\\R\\mydata.txt",header=TRUE)#讀入文字檔資料
attach(datain)
lsprice <- log(sprice)
lfprice <- log(fprice)
gsprice <- diff(lsprice)*100
gfprice <- diff(lfprice)*100
obsno <<- length(date)
datam <<-
matrix(cbind(date[-1],lsprice[-1],lfprice[-1],NFPI[-1],gsprice,gfprice),obsno-1,6)
colnames(datam) <- c("date","lsprice","lfprice","NFPI","gsprice","gfprice")
obs <<- length(datam[,1]) # obs is the sample size
y <<- matrix(0,obs,1)
y[,1]<- datam[,5]
[環境敘述]: win10 3.2.3
作者: celestialgod (天)   2016-03-11 23:59:00
作者: shingetsu (shingetsu)   2016-03-12 00:17:00
不好意思,我有看過這篇,但是還是不太懂
作者: celestialgod (天)   2016-03-12 00:18:00
library(zoo); ?rollapply看看吧
作者: shingetsu (shingetsu)   2016-03-12 00:53:00
請問 as.Date(31:35)是什麼意思
作者: Wush978 (拒看低質媒體)   2016-03-12 11:22:00
split + sapply with mean?

Links booklink

Contact Us: admin [ a t ] ucptt.com