chop: chop

Description Usage Arguments Value Definiciones Examples

Description

chop trocea la duración de un episodio, dado unos puntos de corte, en una determinada escala de tiempo (edad, calendario o duración desde un evento dado..)

Usage

1
2
3
4
5
6
7
8
chop(
  start.times,
  durations,
  breaks,
  kid = 1:length(start.times),
  timedim = "Time",
  data = NULL
)

Arguments

start.times

Vector con los puntos temporales (tiempos de comienzo) de inicio de cada episodio

durations

Vector con las duraciones (en unidades de tiempo) de cada episodio. El instante de de terminación de cada episodio es start.times + durations

breaks

Vector con los puntos de corte (chop) en la dimensión temporal utilizada. (usa la funcion "cut" a la que se le pueden pasar el parametros "right")

kid

clave primaria de episodio

timedim

nombre de la dimension

data

data.frame con los episodios

Value

un objeto del tipo data.table donde cada fila contiene tres variables: (1) una clave de identificacion de episodio "kid", (2) una variable con el nombre de la dimension temporal con el punto de inicio del episodio, (3) un vector con las duraciones de los sub-episodios en los que se ha particionado el episodio origina segun la regla dada por los puntos de corte. El attributo breaks.<dimension> contiene la regla utilizada

Definiciones

Un episodio es una intervalo temporal con una duración dada. Esta fijado en su origen a un instante termporal concreto. Un episodio tienen principio y fin (esta temporamente datado). Un episodio puede estar censurado por la derecha a partir de una determinada fecha termina su observación. Para la ejecución de esta esta función es indistinto que el cominzo o fin del episodio sea por una transición entre estados o por censura.

Examples

1
2
3
4
5
6
7
    start.times <- c(16,21,32) ;  durations <- c(12.5,19.4, 7.3) ; breaks <- seq(10,50, by=5)
    chop (start.times, durations,  breaks ) -> kk ; kk
    # comprueba
    cbind(sapply(kk$epi.durations, sum) , durations)
    # borra termporales
    rm(start.times,durations,breaks)
    

viciana/chopepi documentation built on Feb. 13, 2020, 10:47 p.m.