利用Table生成的函数表绘图时，绘图标签不能完全显示？

Question

Plot[Table[
  lb*Subscript[\[Lambda], b], {lb, 3}], {Subscript[\[Lambda], b], 1, 
  5}, PlotLabels -> {1, 2, 3}]

图形结果如下

标签显示不全

Plot[{Subscript[\[Lambda], b], 2 Subscript[\[Lambda], b], 
  3 Subscript[\[Lambda], b]}, {Subscript[\[Lambda], b], 1, 5}, 
 PlotLabels -> {1, 2, 3}]

图形结果如下

能完全显示标签

 

请问这两种情况为什么不同？

Answer 1

经验告诉我，Plot里需要用Evaluate，所以你的第一种用法可以改为

Plot[Evaluate@Table[lb*Subscript[\[Lambda], b], {lb, 3}], {Subscript[\[Lambda], 
    b], 1, 5}, PlotLabels -> {1, 2, 3}]

具体原因参考贴吧吧主的这贴http://tieba.baidu.com/p/4886024974和https://mathematica.stackexchange.com/questions/13906/how-can-i-mark-each-of-several-plots-with-a-parameter-that-identifies-it/125331#125331

Comments

感谢你的回答，问题已经解决了，参考贴也看过了，还没有完全理解，以后慢慢学习了O^O