# setwd("C:/Users/james/Dropbox/Code/RegretforStochasticMWU")
# run source("MWUUpdates.R") first
# run source("Regret.R") next
# source("LogRegretTest.R")


#####################################INITIALIZE FOR USE

MRegret1<-MRegret1[1:(frames-1)]


LogMRegret1 <- log(MRegret1[MRegret1>0])
x<- 1:(frames-1)
LogT= log(x[MRegret1>0])

fit<- lm(LogMRegret1 ~ LogT)

# fit$coefficients[2] gives the power
# summary(fit)$r.squared gives the R-Squared value

##########################