In modelistatistik/deneme: Template of R Codes Used in Histopathology Research

Descriptive Statistics

report::report(mydata)

# cat(names(mydata), sep = " + \n")

library(arsenal)
tab1 <- tableby(~ Cinsiyet + 
Yas + 
TumorYerlesimi + 
TumorCapi + 
HistolojikAltTip + 
Lauren + 
Grade + 
TNM + 
Tstage + 
T_stage + 
Nstage + 
N_stage + 
Mstage + 
M_stage + 
CD44 + 
Her2 + 
MMR + 
MMR2 + 
TumorPDL1gr1 + 
TumorPDL1gr5 + 
inflPDL1gr1 + 
inflPDL1gr5 + 
LVI + 
PNI + 
LenfNoduMetastazi + 
Outcome
                ,
                data = mydata)
summary(tab1)

Categorical Variables

mydataCategorical <- mydata %>% 
    select(-Yas,
           -TumorCapi,
           -CerrahiTarih,
           -genel_sagkalim,
           -SonTarih,
           -TNM
    )

source(here::here("R", "generatingCodeForDescriptiveStatistics.R"))

\pagebreak

Continious Variables

questionr:::icut()

mydataContinious <- mydata %>% 
    select(
        Yas,
        TumorCapi
    )

source(here::here("R", "generatingCodeForContinious.R"))

modelistatistik/deneme documentation built on Nov. 4, 2019, 7:28 p.m.