# NOT RUN {
rank <- 3
satPercent <- 0.5
#Grid must be same as rank
grid <- gridThreeUp
#Folder to save html/
#setwd("~/desktop")
#filePath<- getwd()
#Generate item
mazeHTML(rank,satPercent,seed=5,grid = grid,wd=NULL,
background="#7abcff",boxBackground="#66CDAA", fontColour="white ",
Timer=TRUE, concerto="C5")
# }
Run the code above in your browser using DataLab