gwern comments on Poll - Is endless September a threat to LW and what should be done? - Less Wrong

4 Post author: Epiphany 08 December 2012 11:42PM

You are viewing a comment permalink. View the original post to see all comments and the full post content.

Comments (259)

You are viewing a single comment's thread. Show more comments above.

Comment author: gwern 09 December 2012 07:00:11PM 4 points [-]

Some absolute figures:

R> lw2009 <- read.csv("2009.csv"); lw2011 <- read.csv("2011.csv"); lw2012 <- read.csv("2012.csv")
R>
R> sum(as.integer(as.character(lw2009$IQ)) > 140, na.rm=TRUE)
[1] 31
R> sum(as.integer(as.character(lw2011$IQ)) > 140, na.rm=TRUE)
[1] 131
R> sum(as.integer(as.character(lw2012$IQ)) > 140, na.rm=TRUE)
[1] 120
R>
R> sum(as.integer(as.character(lw2009$IQ)) > 150, na.rm=TRUE)
[1] 20
R> sum(as.integer(as.character(lw2011$IQ)) > 150, na.rm=TRUE)
[1] 53
R> sum(as.integer(as.character(lw2012$IQ)) > 150, na.rm=TRUE)
[1] 42