Publications by Yucheng Zhang
CEOb2
1 DATA PREPARATION ## Data loading #metadata <- import("1-CEO-20241210.csv")%>%setDT() metadata <- read_excel("1-CEO-20241210.xlsx", sheet = "final")%>%setDT() #metadata <- rio::import("1-CEO-20250102.xlsx")%>%setDT() #metadata <- rio::import(paste0(gsub("https://docs.google.com/spreadsheets/d/", "https://drive.google.com/uc?id=", gsub("/edit...
279 sym Python (548896 sym/33 pcs)
Job Performance A1
1 DATA PREPARATION 1.1 Load all sheets of an Excel 1.2 Data clean 1.2.1 Data clean for harmonic N ## [1] 53 ## ─────────────────────────────────────────────────────────────────────────────�...
392 sym Python (110458 sym/25 pcs)
Document
1 FUNCTIONS 2 DATA PREPARATION 2.1 Load all sheets of an Excel X: Leader delegation=LDLV Level-1 Moderator [Mo1]: Leader emotional exhaustion =LEDV Level-2 Moderator [Mo2]: LMX=LMX Mediator [M]: Follower work engagement =MWEV Y: Follower task performance(t+1)=LPERFV2 Controls: [C1] Interaction Freuencey=MIFV, [C2] Follower work engagement (...
628 sym 1 img
IBOBa1
1 DATA LAODING 2 BASIC INFORMATION 2.1 Descriptive analysis of effect sizes ## TABLE 0i. IB ## Descriptive Statistics: ## ──────────────────────────────────────────────────────────────────────────...
10379 sym Python (856072 sym/159 pcs) 3 tbl
HRs Delegation v2
1 FUNCTIONS 2 DATA PREPARATION 2.1 Load all sheets of an Excel X: Leader delegation=LDLV Level-1 Moderator [Mo1]: Leader emotional exhaustion =LEDV Level-2 Moderator [Mo2]: LMX=LMX Mediator [M]: Follower work engagement =MWEV Y: Follower task performance(t+1)=LPERFV2 Controls: [C1] Interaction Freuencey=MIFV, [C2] Follower work engagement (...
811 sym 2 img
AIReflectionB9
1 PREPARATION 2 STUDY 1 ## ## ****************** PART 1. Regression Model Summary ****************** ## ## PROCESS Model Code : 1 (Hayes, 2018; www.guilford.com/p/hayes3) ## PROCESS Model Type : Simple Moderation ## - Outcome (Y) : WP.SystemPerformanceImprovementBehaviorV ## - Predictor (X) : W.X ## - Mediators (M) : - ## - Moder...
296 sym 7 img
HRs Delegation RNR vA1.1
1 FUNCTIONS 2 DATA PREPARATION 2.1 Load all sheets of an Excel #data8 =import("https://drive.google.com/uc?id=19uJnllP2hUtm_RwYB_ukjsSnBVvepGjN&export=download")%>%setDT() #column_names <- names(data8) #numeric_columns <- column_names[is.na(as.numeric(column_names))] #HLM_ICC_rWG(data8, group="MNum", icc.var="LPERFV2") #data8.GroC=group_me...
1816 sym
HRs Delegation v1.2
1 FUNCTIONS 2 DATA PREPARATION 2.1 Load all sheets of an Excel #data8 =import("https://drive.google.com/uc?id=19uJnllP2hUtm_RwYB_ukjsSnBVvepGjN&export=download")%>%setDT() #column_names <- names(data8) #numeric_columns <- column_names[is.na(as.numeric(column_names))] #HLM_ICC_rWG(data8, group="MNum", icc.var="LPERFV2") #data8.GroC=group_me...
2012 sym
AIReflectionB8
1 PREPARATION data1=import("2_AIReflectionBW.NoMissingS1.sav")%>%data.table#AIReflectionBW.NoMissingS1 data2=import("AIReflectionBW.NoMissingS2.sav")%>%data.table #%>% data2$W.dX=as.factor(data2$W.X) data2 <- data2 %>% mutate( W.X10 = ifelse(W.X == 1, 1, 0), W.X01 = ifelse(W.X == 2, 1, 0) ) data2=data2[, W.CheckDummyX := paste(...
2190 sym 13 img
AIReflectionB7.2
1 PREPARATION data1=import("AIReflectionBW.NoMissingS1.sav")%>%data.table data2=import("AIReflectionBW.NoMissingS2.sav")%>%data.table #%>% data2$W.dX=as.factor(data2$W.X) data2 <- data2 %>% mutate( W.X10 = ifelse(W.X == 1, 1, 0), W.X01 = ifelse(W.X == 2, 1, 0) ) data2=data2[, W.CheckDummyX := paste(W.Intervention_new,W.X,W.X10,...
302 sym