[Eventstudies-commits] r50 - in pkg: R data man

[noreply at r-forge.r-project.org]

Author: vikram
Date: 2013-04-04 08:52:55 +0200 (Thu, 04 Apr 2013)
New Revision: 50

Added:
   pkg/data/eventDays.rda
   pkg/data/eventstudyData.rda
Removed:
   pkg/man/inference.change.boot.Rd
Modified:
   pkg/R/remap.cumprod.R
Log:
Corrected remap.cumprod function by adding 'return(z)'; added eventDays and eventstudyData rda files; removed inference.change.boot documentation as it is not a user required function

Modified: pkg/R/remap.cumprod.R
===================================================================
--- pkg/R/remap.cumprod.R	2013-04-04 06:49:50 UTC (rev 49)
+++ pkg/R/remap.cumprod.R	2013-04-04 06:52:55 UTC (rev 50)
@@ -17,4 +17,5 @@
     tmp[1] <- base
     z[,i] <- cumprod(tmp)
   }
+  z
 }

Added: pkg/data/eventDays.rda
===================================================================
(Binary files differ)


Property changes on: pkg/data/eventDays.rda
___________________________________________________________________
Added: svn:mime-type
   + application/octet-stream

Added: pkg/data/eventstudyData.rda
===================================================================
(Binary files differ)


Property changes on: pkg/data/eventstudyData.rda
___________________________________________________________________
Added: svn:mime-type
   + application/octet-stream

Deleted: pkg/man/inference.change.boot.Rd
===================================================================
--- pkg/man/inference.change.boot.Rd	2013-04-04 06:49:50 UTC (rev 49)
+++ pkg/man/inference.change.boot.Rd	2013-04-04 06:52:55 UTC (rev 50)
@@ -1,39 +0,0 @@
-\name{inference.change.boot}
-\alias{inference.change.boot}
-\title{
-This does bootstrap inference for the difference in the
-average "car" between t1 and t2 (both in event time).
-}
-
-\description{
-z.e is a zoo object, where rows are in event time
-and columns are units of observation. Sampling with replacement is done within the units of observation. Each time, the Ecar(t1) and Ecar(t2) is computed.
-
-By default, the statistic of interest is the ratio
-Ecar(t2)/Ecar(t1)
-But if operator="difference" is sent in, then the
-statistic of interest shifts to Ecar(t2)-Ecar(t1).
-}
-
-\usage{
-inference.change.boot(z.e, t1, t2, operator = "ratio", conf = 0.95)
-}
-
-\arguments{
-  \item{z.e}{z is the zoo object returned from phys2eventtime.}
-  \item{t1}{Start of the event period.}
-  \item{t2}{End of the event period.}
-  \item{operator}{One of ratio or difference to compute the ratio or difference
-for the change in Ecar.}
-  \item{conf}{The level of confidence for computing the confidence intervals.}
-}
-
-\value{It returns a list containing the mean,and the confidence intervals for the change in Ecar.}
-
-\examples{
-data(eventDays)
-data(eventstudyData)
-es.results <- phys2eventtime(z=eventstudyData, events=eventDays,width=5)
-es.w <- window(es.results$z.e, start=-5, end=+5)
-eventtime <- remap.cumsum(es.w, is.pc=FALSE, base=0)
-}