This shiny app simulates a model where part-time work is preferred over full-time work, if not for the chance to get a top position. Moreover it shows what happens if men get preferred over women with similar talent.
The article using the app is here: http://me.vanelp.com/post/emancipation-and-causation/