1 | confin.mean_df_eq.data(x_len, x_mean, x_var, y_len, y_mean, y_var, y)
|
x_len |
|
x_mean |
|
x_var |
|
y_len |
|
y_mean |
|
y_var |
|
y |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | ##---- Should be DIRECTLY executable !! ----
##-- ==> Define data, use random,
##-- or do help(data=index) for the standard data sets.
## The function is currently defined as
function (x_len, x_mean, x_var, y_len, y_mean, y_var, y)
{
x_dof = x_len - 1
y_dof = y_len - 1
alpha = 1 - y
tval = qt(alpha, x_dof + y_dof)
mgd_var = (x_dof * x_var + y_dof * y_var)/(x_dof + y_dof)
lower = (x_mean - y_mean) - tval * (x_dof + y_dof) * sqrt(mgd_var *
((1/x_len) + (1/y_len)))
upper = (x_mean - y_mean) + tval * (x_dof + y_dof) * sqrt(mgd_var *
((1/x_len) + (1/y_len)))
c(x_dof, y_dof, alpha, tval, mgd_var)
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.