function tracevpd(a, t0, T, Neuler, Nptmil, Nrk4, Node)
    // Approximation euler
    u = euler(a, t0, T, Neuler, vdp);
    
    // Approximation point milieu
    v = pointmilieu(a, t0, T, Nptmil, vdp);
    
    // Approximation runge kutta 4
    w = rk4(a, t0, T, Nrk4, vdp);
    
    // Approximation ode
    tode = linspace(t0, T, Node+1);
    y = ode(a, t0, tode, vdp)
    
    // Euler
    plot(u(1,:), u(2,:), '+');
    
    // Pt milieu
    plot(v(1,:), v(2,:), 'yo');
    
    // RK4
    plot(w(1,:), w(2,:), 'black.');
    
    // ODE
    plot(y(1,:), y(2,:), 'rx');
    
    title('VDP');
endfunction