diff options
Diffstat (limited to '260/CH9/EX9.4/9_4.sce')
| -rw-r--r-- | 260/CH9/EX9.4/9_4.sce | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/260/CH9/EX9.4/9_4.sce b/260/CH9/EX9.4/9_4.sce new file mode 100644 index 000000000..bc8e7b295 --- /dev/null +++ b/260/CH9/EX9.4/9_4.sce @@ -0,0 +1,18 @@ +
+//Eg-9.4
+//pg-394
+
+clear
+clc
+clc;
+clear;
+
+deff('[z]=f(x)','z=(x^4-2*x^2)*sin(x)');
+x1=-1:.2:1;
+//values of fx obtained manually
+
+fx1=[.841471;0.624387;.333365;.114645;.015576;0;-.015576;-.114645;-.333365;-.624387;-.841471];
+
+plot(x1,feval(x1,f));
+set(gca(),"auto_clear","off")
+plot(x1,fx1,'*');
|