Mercurial > forge

changeset 9853:a230c5f9e41f octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Replace deprecated function calls
author thomas-weber
date Sat, 24 Mar 2012 18:58:52 +0000
parents f7a12f558e7c
children d501de70575a
files main/econometrics/inst/gmm_example.m main/econometrics/inst/gmm_results.m
diffstat 2 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/main/econometrics/inst/gmm_example.m	Sat Mar 24 18:38:45 2012 +0000
+++ b/main/econometrics/inst/gmm_example.m	Sat Mar 24 18:58:52 2012 +0000
@@ -25,7 +25,7 @@
 w = [x, rand(n,1)];
 theta_true = ones(k,1);
 lambda = exp(x*theta_true);
-y = poisson_rnd(lambda);
+y = poissrnd(lambda);
 [xs, scalecoef] = scale_data(x);
 
 # The arguments for gmm_estimate
--- a/main/econometrics/inst/gmm_results.m	Sat Mar 24 18:38:45 2012 +0000
+++ b/main/econometrics/inst/gmm_results.m	Sat Mar 24 18:58:52 2012 +0000
@@ -88,7 +88,7 @@
 	df = n - k;
 	if df > 0
 		clabels = char("Value","df","p-value");
-		a = [n*obj_value, df, 1 - chisquare_cdf(n*obj_value, df)];
+		a = [n*obj_value, df, 1 - chi2cdf(n*obj_value, df)];
 		printf("\n");
 		prettyprint(a, junk, clabels);
 	else
@@ -96,7 +96,7 @@
 	end;
 
 	# results for parameters
-	a =[theta, se, theta./se, 2 - 2*normal_cdf(abs(theta ./ se))];
+	a =[theta, se, theta./se, 2 - 2*normcdf(abs(theta ./ se))];
 	clabels = char("estimate", "st. err", "t-stat", "p-value");
 	printf("\n");
 	prettyprint(a, names, clabels);