title: Labels for histogram, when using "lapply"
body: <p>I wrote the following function to get the histogram for more than one variable, it works, but it doesn't display the header even though I have used the <code>main</code> argument. </p>
  
  <pre><code>lapply(c("avg_ed","api00","api99"), function(s){hist(mydata[s],main="Histogram of [s]")})
  </code></pre>
  
  <p>dataset used: <a href="http://www.math.montana.edu/~jimrc/classes/stat408/data/elemapi.csv" rel="nofollow">http://www.math.montana.edu/~jimrc/classes/stat408/data/elemapi.csv</a></p>