u = (3,0,1,4,2,6,4) v = (1,2,3,4,5,6,7) plot w = u + v
u = {3,0,1,4,2,6,4} v = Range[1,7] w = u+v; ListPlot[w]
u = [3,0,1,4,2,6,4] v = linspace(1,7,7) w = u+v plot(w)
with(LinearAlgebra): u := Vector[row]([3,0,1,4,2,6,4]); v := Vector[row](7, n->n); w := u+v; plot( [seq([i,w[i]],i=1..7)] );
u = [3,0,1,4,2,6,4] v = findgen(7)+1 w = u+v; plot, w