[rkward-cvs] SF.net SVN: rkward: [990] trunk/rkward/rkward/plugins/distributions
tfry at users.sourceforge.net
tfry at users.sourceforge.net
Tue Dec 5 11:22:57 UTC 2006
Revision: 990
http://svn.sourceforge.net/rkward/?rev=990&view=rev
Author: tfry
Date: 2006-12-05 03:22:57 -0800 (Tue, 05 Dec 2006)
Log Message:
-----------
Some cosmetics: Do assignment with <- instead of =
Modified Paths:
--------------
trunk/rkward/rkward/plugins/distributions/beta_probabilities.php
trunk/rkward/rkward/plugins/distributions/beta_quantiles.php
trunk/rkward/rkward/plugins/distributions/binomial_quantiles.php
trunk/rkward/rkward/plugins/distributions/binomial_tail_probabilities.php
trunk/rkward/rkward/plugins/distributions/cauchy_probabilities.php
trunk/rkward/rkward/plugins/distributions/cauchy_quantiles.php
trunk/rkward/rkward/plugins/distributions/chi_squared_quantiles.php
trunk/rkward/rkward/plugins/distributions/exponential_probabilities.php
trunk/rkward/rkward/plugins/distributions/exponential_quantiles.php
trunk/rkward/rkward/plugins/distributions/f_quantiles.php
trunk/rkward/rkward/plugins/distributions/gamma_probabilities.php
trunk/rkward/rkward/plugins/distributions/gamma_quantiles.php
trunk/rkward/rkward/plugins/distributions/geom_probabilities.php
trunk/rkward/rkward/plugins/distributions/geom_quantiles.php
trunk/rkward/rkward/plugins/distributions/gumbel_probabilities.php
trunk/rkward/rkward/plugins/distributions/gumbel_quantiles.php
trunk/rkward/rkward/plugins/distributions/hypergeometric_probabilities.php
trunk/rkward/rkward/plugins/distributions/hypergeometric_quantiles.php
trunk/rkward/rkward/plugins/distributions/log_normal_probabilities.php
trunk/rkward/rkward/plugins/distributions/log_normal_quantiles.php
trunk/rkward/rkward/plugins/distributions/logistic_probabilities.php
trunk/rkward/rkward/plugins/distributions/logistic_quantiles.php
trunk/rkward/rkward/plugins/distributions/negative_binomial_probabilities.php
trunk/rkward/rkward/plugins/distributions/negative_binomial_quantiles.php
trunk/rkward/rkward/plugins/distributions/normal_probabilities.php
trunk/rkward/rkward/plugins/distributions/normal_quantiles.php
trunk/rkward/rkward/plugins/distributions/poisson_probabilities.php
trunk/rkward/rkward/plugins/distributions/poisson_quantiles.php
trunk/rkward/rkward/plugins/distributions/t_probabilities.php
trunk/rkward/rkward/plugins/distributions/t_quantiles.php
trunk/rkward/rkward/plugins/distributions/tukey_probabilities.php
trunk/rkward/rkward/plugins/distributions/tukey_quantiles.php
trunk/rkward/rkward/plugins/distributions/uniform_probabilities.php
trunk/rkward/rkward/plugins/distributions/uniform_quantiles.php
trunk/rkward/rkward/plugins/distributions/weibull_probabilities.php
trunk/rkward/rkward/plugins/distributions/weibull_quantiles.php
trunk/rkward/rkward/plugins/distributions/wilcoxon_probabilities.php
trunk/rkward/rkward/plugins/distributions/wilcoxon_quantiles.php
Modified: trunk/rkward/rkward/plugins/distributions/beta_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/beta_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/beta_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (pbeta (q = <? echo ($q); ?>, shape1 = <? getRK ("shape1"); ?>, shape2 = <? getRK ("shape2"); ?>, ncp = <? getRK ("ncp"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (pbeta (q = <? echo ($q); ?>, shape1 = <? getRK ("shape1"); ?>, shape2 = <? getRK ("shape2"); ?>, ncp = <? getRK ("ncp"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/beta_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/beta_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/beta_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -7,7 +7,7 @@
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qbeta (p = <? echo ($p); ?>, shape1 = <? getRK ("shape1"); ?>, shape2 = <? getRK ("shape2"); ?>, ncp = <? getRK ("ncp"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (qbeta (p = <? echo ($p); ?>, shape1 = <? getRK ("shape1"); ?>, shape2 = <? getRK ("shape2"); ?>, ncp = <? getRK ("ncp"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/binomial_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/binomial_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/binomial_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qbinom (p = <? echo ($p); ?>, size = <? getRK ("size"); ?>, prob = <? getRK ("prob"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
+rk.temp <- (qbinom (p = <? echo ($p); ?>, size = <? getRK ("size"); ?>, prob = <? getRK ("prob"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/binomial_tail_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/binomial_tail_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/binomial_tail_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (pbinom (q = <? echo ($q); ?>, size = <? getRK ("size"); ?>, prob = <? getRK ("prob"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
+rk.temp <- (pbinom (q = <? echo ($q); ?>, size = <? getRK ("size"); ?>, prob = <? getRK ("prob"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/cauchy_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/cauchy_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/cauchy_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (pcauchy (q = <? echo ($q); ?>, location = <? getRK ("location"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (pcauchy (q = <? echo ($q); ?>, location = <? getRK ("location"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/cauchy_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/cauchy_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/cauchy_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qcauchy (p = <? echo ($p); ?>, location = <? getRK ("location"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (qcauchy (p = <? echo ($p); ?>, location = <? getRK ("location"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/chi_squared_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/chi_squared_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/chi_squared_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qchisq (p = <? echo ($p); ?>, df = <? getRK ("df"); ?>, ncp = <? getRK ("ncp"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
+rk.temp <- (qchisq (p = <? echo ($p); ?>, df = <? getRK ("df"); ?>, ncp = <? getRK ("ncp"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/exponential_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/exponential_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/exponential_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -7,7 +7,7 @@
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (pexp (q = <? echo ($q); ?>, rate = <? getRK ("rate"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (pexp (q = <? echo ($q); ?>, rate = <? getRK ("rate"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/exponential_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/exponential_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/exponential_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qexp (p = <? echo ($p); ?>, rate = <? getRK ("rate"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (qexp (p = <? echo ($p); ?>, rate = <? getRK ("rate"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/f_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/f_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/f_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qf (p = <? echo ($p); ?>, df1 = <? getRK ("df1"); ?>, df2 = <? getRK ("df2"); ?>, <? getRK ("tail"); ?>))
+rk.temp <- (qf (p = <? echo ($p); ?>, df1 = <? getRK ("df1"); ?>, df2 = <? getRK ("df2"); ?>, <? getRK ("tail"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/gamma_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/gamma_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/gamma_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (pgamma (q = <? echo ($q); ?>, shape = <? getRK ("shape"); ?>, rate = <? getRK ("rate"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (pgamma (q = <? echo ($q); ?>, shape = <? getRK ("shape"); ?>, rate = <? getRK ("rate"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/gamma_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/gamma_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/gamma_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qgamma (p = <? echo ($p); ?>, shape = <? getRK ("shape"); ?>, rate = <? getRK ("rate"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (qgamma (p = <? echo ($p); ?>, shape = <? getRK ("shape"); ?>, rate = <? getRK ("rate"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/geom_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/geom_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/geom_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (pgeom (q = <? echo ($q); ?>, prob = <? getRK ("prob"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (pgeom (q = <? echo ($q); ?>, prob = <? getRK ("prob"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/geom_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/geom_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/geom_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qgeom (p = <? echo ($p); ?>, prob = <? getRK ("prob"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (qgeom (p = <? echo ($p); ?>, prob = <? getRK ("prob"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/gumbel_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/gumbel_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/gumbel_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (pweibull (q = exp(<? echo ($q); ?>), shape = <? getRK ("shape"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (pweibull (q = exp(<? echo ($q); ?>), shape = <? getRK ("shape"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/gumbel_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/gumbel_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/gumbel_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = log(qweibull (p = <? echo ($p); ?>, shape = <? getRK ("shape"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- log(qweibull (p = <? echo ($p); ?>, shape = <? getRK ("shape"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/hypergeometric_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/hypergeometric_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/hypergeometric_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (phyper (q = <? echo ($q); ?>, m = <? getRK ("m"); ?>, n = <? getRK ("n"); ?>, k = <? getRK ("k"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (phyper (q = <? echo ($q); ?>, m = <? getRK ("m"); ?>, n = <? getRK ("n"); ?>, k = <? getRK ("k"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/hypergeometric_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/hypergeometric_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/hypergeometric_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qhyper (p = <? echo ($p); ?>, m = <? getRK ("m"); ?>, n = <? getRK ("n"); ?>, k = <? getRK ("k"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (qhyper (p = <? echo ($p); ?>, m = <? getRK ("m"); ?>, n = <? getRK ("n"); ?>, k = <? getRK ("k"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/log_normal_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/log_normal_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/log_normal_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (plnorm (q = <? echo ($q); ?>, meanlog = <? getRK ("meanlog"); ?>, sdlog = <? getRK ("sdlog"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
+rk.temp <- (plnorm (q = <? echo ($q); ?>, meanlog = <? getRK ("meanlog"); ?>, sdlog = <? getRK ("sdlog"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/log_normal_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/log_normal_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/log_normal_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qlnorm (p = <? echo ($p); ?>, meanlog = <? getRK ("meanlog"); ?>, sdlog = <? getRK ("sdlog"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
+rk.temp <- (qlnorm (p = <? echo ($p); ?>, meanlog = <? getRK ("meanlog"); ?>, sdlog = <? getRK ("sdlog"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/logistic_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/logistic_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/logistic_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (plogis (q = <? echo ($q); ?>, location = <? getRK ("location"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (plogis (q = <? echo ($q); ?>, location = <? getRK ("location"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/logistic_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/logistic_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/logistic_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qlogis (p = <? echo ($p); ?>, location = <? getRK ("location"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (qlogis (p = <? echo ($p); ?>, location = <? getRK ("location"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/negative_binomial_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/negative_binomial_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/negative_binomial_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -7,7 +7,7 @@
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (pnbinom (q = <? echo ($q); ?>, size = <? getRK ("size"); ?>, prob = <? getRK ("prob"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (pnbinom (q = <? echo ($q); ?>, size = <? getRK ("size"); ?>, prob = <? getRK ("prob"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/negative_binomial_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/negative_binomial_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/negative_binomial_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qnbinom (p = <? echo ($p); ?>, size = <? getRK ("size"); ?>, prob = <? getRK ("prob"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (qnbinom (p = <? echo ($p); ?>, size = <? getRK ("size"); ?>, prob = <? getRK ("prob"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/normal_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/normal_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/normal_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (pnorm (q = <? echo ($q); ?>, mean = <? getRK ("mean"); ?>, sd = <? getRK ("sd"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
+rk.temp <- (pnorm (q = <? echo ($q); ?>, mean = <? getRK ("mean"); ?>, sd = <? getRK ("sd"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/normal_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/normal_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/normal_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qnorm (p = <? echo ($p); ?>, mean = <? getRK ("mean"); ?>, sd = <? getRK ("sd"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
+rk.temp <- (qnorm (p = <? echo ($p); ?>, mean = <? getRK ("mean"); ?>, sd = <? getRK ("sd"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/poisson_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/poisson_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/poisson_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (ppois (q = <? echo ($q); ?>, lambda = <? getRK ("lambda"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (ppois (q = <? echo ($q); ?>, lambda = <? getRK ("lambda"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/poisson_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/poisson_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/poisson_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qpois (p = <? echo ($p); ?>, lambda = <? getRK ("lambda"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (qpois (p = <? echo ($p); ?>, lambda = <? getRK ("lambda"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/t_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/t_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/t_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (pt (q = <? echo ($q); ?>, df = <? getRK ("df"); ?>, <? getRK ("tail"); ?>))
+rk.temp <- (pt (q = <? echo ($q); ?>, df = <? getRK ("df"); ?>, <? getRK ("tail"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/t_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/t_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/t_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qt (p = <? echo ($p); ?>, df = <? getRK ("df"); ?>, <? getRK ("tail"); ?>))
+rk.temp <- (qt (p = <? echo ($p); ?>, df = <? getRK ("df"); ?>, <? getRK ("tail"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/tukey_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/tukey_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/tukey_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (ptukey (q = <? echo ($q); ?>, nmeans = <? getRK ("nmeans"); ?>, df = <? getRK ("df"); ?>, nranges = <? getRK ("nranges"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
+rk.temp <- (ptukey (q = <? echo ($q); ?>, nmeans = <? getRK ("nmeans"); ?>, df = <? getRK ("df"); ?>, nranges = <? getRK ("nranges"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/tukey_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/tukey_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/tukey_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qtukey (p = <? echo ($p); ?>, nmeans = <? getRK ("nmeans"); ?>, df = <? getRK ("df"); ?>, nranges = <? getRK ("nranges"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
+rk.temp <- (qtukey (p = <? echo ($p); ?>, nmeans = <? getRK ("nmeans"); ?>, df = <? getRK ("df"); ?>, nranges = <? getRK ("nranges"); ?>, <? getRK ("tail"); ?>, <? getRK ("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/uniform_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/uniform_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/uniform_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (punif (q = <? echo ($q); ?>, min = <? getRK ("min"); ?>, max = <? getRK ("max"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (punif (q = <? echo ($q); ?>, min = <? getRK ("min"); ?>, max = <? getRK ("max"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/uniform_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/uniform_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/uniform_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qunif (p = <? echo ($p); ?>, min = <? getRK ("min"); ?>, max = <? getRK ("max"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (qunif (p = <? echo ($p); ?>, min = <? getRK ("min"); ?>, max = <? getRK ("max"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/weibull_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/weibull_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/weibull_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (pweibull (q = <? echo ($q); ?>, shape = <? getRK ("shape"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (pweibull (q = <? echo ($q); ?>, shape = <? getRK ("shape"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/weibull_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/weibull_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/weibull_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qweibull (p = <? echo ($p); ?>, shape = <? getRK ("shape"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (qweibull (p = <? echo ($p); ?>, shape = <? getRK ("shape"); ?>, scale = <? getRK ("scale"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/wilcoxon_probabilities.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/wilcoxon_probabilities.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/wilcoxon_probabilities.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $q;
$q = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("q")) . ")";
?>
-rk.temp = (pwilcox (q = <? echo ($q); ?>, m = <? getRK ("m"); ?>, n = <? getRK ("n"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (pwilcox (q = <? echo ($q); ?>, m = <? getRK ("m"); ?>, n = <? getRK ("n"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
Modified: trunk/rkward/rkward/plugins/distributions/wilcoxon_quantiles.php
===================================================================
--- trunk/rkward/rkward/plugins/distributions/wilcoxon_quantiles.php 2006-12-04 22:49:49 UTC (rev 989)
+++ trunk/rkward/rkward/plugins/distributions/wilcoxon_quantiles.php 2006-12-05 11:22:57 UTC (rev 990)
@@ -6,7 +6,7 @@
global $p;
$p = "c (" . preg_replace ("/[, ]+/", ", ", getRK_val ("p")) . ")";
?>
-rk.temp = (qwilcox (p = <? echo ($p); ?>, m = <? getRK ("m"); ?>, n = <? getRK ("n"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
+rk.temp <- (qwilcox (p = <? echo ($p); ?>, m = <? getRK ("m"); ?>, n = <? getRK ("n"); ?>, <? getRK ("tail"); ?>, <? getRK("logp"); ?>))
<?
}
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
More information about the rkward-tracker
mailing list