X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fcorrelations.q;h=12d3645919d2eecf8600f0d25ce9358aae2a8f88;hb=04fb909bd65eee66428d131ff34a6e1fde42e243;hp=10818591e521ee31b1f63c57101218db9679668c;hpb=a19b858e0ac3c69e4a28c0ca6d8674427268a863;p=pspp diff --git a/src/language/stats/correlations.q b/src/language/stats/correlations.q index 10818591e5..12d3645919 100644 --- a/src/language/stats/correlations.q +++ b/src/language/stats/correlations.q @@ -18,17 +18,21 @@ 02110-1301, USA. */ #include + #include -#include -#include + #include #include +#include +#include #include +#include #include -#include -/* (headers) */ +#include +#include +#include -#include +/* (headers) */ struct cor_set { @@ -55,8 +59,8 @@ cmd_correlations (void) /* (specification) "CORRELATIONS" (cor_): *variables=custom; - +missing=miss:!pairwise/listwise, - inc:include/exclude; + missing=miss:!pairwise/listwise, + inc:include/exclude; +print=tail:!twotail/onetail, sig:!sig/nosig; +format=fmt:!matrix/serial; @@ -74,7 +78,7 @@ internal_cmd_correlations (void) cor_list = cor_last = NULL; matrix_file = NULL; - if (!parse_correlations (&cmd)) + if (!parse_correlations (&cmd, NULL)) return CMD_FAILURE; free_correlations (&cmd); @@ -82,7 +86,7 @@ internal_cmd_correlations (void) } static int -cor_custom_variables (struct cmd_correlations *cmd UNUSED) +cor_custom_variables (struct cmd_correlations *cmd UNUSED, void *aux UNUSED) { struct variable **v1, **v2; size_t nv1, nv2; @@ -129,7 +133,7 @@ cor_custom_variables (struct cmd_correlations *cmd UNUSED) } static int -cor_custom_matrix (struct cmd_correlations *cmd UNUSED) +cor_custom_matrix (struct cmd_correlations *cmd UNUSED, void *aux UNUSED) { if (!lex_force_match ('(')) return 0;