diff options
Diffstat (limited to '291/CH7/EX7.8b')
-rwxr-xr-x | 291/CH7/EX7.8b/eg7_8b.sce | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/291/CH7/EX7.8b/eg7_8b.sce b/291/CH7/EX7.8b/eg7_8b.sce new file mode 100755 index 000000000..3bd50dc71 --- /dev/null +++ b/291/CH7/EX7.8b/eg7_8b.sce @@ -0,0 +1,8 @@ +function result= meanestimator(sigma0 , u, sigma, n, X)
+ meanX= mean(X);
+ result = (n*meanX/sigma0)/((n/sigma0)+(1/sigma)) + (u/sigma)/((n/sigma0)+(1/sigma));
+endfunction
+
+function result= varestimator(sigma0 , sigma, n)
+ result = (sigma0*sigma)/((n*sigma)+sigma0);
+endfunction
\ No newline at end of file |