smooth_algorithm {smoothy}

Apply Smooth Algorithm in a Dataset

Description

Description part

Usage

smooth_algorithm(id, treatment, day, N, width = 61)

Arguments

id

Unique identifier of the patient.

treatment

Name of the drug used.

day

Day of the treatment.

N

Number of drugs used in the treatment.

width

An integer specifying the window width (in numbers of days, 61 by default).

Value

A data.frame with the following structure:

id

A character vector representing the unique identifier for each patient.

day

A character vector representing the date when the treatment was administered to the patients.

treatment

A character vector representing the type of treatment given to each patient.

smoothed_treatment

A character vector representing the smoothed treatment given to each patient.

Examples

library(smoothy)
library(dplyr)

data(drugstreatment)

df <- drugstreatment |>
  filter(id == "01f13c15-d9f1-4106-a04f-976c457edd0a")

structured_df <- smooth_parse(
  id = df$id,
  start_date = df$start_date,
  end_date = df$end_date,
  drug = df$drug,
  study_from = "1970-01-01",
  study_to = "1975-01-01"
)

head(structured_df)

id = structured_df$id
treatment = structured_df$treatment
day = structured_df$day
N = structured_df$N
width = 61

smoothed <- smooth_algorithm(id = id, treatment = treatment, day = day, N = N, width = width)
head(smoothed)