Robert-Y
Legend
Related to the above: Longest time taken to achieve a 1st place finish? 
Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.

You already asked this 2 months ago.most podiums without a 1st place? (I think it's Kian Barry(?) but I'd love to have a list![]()
WCAid 1st 2nd 3rd total
2008DANG01 16 13 29 Bobby D'Angelo, USA
2007BARR01 14 25 39 Kian Barry, USA
2011SILV05 10 8 18 Gilson Sousa da Silva, Brazil
2013ITOW01 10 7 17 William Yudi Matunoshita Ito, Brazil
2010PAPP01 9 20 29 Nick Pappas, Australia
2011KUOE01 9 6 15 Er-Sheng Kuo (郭爾陞), Taiwan
2009MAHO01 8 11 19 Trevor Mahoney, USA
2012SLIZ01 8 9 17 Mateusz Śliż, Poland
2014GERB01 8 7 15 Henri Gerber, Germany
2013HOUJ01 8 6 14 Jiaxin Hou (侯家欣), China
2013MIRA03 8 4 12 Sebastian Miranda, Chile
2013GURR01 8 2 10 Bhaskar Gurram, India
2011PIHE01 7 10 17 Raphaël Pihet, France
2011GANE01 7 6 13 Fandy Ramadhan Ganefianto, Indonesia
2009LIDO01 6 14 20 Donglei Li (李冬雷), China
2013MACI01 6 8 14 Adrián Martínez Macías, Spain
2010HIRA01 6 8 14 Peerawich Hiranpaphakorn (พีรวิชญ์ พิรัญปภากร), Thailand
2008WAIM01 6 7 13 Mok Mun Wai (莫滿懷), Hong Kong
2011LINZ01 6 6 12 Zheng Lin (林铮), China
2008DIAS01 6 5 11 António Dias, Portugal
2011MINI01 6 4 10 Marco Minici, Italy
2009KOBA03 6 3 9 Branko Kobal, Slovenia
2012WALD01 6 3 9 Daniel Waldo, Mexico
2009LIJI03 6 2 8 Jiajun Li (李嘉俊), China
2010TRIN02 6 6 Trịnh Nguyên Anh, Vietnam
2009LUOX01 6 6 Xitian Luo (罗习添), China
2009KOBA02 5 16 21 Yuuki Kobayashi (古林祐輝), Japan
2010WILK01 5 9 14 Chris Wilkinson, Australia
2007ROKA01 5 9 14 Péter Róka, Hungary
2007HUGH04 5 9 14 Rebecca Hughey, USA
2010SAMP01 5 8 13 Pranay Sampat, India
2013KASH01 5 6 11 Ankush Kumar, India
2006SAWL01 5 6 11 Jaclyn Burton, USA
2012CHEN25 5 6 11 Jingyuan Chen (陈静远), China
2009CHAN03 5 6 11 Philip Chang, USA
2010RICH04 5 6 11 Yannick Richter, Germany
2011HAVL01 5 5 10 Valentin Havlovec, Austria
2008CHAN12 5 4 9 Ahn Chang-Bae, Korea
2014REYN02 5 4 9 Bryan Gomez Reynoso, Dominican Republic
2013FRAN04 5 4 9 Ryan Francisco, Philippines
2011NGUY18 5 3 8 Nguyễn Đức Huy, Vietnam
2013VIDA03 5 2 7 Dominik Vidaković, Croatia
2013VASI02 5 2 7 Vasile Dan, Romania
2012WUZI02 5 2 7 Ziling Wu (吴子菱), China
2007BAIL01 5 1 6 Alex Bailey, USA
2009IRSI01 5 1 6 Bence Irsik, Hungary
2009SUND02 5 5 Kaushik Sundar, India
Thanks a lot!! I know I already asked this, but I just ask who had the most, not for the list. Now I was interested in the listYou already asked this 2 months ago.
Here is an updated list, (with 5+ second places).
Code:WCAid 1st 2nd 3rd total 2008DANG01 16 13 29 Bobby D'Angelo, USA 2007BARR01 14 25 39 Kian Barry, USA 2011SILV05 10 8 18 Gilson Sousa da Silva, Brazil 2013ITOW01 10 7 17 William Yudi Matunoshita Ito, Brazil 2010PAPP01 9 20 29 Nick Pappas, Australia 2011KUOE01 9 6 15 Er-Sheng Kuo (郭爾陞), Taiwan 2009MAHO01 8 11 19 Trevor Mahoney, USA 2012SLIZ01 8 9 17 Mateusz Śliż, Poland 2014GERB01 8 7 15 Henri Gerber, Germany 2013HOUJ01 8 6 14 Jiaxin Hou (侯家欣), China 2013MIRA03 8 4 12 Sebastian Miranda, Chile 2013GURR01 8 2 10 Bhaskar Gurram, India 2011PIHE01 7 10 17 Raphaël Pihet, France 2011GANE01 7 6 13 Fandy Ramadhan Ganefianto, Indonesia 2009LIDO01 6 14 20 Donglei Li (李冬雷), China 2013MACI01 6 8 14 Adrián Martínez Macías, Spain 2010HIRA01 6 8 14 Peerawich Hiranpaphakorn (พีรวิชญ์ พิรัญปภากร), Thailand 2008WAIM01 6 7 13 Mok Mun Wai (莫滿懷), Hong Kong 2011LINZ01 6 6 12 Zheng Lin (林铮), China 2008DIAS01 6 5 11 António Dias, Portugal 2011MINI01 6 4 10 Marco Minici, Italy 2009KOBA03 6 3 9 Branko Kobal, Slovenia 2012WALD01 6 3 9 Daniel Waldo, Mexico 2009LIJI03 6 2 8 Jiajun Li (李嘉俊), China 2010TRIN02 6 6 Trịnh Nguyên Anh, Vietnam 2009LUOX01 6 6 Xitian Luo (罗习添), China 2009KOBA02 5 16 21 Yuuki Kobayashi (古林祐輝), Japan 2010WILK01 5 9 14 Chris Wilkinson, Australia 2007ROKA01 5 9 14 Péter Róka, Hungary 2007HUGH04 5 9 14 Rebecca Hughey, USA 2010SAMP01 5 8 13 Pranay Sampat, India 2013KASH01 5 6 11 Ankush Kumar, India 2006SAWL01 5 6 11 Jaclyn Burton, USA 2012CHEN25 5 6 11 Jingyuan Chen (陈静远), China 2009CHAN03 5 6 11 Philip Chang, USA 2010RICH04 5 6 11 Yannick Richter, Germany 2011HAVL01 5 5 10 Valentin Havlovec, Austria 2008CHAN12 5 4 9 Ahn Chang-Bae, Korea 2014REYN02 5 4 9 Bryan Gomez Reynoso, Dominican Republic 2013FRAN04 5 4 9 Ryan Francisco, Philippines 2011NGUY18 5 3 8 Nguyễn Đức Huy, Vietnam 2013VIDA03 5 2 7 Dominik Vidaković, Croatia 2013VASI02 5 2 7 Vasile Dan, Romania 2012WUZI02 5 2 7 Ziling Wu (吴子菱), China 2007BAIL01 5 1 6 Alex Bailey, USA 2009IRSI01 5 1 6 Bence Irsik, Hungary 2009SUND02 5 5 Kaushik Sundar, India
Who has the most PBs from the most amount of competitions?
Ex: I have PBs from 8 competitions: ODU Big Blue Open 2015 , Doylestown Spring 2015, CSP Spring 2015, Johns Hopkins Winter 2015, US Nationals 2014, US Nationals 2015, Fantabulous MD Competition 2015, and Slow N Steady Fall 2015.
I have PBs from 4 and soon to be 5.
Who has the most PBs from the most amount of competitions?
Ex: I have PBs from 8 competitions: ODU Big Blue Open 2015 , Doylestown Spring 2015, CSP Spring 2015, Johns Hopkins Winter 2015, US Nationals 2014, US Nationals 2015, Fantabulous MD Competition 2015, and Slow N Steady Fall 2015.
Who has the most PBs from the most amount of competitions?
Ex: I have PBs from 8 competitions: ODU Big Blue Open 2015 , Doylestown Spring 2015, CSP Spring 2015, Johns Hopkins Winter 2015, US Nationals 2014, US Nationals 2015, Fantabulous MD Competition 2015, and Slow N Steady Fall 2015.
| Competitor | Number of Competitions | |
| 1 | François Courtès | 26 |
| 2 | Sébastien Auroux | 25 |
| 3 | Cornelius Dieckmann | 24 |
| Henrik Buus Aagaard | 24 | |
| 5 | Bence Barát | 23 |
| Erik Akkersdijk | 23 | |
| 7 | Clément Gallet | 22 |
| Hideki Niina (新名秀樹) | 22 | |
| István Kocza | 22 | |
| Jan Bentlage | 22 | |
| Lars Vandenbergh | 22 | |
| Wojciech Szatanowski | 22 | |
| 13 | Arnaud van Galen | 21 |
| Christopher Olson | 21 | |
| Dániel Varga | 21 | |
| Joey Gouly | 21 | |
| Lorenzo Vigani Poli | 21 | |
| Marcin Jakubowski | 21 | |
| Sinpei Araki (荒木慎平) | 21 | |
| Tim Reynolds | 21 | |
| 21 | Daniel Sheppard | 20 |
| Fumiki Koseki (古関章記) | 20 | |
| Lucas Garron | 20 | |
| Markus Pirzer | 20 | |
| Moritz Karl | 20 | |
| Ron van Bruchem | 20 | |
| Yuhei Takagi (高木佑平) | 20 | |
| 28 | Adam Polkowski | 19 |
| Alexander Olleta del Molino | 19 | |
| Baiqiang Dong (董百强) | 19 | |
| Gunnar Krig | 19 | |
| Hippolyte Moreau | 19 | |
| Kåre Krig | 19 | |
| Kian Barry | 19 | |
| Kit Clement | 19 | |
| Laura Ohrndorf | 19 | |
| Michael Röhrer | 19 | |
| Milán Baticz | 19 | |
| Oscar Alberto Ceballos Contreras | 19 | |
| Takuma Shirahase (白波瀬拓磨) | 19 | |
| Tomoaki Okayama (岡山友昭) | 19 | |
| 42 | Akihiro Ishida (石田朗大) | 18 |
| Andreas Pohl | 18 | |
| Chunyu Zhang (张春雨) | 18 | |
| Dan Cohen | 18 | |
| Edward Lin | 18 | |
| Filippo Brancaleoni | 18 | |
| Geert Bicler | 18 | |
| Ilkyoo Choi (최일규) | 18 | |
| Javier Tirado Ortiz | 18 | |
| Marcin Stachura | 18 | |
| Michał Pleskowicz | 18 | |
| Mike Hughey | 18 | |
| Nobuaki Suga (菅信昭) | 18 | |
| Nora Christ | 18 | |
| Olivér Perge | 18 | |
| Paweł Kowol | 18 | |
| Rowe Hessler | 18 | |
| Sarah Strong | 18 | |
| Takayuki Ookusa (大艸尊之) | 18 | |
| Timothy Sun | 18 | |
| Ton Dennenbroek | 18 | |
| Wataru Hashimura (端村航) | 18 | |
| Yu Nakajima (中島悠) | 18 | |
| 65 | Anders Larsson | 17 |
| Anton Rostovikov | 17 | |
| Bhargav Narasimhan | 17 | |
| Chia-Liang Tai (戴嘉良) | 17 | |
| Corey Sakowski | 17 | |
| Dan Dzoan | 17 | |
| Eric Limeback | 17 | |
| Felix Lee | 17 | |
| Gilberto Caracciolo Morelli | 17 | |
| Jong-Ho Jeong (정종호) | 17 | |
| Justin Jaffray | 17 | |
| Loïc Petit | 17 | |
| Marek Wójtowicz | 17 | |
| Mats Valk | 17 | |
| Oleg Gritsenko | 17 | |
| Pedro Santos Guimarães | 17 | |
| Rafael Werneck Cinoto | 17 | |
| Robert Yau | 17 | |
| Sanio Kasumovic | 17 | |
| Stefan Pochmann | 17 | |
| Taku Yanai (矢内拓) | 17 | |
| Thompson Clarke | 17 | |
| Weixing Zhang (张炜星) | 17 | |
| Yohei Oka (岡要平) | 17 | |
| Yumu Tabuchi (田渕雄夢) | 17 | |
| 90 | Antoine Piau | 16 |
| Artem Melikian (Артем Мелікян) | 16 | |
| Brandon Mikel | 16 | |
| Chester Lian | 16 | |
| Chia-Wei Lu (呂家維) | 16 | |
| Devin Corr-Robinett | 16 | |
| Frank Severinsen | 16 | |
| Gaurav Taneja | 16 | |
| Ihor Bilchenko (Ігор Більченко) | 16 | |
| Jakub Kipa | 16 | |
| James Hildreth | 16 | |
| Lars Vennike Nielsson | 16 | |
| Mariano D'Imperio | 16 | |
| Michał Halczuk | 16 | |
| Paweł Włoszek | 16 | |
| Philippe Virouleau | 16 | |
| Piotr Frankowski | 16 | |
| Piotr Kuchta | 16 | |
| Riadi Arsandi | 16 | |
| Sanae Omyo (大名佐苗) | 16 | |
| Simon Westlund | 16 | |
| Syuhei Omura (大村周平) | 16 | |
| Takahiro Tomisawa (富沢隆広) | 16 | |
| Tomas Kristiansson | 16 | |
| Yu Sajima (佐島優) | 16 | |
| Zoé de Moffarts | 16 |
results = read.csv("WCA_export_Results.tsv", sep="\t", header=T, encoding="UTF-8")
results2 = results[results$eventId != "magic" & results$eventId != "mmagic" & results$eventId != "333mbo",]
results3 = results2[nrow(results2):1,]
results_single = results3[results3$best != -1,]
results_average = results3[results3$average != -1 & results3$average != 0,]
sorted_single = results_single[order(results_single$personName, results_single$eventId, results_single$best),]
unique_single = sorted_single[!duplicated(cbind(sorted_single$personId, sorted_single$eventId)),]
result = rep("single", nrow(unique_single))
unique_single_final = cbind(unique_single[,c(1, 2, 5, 7, 8)], result)
sorted_average = results_average[order(results_average$personName, results_average$eventId, results_average$average),]
unique_average = sorted_average[!duplicated(cbind(sorted_average$personId, sorted_average$eventId)),]
result = rep("average", nrow(unique_average))
unique_average_final = cbind(unique_average[,c(1, 2, 6, 7, 8)], result)
names(unique_single_final)=names(unique_average_final)
unique_results = rbind(unique_single_final, unique_average_final)
unique_competitions = unique_results[!duplicated(cbind(unique_results$personName, unique_results$competitionId)),]
library(plyr)
output = count(unique_competitions, c("personName")) #uses plyr package
sorted_output = output[order(-output$freq),]
names(sorted_output) = c("Competitor", "Number of Competitions")
con <- file("outTable.csv", open="w", encoding="UTF-8")
write.table(sorted_output, con, sep=",",row.names=FALSE)
close(con)
I found a quite easy way to do this directly in SQL, here is the result:
[table="width: 1000, align: left"][tr][td]WCA-ID[/td][td]Name[/td][td]Competitions[/td][/tr]
[tr][td]2008BARA01[/td][td]Bence Barát[/td][td]25[/td][/tr]
[tr][td]2008COUR01[/td][td]François Courtès[/td][td]23[/td][/tr]
[tr][td]2008AURO01[/td][td]Sébastien Auroux[/td][td]22[/td][/tr]
[tr][td]2007PERG01[/td][td]Olivér Perge[/td][td]21[/td][/tr]
[tr][td]2006BUUS01[/td][td]Henrik Buus Aagaard[/td][td]21[/td][/tr]
[tr][td]2011MIKE01[/td][td]Brandon Mikel[/td][td]21[/td][/tr]
[tr][td]2005AKKE01[/td][td]Erik Akkersdijk[/td][td]20[/td][/tr]
[tr][td]2005REYN01[/td][td]Tim Reynolds[/td][td]20[/td][/tr]
[tr][td]2010BENT01[/td][td]Jan Bentlage[/td][td]20[/td][/tr]
[tr][td]2006GALE01[/td][td]Arnaud van Galen[/td][td]20[/td][/tr]
[tr][td]2007GOUL01[/td][td]Joey Gouly[/td][td]20[/td][/tr]
[tr][td]2007POLI01[/td][td]Lorenzo Vigani Poli[/td][td]20[/td][/tr]
[tr][td]2005KOCZ01[/td][td]István Kocza[/td][td]20[/td][/tr]
[tr][td]2008VARG01[/td][td]Dániel Varga[/td][td]20[/td][/tr]
[tr][td]2008TAKA01[/td][td]Yuhei Takagi (高木佑平)[/td][td]20[/td][/tr]
[tr][td]2011SZAT01[/td][td]Wojciech Szatanowski[/td][td]20[/td][/tr]
[tr][td]2004GALL02[/td][td]Clément Gallet[/td][td]19[/td][/tr]
[tr][td]2007JAKU01[/td][td]Marcin Jakubowski[/td][td]19[/td][/tr]
[tr][td]2009OLSO01[/td][td]Christopher Olson[/td][td]19[/td][/tr]
[tr][td]2009HILD01[/td][td]James Hildreth[/td][td]19[/td][/tr]
[tr][td]2007SHIR01[/td][td]Takuma Shirahase (白波瀬拓磨)[/td][td]19[/td][/tr]
[tr][td]2003BRUC01[/td][td]Ron van Bruchem[/td][td]19[/td][/tr]
[tr][td]2005KOSE01[/td][td]Fumiki Koseki (古関章記)[/td][td]19[/td][/tr]
[tr][td]2003VAND01[/td][td]Lars Vandenbergh[/td][td]19[/td][/tr]
[tr][td]2009OHRN01[/td][td]Laura Ohrndorf[/td][td]19[/td][/tr]
[tr][td]2008NIIN01[/td][td]Hideki Niina (新名秀樹)[/td][td]19[/td][/tr]
[tr][td]2004KRIG01[/td][td]Gunnar Krig[/td][td]18[/td][/tr]
[tr][td]2008LINE02[/td][td]Edward Lin[/td][td]18[/td][/tr]
[tr][td]2006GARR01[/td][td]Lucas Garron[/td][td]18[/td][/tr]
[tr][td]2009DIEC01[/td][td]Cornelius Dieckmann[/td][td]18[/td][/tr]
[tr][td]2008HASH02[/td][td]Wataru Hashimura (端村航)[/td][td]17[/td][/tr]
[tr][td]2004KRIG02[/td][td]Kåre Krig[/td][td]17[/td][/tr]
[tr][td]2007BARR01[/td][td]Kian Barry[/td][td]17[/td][/tr]
[tr][td]2010MOFF02[/td][td]Zoé de Moffarts[/td][td]17[/td][/tr]
[tr][td]2011SAKO01[/td][td]Corey Sakowski[/td][td]17[/td][/tr]
[tr][td]2007STRO01[/td][td]Sarah Strong[/td][td]17[/td][/tr]
[tr][td]2008DONG06[/td][td]Baiqiang Dong (董百强)[/td][td]17[/td][/tr]
[tr][td]2007CINO01[/td][td]Rafael Werneck Cinoto[/td][td]17[/td][/tr]
[tr][td]2007LUCH01[/td][td]Chia-Wei Lu (呂家維)[/td][td]17[/td][/tr]
[tr][td]2007SUGA01[/td][td]Nobuaki Suga (菅信昭)[/td][td]17[/td][/tr]
[tr][td]2005BATI01[/td][td]Milán Baticz[/td][td]17[/td][/tr]
[tr][td]2008CLEM01[/td][td]Kit Clement[/td][td]17[/td][/tr]
[tr][td]2009ROHR01[/td][td]Michael Röhrer[/td][td]17[/td][/tr]
[tr][td]2007HUGH01[/td][td]Mike Hughey[/td][td]17[/td][/tr]
[tr][td]2006TABU02[/td][td]Yumu Tabuchi (田渕雄夢)[/td][td]17[/td][/tr]
[tr][td]2010WANG07[/td][td]Yinghao Wang (王鹰豪)[/td][td]17[/td][/tr]
[tr][td]2009PLES01[/td][td]Michał Pleskowicz[/td][td]17[/td][/tr]
[tr][td]2006HALC01[/td][td]Michał Halczuk[/td][td]17[/td][/tr]
[tr][td]2009OKAY01[/td][td]Tomoaki Okayama (岡山友昭)[/td][td]17[/td][/tr]
[tr][td]2006PIRZ01[/td][td]Markus Pirzer[/td][td]16[/td][/tr]
[tr][td]2008KARL02[/td][td]Moritz Karl[/td][td]16[/td][/tr]
[tr][td]2009CHRI03[/td][td]Nora Christ[/td][td]16[/td][/tr]
[tr][td]2008JAFF01[/td][td]Justin Jaffray[/td][td]16[/td][/tr]
[tr][td]2007SUNT01[/td][td]Timothy Sun[/td][td]16[/td][/tr]
[tr][td]2008CLAR01[/td][td]Thompson Clarke[/td][td]16[/td][/tr]
[tr][td]2007VALK01[/td][td]Mats Valk[/td][td]16[/td][/tr]
[tr][td]2009YAUR01[/td][td]Robert Yau[/td][td]16[/td][/tr]
[tr][td]2009SHEP01[/td][td]Daniel Sheppard[/td][td]16[/td][/tr]
[tr][td]2007GUIM01[/td][td]Pedro Santos Guimarães[/td][td]16[/td][/tr]
[tr][td]2007NAKA03[/td][td]Yu Nakajima (中島悠)[/td][td]16[/td][/tr]
[tr][td]2007KRIS01[/td][td]Tomas Kristiansson[/td][td]16[/td][/tr]
[tr][td]2003DENN01[/td][td]Ton Dennenbroek[/td][td]16[/td][/tr]
[tr][td]2008BRAN01[/td][td]Filippo Brancaleoni[/td][td]16[/td][/tr]
[tr][td]2007HESS01[/td][td]Rowe Hessler[/td][td]16[/td][/tr]
[tr][td]2008CHOI04[/td][td]Ilkyoo Choi (최일규)[/td][td]16[/td][/tr]
[tr][td]2013MANO03[/td][td]Alessandro Manopulo[/td][td]16[/td][/tr]
[tr][td]2010TANE01[/td][td]Gaurav Taneja[/td][td]16[/td][/tr]
[tr][td]2009ROST01[/td][td]Anton Rostovikov[/td][td]15[/td][/tr]
[tr][td]2009PETI01[/td][td]Loïc Petit[/td][td]15[/td][/tr]
[tr][td]2009ISHI01[/td][td]Akihiro Ishida (石田朗大)[/td][td]15[/td][/tr]
[tr][td]2011KOWO01[/td][td]Paweł Kowol[/td][td]15[/td][/tr]
[tr][td]2008WEST02[/td][td]Simon Westlund[/td][td]15[/td][/tr]
[tr][td]2006CORR01[/td][td]Devin Corr-Robinett[/td][td]15[/td][/tr]
[tr][td]2012ARTH01[/td][td]Noah Arthurs[/td][td]15[/td][/tr]
[tr][td]2006ARAK01[/td][td]Sinpei Araki (荒木慎平)[/td][td]15[/td][/tr]
[tr][td]2008KLUN01[/td][td]Vidar Norstein Klungre[/td][td]15[/td][/tr]
[tr][td]2009COLO03[/td][td]Matteo Colombo[/td][td]15[/td][/tr]
[tr][td]2007COHE01[/td][td]Dan Cohen[/td][td]15[/td][/tr]
[tr][td]2003POCH01[/td][td]Stefan Pochmann[/td][td]15[/td][/tr]
[tr][td]2008MORE02[/td][td]Hippolyte Moreau[/td][td]15[/td][/tr]
[tr][td]2008OLLE01[/td][td]Alexander Olleta del Molino[/td][td]15[/td][/tr]
[tr][td]2012POHL01[/td][td]Andreas Pohl[/td][td]15[/td][/tr]
[tr][td]2007POLK01[/td][td]Adam Polkowski[/td][td]15[/td][/tr]
[tr][td]2012YANA01[/td][td]Taku Yanai (矢内拓)[/td][td]15[/td][/tr]
[tr][td]2008MAND01[/td][td]Nikhil Mande[/td][td]15[/td][/tr]
[tr][td]2006OOKU01[/td][td]Takayuki Ookusa (大艸尊之)[/td][td]15[/td][/tr]
[tr][td]2008LEEF01[/td][td]Felix Lee[/td][td]15[/td][/tr]
[tr][td]2006DZOA03[/td][td]Dan Dzoan[/td][td]15[/td][/tr]
[tr][td]2008HANK01[/td][td]Kanneti Sae Han (คันธ์เนตี แซ่ห่าน)[/td][td]15[/td][/tr]
[tr][td]2009ZHEN11[/td][td]Ming Zheng (郑鸣)[/td][td]15[/td][/tr]
[tr][td]2008WOJT01[/td][td]Marek Wójtowicz[/td][td]15[/td][/tr]
[tr][td]2011STAC01[/td][td]Marcin Stachura[/td][td]15[/td][/tr]
[tr][td]2010WUIF01[/td][td]Yi-Fan Wu (吳亦凡)[/td][td]15[/td][/tr]
[tr][td]2011YOSH01[/td][td]Ryohei Yoshioka (吉岡亮平)[/td][td]15[/td][/tr]
[tr][td]2008YOUN02[/td][td]Michael Young[/td][td]15[/td][/tr]
[tr][td]2005ZOLN01[/td][td]Tomasz Żołnowski[/td][td]14[/td][/tr]
[tr][td]2009KASU01[/td][td]Sanio Kasumovic[/td][td]14[/td][/tr]
[tr][td]2008TOMI01[/td][td]Takahiro Tomisawa (富沢隆広)[/td][td]14[/td][/tr]
[tr][td]2009KIEL01[/td][td]Tomasz Kiełbasa[/td][td]14[/td][/tr]
[tr][td]2011DWYE02[/td][td]Nathan Dwyer[/td][td]14[/td][/tr]
[/table]
Code:SELECT Results.personId as ID, Results.personName as Person, count(distinct Results.competitionId) as Competitions FROM (`Results` inner join RanksSingle on Results.personId = RanksSingle.personId and Results.eventId = RanksSingle.eventId) inner join RanksAverage on Results.personId = RanksAverage.personId and Results.eventId = RanksAverage.eventId WHERE Results.best = RanksSingle.best or Results.average = RanksAverage.best GROUP BY Results.personId ORDER BY Competitions DESC LIMIT 100
For the top 100 below, note that in the case of a PB tie, I considered the more recent competition and ignored the older competition.
Competitor Number of Competitions 1 François Courtès 26 2 Sébastien Auroux 25 3 Cornelius Dieckmann 24 Henrik Buus Aagaard 24 5 Bence Barát 23 Erik Akkersdijk 23 7 Clément Gallet 22 Hideki Niina (新名秀樹) 22 István Kocza 22 Jan Bentlage 22 Lars Vandenbergh 22 Wojciech Szatanowski 22 13 Arnaud van Galen 21 Christopher Olson 21 Dániel Varga 21 Joey Gouly 21 Lorenzo Vigani Poli 21 Marcin Jakubowski 21 Sinpei Araki (荒木慎平) 21 Tim Reynolds 21 21 Daniel Sheppard 20 Fumiki Koseki (古関章記) 20 Lucas Garron 20 Markus Pirzer 20 Moritz Karl 20 Ron van Bruchem 20 Yuhei Takagi (高木佑平) 20 28 Adam Polkowski 19 Alexander Olleta del Molino 19 Baiqiang Dong (董百强) 19 Gunnar Krig 19 Hippolyte Moreau 19 Kåre Krig 19 Kian Barry 19 Kit Clement 19 Laura Ohrndorf 19 Michael Röhrer 19 Milán Baticz 19 Oscar Alberto Ceballos Contreras 19 Takuma Shirahase (白波瀬拓磨) 19 Tomoaki Okayama (岡山友昭) 19 42 Akihiro Ishida (石田朗大) 18 Andreas Pohl 18 Chunyu Zhang (张春雨) 18 Dan Cohen 18 Edward Lin 18 Filippo Brancaleoni 18 Geert Bicler 18 Ilkyoo Choi (최일규) 18 Javier Tirado Ortiz 18 Marcin Stachura 18 Michał Pleskowicz 18 Mike Hughey 18 Nobuaki Suga (菅信昭) 18 Nora Christ 18 Olivér Perge 18 Paweł Kowol 18 Rowe Hessler 18 Sarah Strong 18 Takayuki Ookusa (大艸尊之) 18 Timothy Sun 18 Ton Dennenbroek 18 Wataru Hashimura (端村航) 18 Yu Nakajima (中島悠) 18 65 Anders Larsson 17 Anton Rostovikov 17 Bhargav Narasimhan 17 Chia-Liang Tai (戴嘉良) 17 Corey Sakowski 17 Dan Dzoan 17 Eric Limeback 17 Felix Lee 17 Gilberto Caracciolo Morelli 17 Jong-Ho Jeong (정종호) 17 Justin Jaffray 17 Loïc Petit 17 Marek Wójtowicz 17 Mats Valk 17 Oleg Gritsenko 17 Pedro Santos Guimarães 17 Rafael Werneck Cinoto 17 Robert Yau 17 Sanio Kasumovic 17 Stefan Pochmann 17 Taku Yanai (矢内拓) 17 Thompson Clarke 17 Weixing Zhang (张炜星) 17 Yohei Oka (岡要平) 17 Yumu Tabuchi (田渕雄夢) 17 90 Antoine Piau 16 Artem Melikian (Артем Мелікян) 16 Brandon Mikel 16 Chester Lian 16 Chia-Wei Lu (呂家維) 16 Devin Corr-Robinett 16 Frank Severinsen 16 Gaurav Taneja 16 Ihor Bilchenko (Ігор Більченко) 16 Jakub Kipa 16 James Hildreth 16 Lars Vennike Nielsson 16 Mariano D'Imperio 16 Michał Halczuk 16 Paweł Włoszek 16 Philippe Virouleau 16 Piotr Frankowski 16 Piotr Kuchta 16 Riadi Arsandi 16 Sanae Omyo (大名佐苗) 16 Simon Westlund 16 Syuhei Omura (大村周平) 16 Takahiro Tomisawa (富沢隆広) 16 Tomas Kristiansson 16 Yu Sajima (佐島優) 16 Zoé de Moffarts 16
Note that unicode characters in R will not work correctly in Windows, this should be done on a Mac to get the clean output.
Code:results = read.csv("WCA_export_Results.tsv", sep="\t", header=T, encoding="UTF-8") results2 = results[results$eventId != "magic" & results$eventId != "mmagic" & results$eventId != "333mbo",] results3 = results2[nrow(results2):1,] results_single = results3[results3$best != -1,] results_average = results3[results3$average != -1 & results3$average != 0,] sorted_single = results_single[order(results_single$personName, results_single$eventId, results_single$best),] unique_single = sorted_single[!duplicated(cbind(sorted_single$personId, sorted_single$eventId)),] result = rep("single", nrow(unique_single)) unique_single_final = cbind(unique_single[,c(1, 2, 5, 7, 8)], result) sorted_average = results_average[order(results_average$personName, results_average$eventId, results_average$average),] unique_average = sorted_average[!duplicated(cbind(sorted_average$personId, sorted_average$eventId)),] result = rep("average", nrow(unique_average)) unique_average_final = cbind(unique_average[,c(1, 2, 6, 7, 8)], result) names(unique_single_final)=names(unique_average_final) unique_results = rbind(unique_single_final, unique_average_final) unique_competitions = unique_results[!duplicated(cbind(unique_results$personName, unique_results$competitionId)),] library(plyr) output = count(unique_competitions, c("personName")) #uses plyr package sorted_output = output[order(-output$freq),] names(sorted_output) = c("Competitor", "Number of Competitions") con <- file("outTable.csv", open="w", encoding="UTF-8") write.table(sorted_output, con, sep=",",row.names=FALSE) close(con)
Asked this question earlier in June, interesting how results of changed, also kit step up your code game.
Finally bothered to figure out how to generate the PB streaks list using Stefan's code from the previous update, which I have quoted below (August 28, 2014). I cut the updated list off at a minimum streak of 30 competitions (51 people total). I knew I had tied Mats, but didn't know whether or not someone else had passed us.
Code:Evan Liu 47 (ongoing) Mats Valk 47 (ended at AmstelveenOpen2012) Kevin Costello III 45 (ended at LexingtonFall2015) Christopher Olson 43 (ended at FieldOfCubes2015) Thompson Clarke 43 (ongoing) Sébastien Auroux 42 (ended at GHSIngenhovenparkOpen2011) Hunor Bózsing 41 (ended at FMCEurope2015) Tim Reynolds 41 (ended at MITFall2010) Robert Yau 40 (ongoing) Bence Barát 39 (ended at ZonhovenOpen2012) Milán Baticz 39 (ended at RomanianOpen2012) Gaël Dusser 38 (ended at RubikkuChamp2012) Jan Bentlage 38 (ended at HessenOpen2013) Mike Hughey 38 (ended at DixonSummer2013) Wojciech Szatanowski 38 (ended at PoznanOpen2014) Geert Bicler 37 (ended at HEMMariCubikOpen2013) Michael Gottlieb 37 (ongoing) Bhargav Narasimhan 36 (ongoing) Daniel Sheppard 36 (ended at Euro2014) Marco Rota 36 (ongoing) Kit Clement 35 (ended at MishawakaFall2014) Nathan Dwyer 35 (ended at FMCUSA2014) Jakub Cabaj 34 (ended at PolishOpen2013) Michael Röhrer 34 (ended at MunichOpen2013) Brúnó Bereczki 33 (ended at GELOpen2012) Dan Dzoan 33 (ended at BerkeleyFall2009) Javier Tirado Ortiz 33 (ended at DualGames2013) Mike Kotch 33 (ended at WC2013) Nikhil Mande 33 (ongoing) Artem Melikian 32 (ongoing) Chunyu Zhang 32 (ended at HefeiOpen2015) Louis Cormier 32 (ended at NationalCapitalRegion2015) Mariano D'Imperio 32 (ongoing) Michael Kristel 32 (ended at GermanNationals2015) Ryohei Yoshioka 32 (ended at KansaiOpen2014) Bertalan Bodor 31 (ended at HungarianOpen2015) Lucas Etter 31 (ongoing) Nathaniel Berg 31 (ended at OsloFall2015) Niklas Spies 31 (ended at AachenSummer2012) Simon Westlund 31 (ongoing) Tiemen De Meester 31 (ongoing) Yumu Tabuchi 31 (ended at UTOpen2013) Andrew Coghill 30 (ongoing) Blake Thompson 30 (ended at FantabulousMichigan2015) Corey Sakowski 30 (ended at Newark2013) Edward Lin 30 (ended at CalDay2012) Henrik Buus Aagaard 30 (ended at VejstrupOpen2011) Joshua Feran 30 (ongoing) Sebastian Weyer 30 (ended at GermanOpen2015) Tomoaki Okayama 30 (ended at JapanOpen2012) Wilhelm Kilders 30 (ongoing)
Faz's new 7x7 WR is faster than the #2 7x7 single, how many times has this occurred throughout all events?
Faz's new 7x7 WR is faster than the #2 7x7 single, how many times has this occurred throughout all events?
Lin Chen had sub-3 avg before anyone else had sub 3 single iirc. I think Yu Da-Hyun could conceivably do it for mega.
I think Yu Da Hyun could have before but now I'm not so sure...