octave/plotf.m

function plotf(x, f)
  for k=1:length(x)
    y(k)=f(x(k))
  endfor
  plot(x, y)
endfunction