Control of a Robot Dancer for Enhancing Haptic Human-Robot Interaction in Waltz