Publications by Anonymous
Code chay thu data THK
#Load data library(readxl) data <- read_excel("C:/Users/DELL/Desktop/data.xlsx", col_types = c("text", "text", "numeric", "text", "text", "text", "text", "text", "text", "text", "text", "text", "text", "text", "text", "text", "text", "text", "text", "numeric", "numeric", "text", "numeric", "numeric", "text", "numeric", "numeric", "text", "numeri...
8637 sym R (1146529 sym/7506 pcs) 10 img 7 tbl
HCCH and OA 3
#Load packages library(tidyverse); library(dplyr); library(ggplot2); library(ggthemes); library(table1); library(magrittr) library(psych); library(compareGroups); library(nortest); library(coin); library(gmodels); library(epiR) library(explor); library(car); library(GGally); library(gridExtra); library(BMA); library(rms); library(epiDisplay) so...
893 sym R (144018 sym/61 pcs) 1 img
HCCH and OA
library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, union library(magrittr) source = read.csv("modded_data.csv") dat = source %>% mutate(bmi.class = factor(bmi.class...
684 sym R (49153 sym/42 pcs) 1 img
HCCH and OA 2
source = read.csv("modded_data.csv") library(naniar) dat = source gg_miss_var(dat) ## Warning: It is deprecated to specify `guide = FALSE` to remove a guide. Please ## use `guide = "none"` instead. #Missing: #la1t #la1d #pa1t #pa1d #pa2t #pa2d #movt #movd library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are ...
684 sym R (49153 sym/42 pcs) 1 img