Eze<-readRDS(file="EzeOba.rds")library(tableone)-解析対象となった。177人のSingle group summary
CreateTableOne(data= Eze)## Warning in CreateTableOne(data = Eze): Dropping variable(s) Pre_Start due to unsupported class.##
## Overall
## n 177
## TID (mean (sd)) 1697708.79 (695096.26)
## ID (mean (sd)) 177.27 (108.62)
## Exclude (%)
## 0 153 (86.4)
## 1 0 ( 0.0)
## 2 7 ( 4.0)
## 3 17 ( 9.6)
## 4 0 ( 0.0)
## Pretreatment_statin (%)
## 0 102 (59.0)
## 1 53 (30.6)
## 2 0 ( 0.0)
## 3 18 (10.4)
## 5 0 ( 0.0)
## Statin (%)
## Atrovastatin 19 (21.8)
## Bezafibrate 7 ( 8.0)
## Fenofibrate 11 (12.6)
## Fluvastatin 1 ( 1.1)
## Pitavastatin 18 (20.7)
## Plavastatin 7 ( 8.0)
## Rosuvastatin 24 (27.6)
## Gender = Male (%) 93 (52.5)
## Age_F (mean (sd)) 57.98 (14.27)
## LDL_0 (mean (sd)) 143.95 (32.50)
## LDLK_0 (mean (sd)) 150.80 (51.69)
## TG_0 (mean (sd)) 206.04 (159.92)
## LDL_90 (mean (sd)) 117.16 (34.17)
## LDLK_90 (mean (sd)) 116.99 (39.40)
## TG_90 (mean (sd)) 189.20 (139.33)
## LDL_180 (mean (sd)) 121.59 (43.09)
## LDLK_180 (mean (sd)) 115.81 (35.88)
## LDL_365 (mean (sd)) 120.27 (38.35)
## LDLK_365 (mean (sd)) 117.75 (34.80)
## DM012 (%)
## 0 107 (64.8)
## 1 43 (26.1)
## 2 11 ( 6.7)
## 3 4 ( 2.4)
## HT = 1 (%) 84 (50.9)
## CABG (%)
## 0 160 (96.4)
## 1 5 ( 3.0)
## 9 1 ( 0.6)
## CKD (%)
## 0 3 ( 2.1)
## 1 16 (11.2)
## 2 81 (56.6)
## 3 2 ( 1.4)
## 3a 15 (10.5)
## 3b 14 ( 9.8)
## ３ｂ 2 ( 1.4)
## 4 2 ( 1.4)
## 5 2 ( 1.4)
## G3a 5 ( 3.5)
## G4 1 ( 0.7)
## OMI = 1 (%) 14 ( 8.5)
## PCI = 1 (%) 23 (13.9)
## DPC_DL = 1 (%) 82 (46.3)
## DPC_AP = 1 (%) 37 (20.9)
## DPC_DM = 1 (%) 56 (31.6)
## DPC_HD = 1 (%) 17 ( 9.6)
## DPC_HT = 1 (%) 69 (39.0)
## LDLA0 (mean (sd)) 152.17 (37.76)
## LDLA90 (mean (sd)) 120.60 (34.54)
## LDLA180 (mean (sd)) 118.84 (39.79)
## LDLA365 (mean (sd)) 119.02 (36.51)
## CR90 (mean (sd)) -19.29 (18.46)
## CR180 (mean (sd)) -19.90 (23.41)
## CR365 (mean (sd)) -19.35 (23.25)
## Statin01 = 1 (%) 69 (39.0)
## DM01 (mean (sd)) 0.34 (0.47)
## Age_F_category (mean (sd)) 1.50 (0.50)##Vectors of varibles summarize
myvars<-c("Statin","Statin01","Gender","Age_F","LDL_0","LDLK_0","TG_0","LDL_90","LDLK_90","TG_90","LDLA90","DM01","HT","CABG","CKD","OMI","PCI","DPC_DL","DPC_AP","DPC_DM","DPC_HD","DPC_HT","CR90")
#Vector of categolical variables
cat<-c("Statin","Statin01","Gender","DM01","HT","CABG","CKD","OMI","PCI","DPC_DL","DPC_AP","DPC_DM","DPC_HD","DPC_HT")
#Create a TableOne object
tab<-CreateTableOne(vars= myvars, data=Eze, factorVars=cat)
summary(tab)##
## ### Summary of continuous variables ###
##
## strata: Overall
## n miss p.miss mean sd median p25 p75 min max skew kurt
## Age_F 177 0 0 58 14 59 49 68 18 88 -0.31 -0.28
## LDL_0 177 100 56 144 32 150 124 165 52 218 -0.55 0.26
## LDLK_0 177 86 49 151 52 153 132 174 -31 304 -0.44 2.68
## TG_0 177 8 5 206 160 165 117 235 48 1361 3.72 19.86
## LDL_90 177 101 57 117 34 114 101 141 48 204 0.13 0.02
## LDLK_90 177 88 50 117 39 120 96 135 15 252 0.09 1.15
## TG_90 177 22 12 189 139 154 103 218 55 1023 2.78 10.16
## LDLA90 177 26 15 121 35 119 102 140 48 252 0.38 0.85
## CR90 177 28 16 -19 18 -19 -29 -10 -75 72 0.64 3.89
##
## =======================================================================================
##
## ### Summary of categorical variables ###
##
## strata: Overall
## var n miss p.miss level freq percent cum.percent
## Statin 177 90 50.8 Atrovastatin 19 21.8 21.8
## Bezafibrate 7 8.0 29.9
## Fenofibrate 11 12.6 42.5
## Fluvastatin 1 1.1 43.7
## Pitavastatin 18 20.7 64.4
## Plavastatin 7 8.0 72.4
## Rosuvastatin 24 27.6 100.0
##
## Statin01 177 0 0.0 0 108 61.0 61.0
## 1 69 39.0 100.0
##
## Gender 177 0 0.0 Female 84 47.5 47.5
## Male 93 52.5 100.0
##
## DM01 177 16 9.0 0 107 66.5 66.5
## 1 54 33.5 100.0
##
## HT 177 12 6.8 0 81 49.1 49.1
## 1 84 50.9 100.0
##
## CABG 177 11 6.2 0 160 96.4 96.4
## 1 5 3.0 99.4
## 9 1 0.6 100.0
##
## CKD 177 34 19.2 0 3 2.1 2.1
## 1 16 11.2 13.3
## 2 81 56.6 69.9
## 3 2 1.4 71.3
## 3a 15 10.5 81.8
## 3b 14 9.8 91.6
## ３ｂ 2 1.4 93.0
## 4 2 1.4 94.4
## 5 2 1.4 95.8
## G3a 5 3.5 99.3
## G4 1 0.7 100.0
##
## OMI 177 12 6.8 0 151 91.5 91.5
## 1 14 8.5 100.0
##
## PCI 177 11 6.2 0 143 86.1 86.1
## 1 23 13.9 100.0
##
## DPC_DL 177 0 0.0 0 95 53.7 53.7
## 1 82 46.3 100.0
##
## DPC_AP 177 0 0.0 0 140 79.1 79.1
## 1 37 20.9 100.0
##
## DPC_DM 177 0 0.0 0 121 68.4 68.4
## 1 56 31.6 100.0
##
## DPC_HD 177 0 0.0 0 160 90.4 90.4
## 1 17 9.6 100.0
##
## DPC_HT 177 0 0.0 0 108 61.0 61.0
## 1 69 39.0 100.0
##