Advertisement
Guest User

Untitled

a guest
Dec 5th, 2019
109
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Julia 0.84 KB | None | 0 0
  1. using Plots
  2. using DifferentialEquations
  3.  
  4. function f(tp)
  5.     t = rem.(tp,5)
  6.     y = 3t .* (t .< 1) .+ (-1/2 * t .+ 7/2) .* ((t .≥ 1) .& (t .< 3))  .+ 2 .* ((t .≥ 3) .& (t .< 4)) .+ (-2x .+ 10) .*((t .≥ 4) .& (t .< 5))
  7. end
  8.  
  9. function sistem!(dx, x, p, t)
  10.     M1, M2, C1, C2, k1, k2 = p
  11.     F = f(t)
  12.     dx[1] = x[2]
  13.     dx[2] = (1/M1) * (-C1 * x[2] + k1 * x[1] + k2 * (x[1] - x[3]) - F
  14.     dx[3] = x[4]
  15.     dx[4] = (1/M2) * (-C2 * x[4] - k2 * (x[1] - x[3]))
  16. end
  17.  
  18. params = [2.0, 1.0, 3.0, 6.0, 5.0, 15.0]
  19. pocUsl = [0.0, 0.0, 0.0, 0.0]
  20. interval = (0.0, 10.0)
  21. prob = ODEProblem(sistem!, pocUsl, interval, params)
  22. sol = solve(prob)
  23. brz1 = [sol.u[i][2] for i = 0:length(sol.t)]
  24. brz2 = [sol.u[i][4] for i = 0:length(sol.t)]
  25. plot(sol.t, [brz1, brz2], label = ["v1[t]", "v2[t]"], title = "Brzine", lw = 2, xlabel = "t", ylabel = "v(t)")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement