monitor_long_surv: Monitor Longitudinal Data for Survival Outcomes

In DySS: Dynamic Screening Systems

Monitor Longitudinal Data for Survival Outcomes

Description

Monitor Longitudinal Data for Survival Outcomes

Usage

monitor_long_surv(
  data_array_new,
  time_matrix_new,
  nobs_new,
  pattern,
  method,
  parameter = 0.5,
  CL = Inf
)

Arguments

data_array_new	observed data arranged in a numeric array format. data_array_new[i,j,k] is the jth observation of the kth dimension of the ith subject.
time_matrix_new	observation times arranged in a numeric matrix format. time_matrix_new[i,j] is the jth observation time of the ith subject. data_array_new[i,j,] is observed at time_matrix[i,j].
nobs_new	number of observations arranged as an integer vector. nobs_new[i] is the number of observations for the ith subject.
pattern	the estimated longitudinal and survival pattern from estimate_pattern_long_surv.
method	a character value specifying the smoothing method If method="risk", apply the risk monitoring method by You and Qiu (2020).
parameter	a numeric value. The weighting parameter in the modified EWMA charts.
CL	a numeric value specifying the control limit

Value

a list that stores the result.

$chart	charting statistics arranged in a matrix.
$standardized_values	standardized values arranged in a matrix.

References

You, L. and Qiu, P. (2020). An effective method for online disease risk monitoring. Technometrics, 62(2):249-264.

Examples

data("data_example_long_surv")

result_pattern<-estimate_pattern_long_surv(
  data_array=data_example_long_surv$data_array_IC,
  time_matrix=data_example_long_surv$time_matrix_IC,
  nobs=data_example_long_surv$nobs_IC,
  starttime=data_example_long_surv$starttime_IC,
  survtime=data_example_long_surv$survtime_IC,
  survevent=data_example_long_surv$survevent_IC,
  design_interval=data_example_long_surv$design_interval,
  n_time_units=data_example_long_surv$n_time_units,
  estimation_method="risk",
  smoothing_method="local linear",
  bw_beta=0.05,
  bw_mean=0.1,
  bw_var=0.1)

result_monitoring<-monitor_long_surv(
  data_array_new=data_example_long_surv$data_array_OC,
  time_matrix_new=data_example_long_surv$time_matrix_OC,
  nobs_new=data_example_long_surv$nobs_OC,
  pattern=result_pattern,
  method="risk",
  parameter=0.5)

DySS documentation built on July 16, 2022, 5:07 p.m.