Add shift argument to cluster()
Correct defintion of k1g