In angeloSdP/ULPGCmisc: ULPGC Miscellaneous

knitr::opts_chunk$set(echo = TRUE, results='asis')
library(ULPGCmisc)

symptom=sample(LETTERS[1:4],120,replace=TRUE)
disease=sample(c("Yes","No"),120,replace=TRUE)

t1=table1(symptom,horizontal=TRUE,density=TRUE,printFreq=FALSE, showTable=TRUE)

t2=table2(symptom,by=disease,horizontal=FALSE,density=TRUE,printFreq=TRUE, showTable=TRUE)

freqTable(symptom,by=disease,horizontal=FALSE,density=FALSE,printFreq=TRUE, showTable=TRUE)

zz=rnorm(200,20,3)
summary1(zz)
summary1(zz,normalCurve=TRUE)

angeloSdP/ULPGCmisc documentation built on May 10, 2019, 11:47 a.m.