sgaure Fixed accidental dim=lapply -> dim=sapply