## another drawer of socks

A socks riddle from the Riddler but with no clear ABC connection! Twenty-eight socks from fourteen pairs of socks are taken from a drawer, one by one, and laid on a surface that only fit nine socks at a time, with complete pairs removed. What is the probability that all pairs are stored without running out of space? No orphan socks then!!

Writing an R code for this experiment is straightforward

```for(v in 1:1e6){
S=sample(rep(1:14,2))
x=S[1]
for(t in 2:18){
if(S[t]%in%x){x=x[S[t]!=x]}else{x=c(x,S[t])}
if(sum(!!x)>9){
F=F+1;break()}}}
```

and it returns a value quite close to 0.7 for the probability of success. I was expecting a less brute-force resolution but the the Riddler only provided the answer of 70.049 based on the above tree of probabilities (which I was too lazy to code).

### One Response to “another drawer of socks”

1. […] article was first published on R – Xi’an’s Og, and kindly contributed to R-bloggers]. (You can report issue about the content on this page […]

This site uses Akismet to reduce spam. Learn how your comment data is processed.