RosettaCodeData/Task/Runge-Kutta-method/Racket/runge-kutta-method-4.rkt
2015-02-20 09:02:09 -05:00

4 lines
192 B
Racket

> (require plot)
> (plot (list (function exact-solution 0 10 #:label "Exact solution")
(points numeric-solution #:label "Runge-Kutta method"))
#:x-label "t" #:y-label "y(t)")