title: Mathematica: Characters overlap in rotated text
body: <p>There seems to be a problem with rotating text that contains both normal and "script" characters. To illustrate this I've written a short function:</p>
  
  <pre><code>RotatePrint[s_String] :=
    GraphicsRow[Table[
      Graphics[Rotate[Text[Style[s, 50]], j]] // ImageCrop,
      {j, 0, 2 Pi, Pi/4}]]
  </code></pre>
  
  <p><code>RotatePrint["Sc"]</code>, i.e. with two normal characters, works as expected:</p>
  
  <p><img src="https://i.stack.imgur.com/2DH4V.gif" alt="Two normal characters"></p>
  
  <p><code>RotatePrint["\[ScriptCapitalS]\[ScriptC]"]</code>, i.e. with two "script" characters, works just as well:</p>
  
  <p><img src="https://i.stack.imgur.com/86F8N.gif" alt="Two script characters"></p>
  
  <p><code>RotatePrint["\[ScriptCapitalS]c"]</code>, i.e. with a mix of normal and script characters, however, behaves strangely:</p>
  
  <p><img src="https://i.stack.imgur.com/JVhkf.gif" alt="Mixed characterse"></p>
  
  <p>What I find especially peculiar is that the overlap does not happen for the rotation angle Pi/2.</p>
  
  <p>Thanks for your help!</p>
  
  <p>Edit1: I know one can work around this by using <code>ImageRotate</code> instead of <code>Rotate</code> but this doesn't solve the problem per se.</p>
  
  <p>Edit2: Since this seems to depend on the operating system and Mathematica version: I use Mathematica v8.0.0.0 on Windows 7 64-bit.</p>