Create compositesimpson13.m

kwyip · Jul 2, 2017 · 446e97c · 446e97c
1 parent 76c1b28
commit 446e97c
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/compositesimpson13.m b/compositesimpson13.m
@@ -0,0 +1,4 @@
+function csimpson = compositesimpson13(f,a,b,n) 
+h=(b-a)/n; 
+xi=a:h:b;
+csimpson = h/3*(f(xi(1))+2*sum(f(xi(3:2:end-2)))+4*sum(f(xi(2:2:end)))+f(xi(end)));