K means error

When I try to run k means, I get the following error. I'm not exactly sure how to address it.

> mykm <- hpdkmeans(B,centers=15)
Error in foreach(i, 1:nparts, progress = trace, function(tempArrayi = splits(tempArray,  :
  splits() failure: Object mask does not have as many partitions as specified