Publications by coop711
Literacy 201901
Barplot 막대그래프로 답안 분포를 시각적으로 살핀다. 차후 나오는 정답률과 함께 어느 문항에서 어느 답안을 많이 고르는지 파악하는 데 활용한다. Counts Q1 Q2 Q3 Q4 Q5 Q6 Q7 Q8 Q9 Q10 Q11 Q12 Q13 Q14 Q15 Q16 Q17 Q18 Q19 Q20 Q21 Q22 Q23 Q24 Q25 0 1 120 1 0 13 147 4 7 0 147 0 2 2 1 136 35 0 148 0...
701 sym R (818 sym/5 pcs) 10 img 14 tbl
Literacy 201801
barplot 막대그래프로 답안 분포를 시각적으로 살핀다. 차후 나오는 정답률과 함께 어느 문항에서 어느 답안을 많이 고르는지 파악하는 데 활용한다. Counts Q1 Q2 Q3 Q4 Q5 Q6 Q7 Q8 Q9 Q10 Q11 Q12 Q13 Q14 Q15 Q16 Q17 Q18 Q19 Q20 Q21 Q22 Q23 Q24 Q25 0 2 142 1 1 14 168 11 8 1 169 1 2 3 2 162 36 1 167 ...
1152 sym R (727 sym/3 pcs) 4 img 12 tbl
Red and Black : Search for the Best
Randomization Effects 학번 비교 전체 비교 2015 이전 2016 2017 2018 2019 2020 2021 Red 17 34 29 36 16 66 45 Black 15 34 35 38 19 66 36 21학번 기준 21학번 20학번 이전 Red 45 198 Black 36 207 20학번 기준 20학번 19학번 이전 Red 111 132 Black 102 141 19학번 기준 19학번 18학번 이전 Red 127 116 Bl...
197 sym 1 img 13 tbl
Red and Black : Search for the Best, next one million trials
Data Search for Best Configuration M1 <- 1 M2 <- 10000 Xsum <- numeric(0) Values_mat <- numeric(0) for(k in M1:M2){ set.seed(k) N <- nrow(class_roll) class_roll$group <- sample(1:N) %% 2 %>% factor(levels = c(0, 1), labels = c("Red", "Black")) Xsum <- c(Xsum, red_and_black(class_roll)$Xsum) Values_mat <- rbind(Values_mat,...
187 sym R (3903 sym/34 pcs) 2 img 6 tbl
Google Quiz 210330 Submission Time
제출/미제출 제출시간이 기록되지 않은 사람은 미제출. 미제출 제출 Black 27 211 Red 34 220 Pearson’s Chi-squared test with Yates’ continuity correction: table(quiz$group, quiz$submit) Test statistic df P value 0.3022 1 0.5825 제출 시간의 분포 마감 시간으로부터 얼마나 일찍 제출하는지 일 ...
228 sym R (816 sym/3 pcs) 1 img 6 tbl
Google Quiz 210323 Submission Time
제출/미제출 제출시간이 기록되지 않은 사람은 미제출. 미제출 제출 Black 31 207 Red 37 216 Pearson’s Chi-squared test with Yates’ continuity correction: table(quiz$group, quiz$submit) Test statistic df P value 0.1459 1 0.7024 제출 시간의 분포 마감 시간으로부터 얼마나 일찍 제출하는지 일 ...
228 sym R (818 sym/3 pcs) 1 img 6 tbl
Google Quiz 210406 Submission Time
제출/미제출 제출시간이 기록되지 않은 사람은 미제출. 미제출 제출 Black 28 210 Red 30 223 Pearson’s Chi-squared test with Yates’ continuity correction: table(quiz$group, quiz$submit) Test statistic df P value 4.668e-31 1 1 제출 시간의 분포 마감 시간으로부터 얼마나 일찍 제출하는지 일 �...
228 sym R (841 sym/3 pcs) 1 img 6 tbl
BFP and MI : 210511
성격특성별 분포 외향성 신경성 성실성 친화성 개방성 높음 21 66 75 92 2 중상 114 149 158 94 28 중하 172 145 144 153 160 낮음 129 76 59 97 246 계 436 436 436 436 436 3대 강점지능 분포 음악 신체운동 논리수학 공간 언어 인간친화 자기성찰 자연친화 제1순위 62 16 87 30 34 133 55 6...
52 sym 3 tbl
BFP, MI : Comparison with Calculation by Hand
손으로 계산한 성격특성점수와 비교 외향성 신경성 성실성 친화성 개방성 E_Score N_Score C_Score A_Score O_Score 20133426 5 5 7 11 10 중상 중하 중상 중상 중하 20133908 6 2 2 14 7 중하 낮음 중하 중상 낮음 20142223 8 9 5 12 9 중상 높음 중하 중상 중상 20143849 5 5 3 13 6 중하 중하 낮�...
97 sym 3 tbl
Quiz 210511 (Framing Effects)
퀴즈 응답 비교 Latane and Darley 방관자 효과 열에 한명 열에 세명 열에 다섯명 열에 여덟명 계 Red 168 23 21 8 220 Black 157 49 9 9 224 계 325 72 30 17 444 Pearson’s Chi-squared test with simulated p-value (based on 2000 replicates): . Test statistic df P value 14.59 NA 0.0009995 * * * 방관자 효과(%) ...
318 sym 5 img 12 tbl