Advertisement
Hagelberganton

Untitled

Dec 4th, 2018
72
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.41 KB | None | 0 0
  1. %Simpsons och trapetsregeln
  2. b = 3.2;
  3. h = 10;
  4. N = b/h;
  5. a = 0;
  6. trapets = zeros();
  7. x = a:h:b;
  8. %V = pi*int(((y(x)).^2),[a b]);
  9. for i = 1:N
  10. xk = a + (i - 1)*h;
  11. trapets(i) = (y(xk) + y(a + i*h))/2;
  12. end
  13.  
  14. trapetssum = sum(trapets);
  15. figure(1)
  16. plot(0:N-1,trapets)
  17.  
  18.  
  19. %simpsons
  20.  
  21. for i = 1:N
  22. x(i) = i*h;
  23.  
  24.  
  25. end
  26.  
  27.  
  28.  
  29.  
  30. function f = y(x)
  31. f = (7 + cos(x.^2 - 1))/(2 - cos(pi.*x));
  32. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement