I get the following error when attempting to impute missing data in the attached dataset: 

 1 Error in eigen(thetanew[2:nrow(thetanew), 2:ncol(thetanew)], only.values = TRUE,  : 
  infinite or missing values in 'x'

A summary of the data set reveals no column with entirely missing or constant values, and if I reduce the tolerance greatly, the problem goes away.