9 Ryhmää vaihtavien sensorointi

Seuraavaksi käsitellään ryhmää vaihtavien tutkittavien sensorointia.

Tämä tapahtuu copy-pastettamalla seuraava koodinpätkä mukaan:

# Patients are censored when initiating the other arm treatment, that is, at time swtrtdt
toy.long2 <- cens.ipw(toy.long, id = "id", tstart = "tstart", tstop = "tstop",
                      event = "event", arm = "arm",
                      realtrt = FALSE, censTime ="swtrtdt")

9.1 Sensuroinnin vaikutus

Seuraavassa esitettynä muutamia rivejä datasetistä, ennen (ensimmäinen taulukko) ja jälkeen (jälkimmäinen taulukko) yllä mainitun sensuroinnin.

id tstart tstop event age arm swtrtdt TDconf
1 0 49 1 20 A NA 1
2 0 41 1 50 B NA 1
3 0 229 0 40 A 226 1
4 0 212 1 42 B NA 1
5 0 361 1 38 A NA 1
6 0 257 1 46 A NA 1
id tstart tstop event age arm swtrtdt TDconf cens
1 0 49 1 20 A NA 1 0
2 0 41 1 50 B NA 1 0
3 0 226 0 40 A 226 1 1
4 0 212 1 42 B NA 1 0
5 0 361 1 38 A NA 1 0
6 0 257 1 46 A NA 1 0