Minor changes to the code, removed as.double function from return value in lwlr; added comments; added  number of images reflecting plots of different tau values at 500 res