Skip to content
Permalink
master
Switch branches/tags
Go to file
 
 
Cannot retrieve contributors at this time
36 lines (26 sloc) 922 Bytes
#
# feldman_cases76.R, 1 Dec 16
# Data from:
# Minimization of Boolean complexity in human concept learning
# Jacob Feldman
#
# Example from:
# Evidence-based Software Engineering: based on the publicly available data
# Derek M. Jones
#
# TAG experiment_human human_learning concept_learning
source("ESEUR_config.r")
pal_col=rainbow(3)
feld=read.csv(paste0(ESEUR_dir, "developers/feldman_cases76.csv.xz"), as.is=TRUE)
feld$col=pal_col[feld$P-1]
up=subset(feld, Parity == "up")
down=subset(feld, Parity == "down")
# plot(up$BC, up$PropCorr*100, col=up$col, pch=2,
plot(feld$BC, feld$PropCorr*100, col=feld$col,
xlab="Boolean complexity", ylab="Percent correct\n")
# points(down$BC, down$PropCorr*100, col=up$col, pch=6)
legend(x="bottomleft", legend=c("P = 2", "P = 3", "P = 4"), bty="n", fill=pal_col, cex=1.2)
# library("betareg")
#
# f_mod=betareg(PropCorr ~ Parity+BC+Parity:P, data=feld)
# summary(f_mod)