(require plot)

(plot (line identity (color 'red)))