Displaying 1 result from an estimated 1 matches for "thlist".
Did you mean:
hlist
2011 Aug 15
0
Indexing Permutation Values
...quot;), row.names = c(NA,
20L), class = "data.frame")
install.packages("Hmisc", dependencies = T)
library(Hmisc)
bestDeltas= 0; betterThanChance = 0; minErr = 0
fitProp<- 0
thresholded_test <- 0
calc.probs <- function(delta,gamma){
# initial starting probabilities
thList = 0
block = 0
# finMatrix <- 0
for (i in 1:length(dat2$choice))
{
if (dat2$RepNum[i] != block)
{
pL = 0.5
pR = 0.5
block = dat2$RepNum[i]
certState = 0.5
}
# Markov Transitions
pL <- pL*(1-delta) + pR*delta
pR <- 1...