User Portlet User Portlet

Discussions
Hello, I made a QR code and export it in this way BarcodeImage["http://www.wolfram.com/", "QR"] Export["QR.pdf", %] but while i can scale the output of BarcodeImage without loss quality, if i scale the pdf (for example with Acrobat...
If I use the function ContourPlot, eg ContourPlot[y == x, {x, -1, 1}, {y, -1, 1}] when I put the mouse on the line, it the equation "y==x" appears. This does not happen with the Plot function. Is there some way to obtain a similar...
Why if I plot Plot[Table[a x, {a, 5}], {x, -3, 3}] all the lines have same colour but if I separate in this way Table[a x, {a, 5}]; Plot[%, {x, -3, 3}] the lines have different colour?