EVALUATION BENCHMARKS:
Arithmetic
  '1 + 2'
    10000 loops, avg:  148 us, best:  130 us, median:  136 us per loop
  '5 * 3'
    10000 loops, avg:  152 us, best:  132 us, median:  136 us per loop

DensityPlot
  'DensityPlot[x + y^2, {x, -3, 3}, {y, -2, 2}]'
        5 loops, avg:  276 ms, best:  232 ms, median:  239 ms per loop

Expand
  'Expand[(a1+a2)^200]'
        5 loops, avg:  369 ms, best:  324 ms, median:  332 ms per loop
  'Expand[(a1+a2+a3)^25]'
        5 loops, avg:  808 ms, best:  728 ms, median:  806 ms per loop
  'Expand[(a1+a2+a3+a4+a5+a6+a7)^3]'
      100 loops, avg: 86.6 ms, best: 82.9 ms, median: 84.1 ms per loop

Matrix
  'RandomInteger[{0,1}, {10,10}] . RandomInteger[{0,1}, {10,10}]'
       10 loops, avg:  207 ms, best:  199 ms, median:  201 ms per loop
  'RandomInteger[{0,10}, {10,10}] + RandomInteger[{0,10}, {10,10}]'
      100 loops, avg:   23 ms, best: 21.6 ms, median: 22.1 ms per loop

Plot
  'Plot[0, {x, -3, 3}]'
      100 loops, avg: 45.7 ms, best: 43.3 ms, median: 44.2 ms per loop
  'Plot[x^2 + x + 1, {x, -3, 3}]'
        5 loops, avg:  334 ms, best:  331 ms, median:  332 ms per loop
  'Plot[Sin[Cos[x^2]], {x, -3, 3}]'
        5 loops, avg:  1.1 s , best: 1.06 s , median: 1.07 s  per loop
  'Plot[Sin[100 x], {x, -3, 3}]'
        5 loops, avg:  717 ms, best:  699 ms, median:  702 ms per loop

Plot3D
  'Plot3D[0, {x, -1, 1}, {y, -1, 1}]'
      100 loops, avg:  110 ms, best: 97.4 ms, median: 98.9 ms per loop
  'Plot3D[x + y^2, {x, -3, 3}, {y, -2, 2}]'
        5 loops, avg:  312 ms, best:  279 ms, median:  283 ms per loop
  'Plot3D[Sin[x + y^2], {x, -3, 3}, {y, -3, 3}]'
        5 loops, avg:  918 ms, best:  873 ms, median:  940 ms per loop
  'Plot3D[Sin[100 x + 100 y ^ 2], {x, 0, 1}, {y, 0, 1}]'
        5 loops, avg:  940 ms, best:  902 ms, median:  917 ms per loop

Random
  'RandomInteger[{-100, 100}, 100]'
     1000 loops, avg: 2.09 ms, best: 2.02 ms, median: 2.05 ms per loop
  'RandomInteger[10, {10, 10}]'
     1000 loops, avg: 2.33 ms, best: 2.25 ms, median: 2.29 ms per loop
  'RandomInteger[{0,1}, {5, 5, 5}]'
     1000 loops, avg: 3.02 ms, best: 2.74 ms, median: 2.89 ms per loop
  'RandomReal[1, 100]'
     1000 loops, avg: 2.52 ms, best: 2.29 ms, median: 2.37 ms per loop
  'RandomReal[{-1, 1}, 100]'
     1000 loops, avg:  2.3 ms, best: 2.13 ms, median: 2.16 ms per loop
  'RandomComplex[2 + I, 50]'
     1000 loops, avg: 1.98 ms, best:  1.8 ms, median: 1.83 ms per loop
  'RandomComplex[{-1 - I, 1 + I}, {10, 10}]'
     1000 loops, avg: 3.81 ms, best: 3.43 ms, median: 3.52 ms per loop

Trig
  'Sin[RandomReal[]]'
     5000 loops, avg:  909 us, best:  863 us, median:  879 us per loop
  'ArcTan[RandomReal[]]'
     5000 loops, avg:  784 us, best:  729 us, median:  749 us per loop