Publications by coop711
Quiz 240301 (부연설명의 효과)
Red, Black을 잘못 표시한 사람들 랜덤화출석부(2월 26일 기준)에 있는 Red, Black 과 실제 구글예습설문지에 올린 Red, Black 이 다른 사람들의 분포를 파악해 보았습니다. 랜덤화 효과는 여기서도 작동하고 있는 걸 알 수 있습니다. Red를 Black 이라고 한 사람의 수효(8명)과 Bla...
1353 sym 8 img 16 tbl
Randomization Report (240226)
Randomization Effects 학번 2018 이전 2019 2020 2021 2022 2023 2024 Red 21 40 54 77 36 179 48 Black 17 46 53 77 35 173 55 e-mail 서비스업체 네이버 구글 기타서비스 Red 331 105 19 Black 327 109 20 전화번호 끝 네자리 0000~0999 1000~1999 2000~2999 3000~3999 4000~4999 5000~5999 6000~6999 7000~7999 8000~8999 9000~9999 ...
87 sym 5 tbl
Randomized Class Roll 240308
가나다순 id name group 20188011 LIN YUEHAO Red 20228005 WANG ZIHE Red 20188059 ZHANG XIANG Black 20246101 강규환 Black 20206601 강다현 Red 20233701 강민서 Black 20233902 강민서 Black 20216701 강민석 Red 20246102 강민제 Black 20217100 강성길 Red 20236201 강영은 Red 20242302 강예진 Black 20233601 강유빈...
10 sym 3 tbl
Randomization Report (240308)
Randomization Effects 수강신청 변경 기간 중 나간 사람들 Red Black 32 17 학번 2018 이전 2019 2020 2021 2022 2023 2024 Red 20 39 49 71 36 172 69 Black 15 43 48 77 32 171 71 e-mail 서비스업체 네이버 구글 기타서비스 Red 328 109 19 Black 327 111 19 전화번호 끝 네자리 0000~0999 1000~1999 2000~2999 300...
110 sym 6 tbl
Red and Black 240226 : Search for the Best (ID and college, 1,000,000 trials)
Summary Xsum %>% summary %>% round(2) ## Min. 1st Qu. Median Mean 3rd Qu. Max. ## 1.57 11.91 15.34 16.02 19.40 63.58 Xsum %>% sd %>% round(2) ## [1] 5.7 Xsum %>% `<=`(2) %>% which %>% `[`(Xsum, .) %>% round(2) ## 111108 179046 388725 514636 560285 614676 868580 917061 965869 ## 1.68 1.81 1.57 1.72 ...
48 sym 2 img 2 tbl
Red and Black 240226 : Search for the Best 7th 1 Million Trials
Summary Xsum %>% summary %>% round(2) ## Min. 1st Qu. Median Mean 3rd Qu. Max. ## 6.74 26.32 31.36 32.03 37.01 90.95 Xsum %>% sd %>% round(2) ## [1] 8.02 Xsum %>% `<=`(9) %>% which %>% `[`(Xsum, .) %>% round(2) ## 6026034 6058525 6092078 6210911 6324254 6467896 6478139 6490145 6524279 6680263 ## 8.93 ...
85 sym 2 img 5 tbl
Red and Black 240226 : Search for the Best (Five, 100 trials)
Summary Xsum %>% summary %>% round(2) ## Min. 1st Qu. Median Mean 3rd Qu. Max. ## 11.25 26.12 32.16 32.35 38.29 49.91 Xsum %>% sd %>% round(2) ## [1] 8.31 Xsum %>% `<=`(9) %>% which %>% `[`(Xsum, .) %>% round(2) ## named numeric(0) Xmin <- names(Xsum[which(Xsum == min(Xsum))]) Xmin ## [1] "28" Plot 학번 ...
85 sym 2 img 5 tbl
Red and Black 240226 : Search for the Best (Five, 1,000 trials)
Summary Xsum %>% summary %>% round(2) ## Min. 1st Qu. Median Mean 3rd Qu. Max. ## 11.25 25.72 31.07 31.57 36.40 59.59 Xsum %>% sd %>% round(2) ## [1] 7.97 Xsum %>% `<=`(9) %>% which %>% `[`(Xsum, .) %>% round(2) ## named numeric(0) Xmin <- names(Xsum[which(Xsum == min(Xsum))]) Xmin ## [1] "28" Plot 학번 ...
85 sym 2 img 5 tbl
Red and Black 240226 : Search for the Best (Five, 10,000 trials)
Summary Xsum %>% summary %>% round(2) ## Min. 1st Qu. Median Mean 3rd Qu. Max. ## 10.00 26.36 31.43 32.06 37.08 66.72 Xsum %>% sd %>% round(2) ## [1] 8.04 Xsum %>% `<=`(9) %>% which %>% `[`(Xsum, .) %>% round(2) ## named numeric(0) Xmin <- names(Xsum[which(Xsum == min(Xsum))]) Xmin ## [1] "3887" Plot 학번...
85 sym 2 img 5 tbl
Red and Black 240226 : Search for the Best (Five, 100,000 trials)
Summary Xsum %>% summary %>% round(2) ## Min. 1st Qu. Median Mean 3rd Qu. Max. ## 8.38 26.34 31.38 32.06 37.04 75.47 Xsum %>% sd %>% round(2) ## [1] 8.05 Xsum %>% `<=`(9) %>% which %>% `[`(Xsum, .) %>% round(2) ## 13595 68096 77749 97103 ## 8.43 8.38 8.71 8.63 Xmin <- names(Xsum[which(Xsum == min(Xsum))...
85 sym 2 img 5 tbl