Single-particle magnetic moments in a relativistic shell model