User:J lover

love =: (**)(+,:-)[:%:1:-*:

require 'plot'
'aspect 1;color red' plot (];love) i:1j100

... also likes awk (and sed, Forth, Tcl, ...) -- and Pure Data!