<< Graphics`Legend`   
\(Plot[{Sin[\(π\/2\) x], Cos[π\ x]}, {x, 0, 
        2  π}, 
Axes -> True, \ \ \ \ \  (*\ 
        visualizza\ o\ no\ gli\ assi\ *) 
AxesStyle -> {RGBColor[0.8, 0.8, 0.8], Thickness[0.0001]}, \  (*\ 
        stile\ degli\ assi\ *) 
AxesLabel -> {"x", "y"}, 
AxesOrigin -> {0,  .5}, 
Ticks -> {{0, π\/2, {π, 
              pigreco}, {\(3\/2\) π, \*""(3/2)π""}, {2  π, \*""(∑_(k = 0)^(+∞))(π/(2^k))""}}, Automatic}, \  (*\ 
        tacche\ sui\ due\ assi\  - \ 
          da\ notare\ che\ permette\ anche\ per\ un\ certo\ valore\ di\ inserire\ un' 
            etichetta\ personalizzata\ *) 
PlotStyle -> {{RGBColor[1, 0, 0], 
            Dashing[{ .01,  .005}]}, {RGBColor[0, 0, 1]}}, \  (*\ 
        stile\ dei\ grafici\ con\ esempio\ di\ uso\ della\ funzione\ Dashing\ *) 
PlotLabel -> "Seni e Coseni", 
PlotRange -> 
        All, 
AspectRatio -> 
        Automatic, 
PlotLegend -> {\*""Sin((π/2)x)"", "Cos(πx)"}, \  (*\ 
        comando\ per\ la\ legenda\ *) 
LegendPosition -> {\(-1\), \(-0.7\)}, \  (*\ 
        posizione\ della\ legenda\ *) 
LegendShadow -> { .01,  .01}, \ \ \ \ \  (*\ 
        posizione\ dell' 
          ombra\ della\ legenda\ *) 
LegendSize -> { .35,  .35}, \  (*\ 
        grandezza\ della\ legenda\ *) 
LegendLabel -> "Λϵγϵνδα", \ \ \ \ \  (*\ 
        etichetta\ della\ legenda\ *) 
LegendBackground -> {RGBColor[1, 1, 0]}\ \ \ \ \  (*\ 
        sfondo\ della\ legenda\ *) 
]\)