title: How do you retrieve the title of a plot device window?
body: <p>You can set the title of a plot device window with </p>
  
  <pre><code>windows(title = "The title")
  #or equivalently
  x11(title = "The title")
  </code></pre>
  
  <p>How you retrieve the title from a plot device window?</p>
  
  <p><code>names(dev.cur())</code>, <code>attributes(dev.cur())</code>, <code>str(dev.cur())</code> and <code>unclass(dev.cur())</code> don't reveal anything useful.</p>