{"size":{"Width":471,"Height":191},"appearance":{"background":null,"padding":14,"font":{"family":"Courier New","size":10.0,"bold":false,"italic":false,"underline":false,"strikeout":false,"color":"rgb(0,72,168)"},"border":{"on":true,"size":0.0,"style":"solid","color":"#666"},"text":{"wrap":false,"hAlign":"left","vAlign":"top"}},"outputType":"WIDGET","widgetState":null,"outputs":{"console":"<pre class='debug-source'>&gt;library(flipTransformations)\n</pre>\n<pre class='debug-source'>&gt;library(flipFormat)\n</pre>\n<pre class='debug-source'>&gt;data &lt;- ProcessQVariables(data.frame(Q32, Q2))\n</pre>\n<pre class='debug-source'>&gt;if (is.factor(OutcomeVariable))\n data[, 1] &lt;- AsNumeric(data[, 1], binary=FALSE)\n</pre>\n<pre class='debug-warning'>Data has been automatically converted to numeric. Values are assigned in the order of the categories: 1, 2, 3... To use alternative numeric values you should instead transform the data prior including it in this analysis (e.g., by changing its structure). Q32. Income (Q32)</pre>\n<pre class='debug-source'>&gt;data[, 2] &lt;- CreatingBinaryVariableIfNecessary(data, names(data)[2])\n</pre>\n<pre class='debug-source'>&gt;if (!is.null(QCalibratedWeight))\n data &lt;- AdjustDataToReflectWeights(data, QCalibratedWeight)\n</pre>\n<pre class='debug-source'>&gt;test.output &lt;- wilcox.test(Q32 ~ Q2, data=data, conf.level=.95, subset = QFilter,\n mu = as.numeric(formMu), \n alternative = switch(hypothesis, &quot;Two-sided&quot; = &quot;two.sided&quot;, &quot;Difference &lt; 0&quot; = &quot;less&quot;, &quot;Difference &gt; 0&quot; = &quot;greater&quot;), \n exact = switch(type, &quot;Default&quot; = NULL, &quot;Exact&quot; = TRUE, &quot;Normal approximation&quot; = FALSE, &quot;Normal approximation with continuity correction&quot; = FALSE), \n correct = switch(type, &quot;Default&quot; = TRUE, &quot;Exact&quot; = FALSE, &quot;Normal approximation&quot; = FALSE, &quot;Normal approximation with continuity correction&quot; = TRUE), \n paired = FALSE)\n</pre>\n<pre class='debug-source'>&gt;two.sample.wilcoxon &lt;- if (formOutput == &quot;Summary&quot;) {\n decimal.places &lt;- if (formDecimals) 8 else NULL\n SignificanceTest(test.output, &quot;Two-Sample Wilcoxon Rank Sum Test&quot;,\n list(OutcomeVariable, GroupVariable),\n filter = QFilter, weight = QCalibratedWeight,\n p.value.method = type,\n show.labels = !formNames, decimal.places = decimal.places,\n resample = TRUE)\n} else\n test.output\n</pre>\r\n<div class=\"debug-summarystatistics\"><table>\r\n<tr><th>Started:</th><td class=utc-time>2018-08-29T03:49:42.697Z</td></tr>\r\n<tr><th>Finished:</th><td class=utc-time>2018-08-29T03:49:42.697Z</td></tr>\r\n<tr><th>Total time:</th><td>0.42s</td></tr>\r\n<tr><th>Time executing code:</th><td title=\"0.03s\">0.39s</td></tr>\r\n<tr><th>Other overhead on R server:</th><td>0.18s</td></tr>\r\n<tr><th>Time spent transferring data:</th><td>0.03s</td></tr>\r\n<tr><th>Data sent to R server:</th><td>4.2KB</td></tr>\r\n<tr><th>Data received from R server:</th><td>8.1KB</td></tr>\r\n</table></div>","warning":"Data has been automatically converted to numeric. Values are assigned in the order of the categories: 1, 2, 3... To use alternative numeric values you should instead transform the data prior including it in this analysis (e.g., by changing its structure). Q32. Income (Q32)","htmlwidgets":"<div id=\"htmlwidget_container\">\n <div id=\"htmlwidget-5e023ab5b6028f8f948a\" class=\"formattable_widget html-widget\" style=\"width:100%;height:500px;\" width=\"100%\" height=\"500\"></div>\n</div>\n<script type=\"application/json\" data-for=\"htmlwidget-5e023ab5b6028f8f948a\">{\"x\":{\"html\":\"<table class = \\\"table table-condensed\\\"style = \\\"margin:0; border-bottom: 2px solid; border-top: 2px solid; font-size:90%;\\\">\\n<h3 class=\\\".h3\\\" style=\\\"color:#3E7DCC; text-align:left; margin-top:0px; margin-bottom:0\\\">Two-Sample Wilcoxon Rank Sum Test<\\/h3>\\n<h4 class=\\\".h4\\\" style=\\\"color:#3E7DCC; text-align:left; margin-top:5px; margin-bottom:0\\\">Not significant: p-value = 0.91<\\/h4>\\n<h5 class=\\\".h5\\\" style=\\\"color:#888888; text-align:left; margin-top:5px; margin-bottom:0\\\">Q32. Income<\\/h5>\\n<h5 class=\\\".h5\\\" style=\\\"color:#888888; text-align:left; margin-top:5px; margin-bottom:0\\\">by Q2. Gender <\\/h5>\\n<caption style=\\\"caption-side:bottom;font-style:italic; font-size:90%;\\\">n = 327 cases used in estimation; null hypothesis: true location shift is equal to 0;<\\/caption>\\n <thead>\\n <tr>\\n <th style=\\\"text-align:right;\\\"> W <\\/th>\\n <th style=\\\"text-align:right;\\\"> p-value <\\/th>\\n <\\/tr>\\n <\\/thead>\\n<tbody>\\n <tr>\\n <td style=\\\"text-align:right;\\\"> 13,263.00 <\\/td>\\n <td style=\\\"text-align:right;\\\"> 0.91 <\\/td>\\n <\\/tr>\\n<\\/tbody>\\n<\\/table>\"},\"evals\":[],\"jsHooks\":[]}</script>\n<script type=\"application/htmlwidget-sizing\" data-for=\"htmlwidget-5e023ab5b6028f8f948a\">{\"viewer\":{\"width\":\"100%\",\"height\":350,\"padding\":15,\"fill\":false},\"browser\":{\"width\":\"100%\",\"height\":500,\"padding\":0,\"fill\":false}}</script>","htmlwidget-head":"{\"stylesheets\":[\"https://rserverhtmlwidgetasset.azureedge.net/bootstrap.min-63e52244789ab8f6e3a78818886e7085.css\"],\"javascript\":[\"https://rserverhtmlwidgetasset.azureedge.net/jquery.min-91a24ea414e8c447d647cecab86866c2.js\",\"https://rserverhtmlwidgetasset.azureedge.net/bootstrap.min-326d184c3c13feede563e4adcb5ff2a0.js\",\"https://rserverhtmlwidgetasset.azureedge.net/html5shiv.min-e70767555a95c48c08833356d362ccef.js\",\"https://rserverhtmlwidgetasset.azureedge.net/respond.min-4255ee1a060b15cb2432d0a497a6d510.js\",\"https://rserverhtmlwidgetasset.azureedge.net/htmlwidgets-917a66c6e5036eb1bfd1fb672a82635a.js\",\"https://rserverhtmlwidgetasset.azureedge.net/formattable_widget-d2927ec9dec4a568bd3f4a62041c0ddb.js\"],\"attachments\":[],\"widget-cannot-re-render\":true}","message":""},"secondsTaken":0.4244133,"updated":"2018-08-29T03:49:42.6975876Z","lastUpdatedMessage":null,"executedCode":"library(flipTransformations)\nlibrary(flipFormat)\ndata <- ProcessQVariables(data.frame(Q32, Q2))\nif (is.factor(OutcomeVariable))\n data[, 1] <- AsNumeric(data[, 1], binary=FALSE)\ndata[, 2] <- CreatingBinaryVariableIfNecessary(data, names(data)[2])\nif (!is.null(QCalibratedWeight))\n data <- AdjustDataToReflectWeights(data, QCalibratedWeight)\ntest.output <- wilcox.test(Q32 ~ Q2, data=data, conf.level=.95, subset = QFilter,\n mu = as.numeric(formMu), \n alternative = switch(hypothesis, \"Two-sided\" = \"two.sided\", \"Difference < 0\" = \"less\", \"Difference > 0\" = \"greater\"), \n exact = switch(type, \"Default\" = NULL, \"Exact\" = TRUE, \"Normal approximation\" = FALSE, \"Normal approximation with continuity correction\" = FALSE), \n correct = switch(type, \"Default\" = TRUE, \"Exact\" = FALSE, \"Normal approximation\" = FALSE, \"Normal approximation with continuity correction\" = TRUE), \n paired = FALSE)\ntwo.sample.wilcoxon <- if (formOutput == \"Summary\") {\n decimal.places <- if (formDecimals) 8 else NULL\n SignificanceTest(test.output, \"Two-Sample Wilcoxon Rank Sum Test\",\n list(OutcomeVariable, GroupVariable),\n filter = QFilter, weight = QCalibratedWeight,\n p.value.method = type,\n show.labels = !formNames, decimal.places = decimal.places,\n resample = TRUE)\n} else\n test.output","lastSavedCode":"library(flipTransformations)\nlibrary(flipFormat)\ndata <- ProcessQVariables(data.frame(Q32, Q2))\nif (is.factor(OutcomeVariable))\n data[, 1] <- AsNumeric(data[, 1], binary=FALSE)\ndata[, 2] <- CreatingBinaryVariableIfNecessary(data, names(data)[2])\nif (!is.null(QCalibratedWeight))\n data <- AdjustDataToReflectWeights(data, QCalibratedWeight)\ntest.output <- wilcox.test(Q32 ~ Q2, data=data, conf.level=.95, subset = QFilter,\n mu = as.numeric(formMu), \n alternative = switch(hypothesis, \"Two-sided\" = \"two.sided\", \"Difference < 0\" = \"less\", \"Difference > 0\" = \"greater\"), \n exact = switch(type, \"Default\" = NULL, \"Exact\" = TRUE, \"Normal approximation\" = FALSE, \"Normal approximation with continuity correction\" = FALSE), \n correct = switch(type, \"Default\" = TRUE, \"Exact\" = FALSE, \"Normal approximation\" = FALSE, \"Normal approximation with continuity correction\" = TRUE), \n paired = FALSE)\ntwo.sample.wilcoxon <- if (formOutput == \"Summary\") {\n decimal.places <- if (formDecimals) 8 else NULL\n SignificanceTest(test.output, \"Two-Sample Wilcoxon Rank Sum Test\",\n list(OutcomeVariable, GroupVariable),\n filter = QFilter, weight = QCalibratedWeight,\n p.value.method = type,\n show.labels = !formNames, decimal.places = decimal.places,\n resample = TRUE)\n} else\n test.output","highlightedCodeSpans":[{"start":86,"length":3,"index":0},{"start":91,"length":2,"index":0},{"start":110,"length":15,"index":4},{"start":262,"length":17,"index":6},{"start":327,"length":17,"index":6},{"start":373,"length":3,"index":0},{"start":379,"length":2,"index":0},{"start":419,"length":7,"index":6},{"start":448,"length":6,"index":4},{"start":483,"length":10,"index":4},{"start":600,"length":4,"index":4},{"start":754,"length":4,"index":4},{"start":934,"length":10,"index":4},{"start":987,"length":12,"index":4},{"start":1110,"length":15,"index":4},{"start":1127,"length":13,"index":4},{"start":1173,"length":7,"index":6},{"start":1191,"length":17,"index":6},{"start":1248,"length":4,"index":4},{"start":1290,"length":9,"index":4}],"tableTransformations":"<TabularTransformer>\r\n <TabularTransform type=\"Truncation\" truncationHeaderType=\"Column\" />\r\n <TabularTransform />\r\n</TabularTransformer>","tabularFilteringOptions":null,"hasGuiControls":true,"guiControls":{"Code":"form.setHeading(\"Two-sample Wilcoxon Test\");\nform.dropBox({label: \"Outcome\", \n types:[\"Variable: Numeric, Date, Money, Categorical, OrderedCategorical\"], \n name: \"OutcomeVariable\", prompt: \"Select the Variable to analyse\"});\nform.dropBox({label: \"Group\",\n types:[\"Variable: Numeric, Date, Money, Categorical, OrderedCategorical\"], \n name: \"GroupVariable\", prompt: \"Select the Variable specifying the group that each observation comes from\"});\nform.textBox({label: \"Null hypothesis: mu =\", default_value: \"0\", name: \"formMu\", type: \"number\",\n prompt: \"Difference between the median of the two samples, assumed under the null hypothesis\"});\nform.comboBox({label: \"Alternative hypothesis: \", alternatives: [\"Two-sided\", \"Difference < 0\", \"Difference > 0\"],\n default_value: \"Two-sided\", name: \"hypothesis\", prompt: \"Run a one-sided or two-sided test\"});\nform.comboBox({label: \"Type of test\", alternatives: [\"Default\", \"Exact\", \"Normal approximation\", \"Normal approximation with continuity correction\"],\n name: \"type\", default_value: \"Default\", prompt: \"Method by which the p-value is computed\"});\nvar formOutput = form.comboBox({label: \"Output\", alternatives: [\"Summary\", \"R\"], name: \"formOutput\",\n default_value: \"Summary\", prompt: \"Select the output type\"});\nif (formOutput.getValue() == \"Summary\")\n{\n form.checkBox({label: \"Variable names\", name: \"formNames\", default_value: false,\n prompt: \"Display names instead of labels\"});\n form.checkBox({label: \"More decimal places\", name: \"formDecimals\", default_value: false,\n prompt: \"Display numeric values with eight decimal places\"});\n}","JSError":null,"JSErrorDetails":null,"ControlDefinitionErrors":null,"InputValidationErrors":null,"Controls":[{"ItemGuid":"00000000-0000-0000-0000-000000000000","ControlName":null,"Page":null,"Group":null,"Type":"Heading","Label":null,"LabelEmphasised":false,"Value":null,"Allowed":null,"Multi":false,"Prompt":null,"ErrorMessage":null,"Invalid":null,"Required":false,"AllowedTypes":null,"OwnerRItemGuid":null,"MinInputs":0,"MaxInputs":0,"Height":0,"Duplicates":false,"Values":null,"CheckAlign":null,"Text":"Two-sample Wilcoxon Test","Increment":0.0,"Min":0.0,"Max":0.0,"Vertical":null},{"ItemGuid":"00000000-0000-0000-0000-000000000000","ControlName":"OutcomeVariable","Page":null,"Group":null,"Type":"DropBox","Label":"Outcome","LabelEmphasised":false,"Value":"9026d09a-b4d0-4569-828d-c551ff8d7e14","Allowed":null,"Multi":false,"Prompt":"Select the Variable to analyse","ErrorMessage":"Outcome: Outcome accepts only one input which is of type Variable (Numeric, Date, Money, Categorical or Orderedcategorical).","Invalid":null,"Required":true,"AllowedTypes":["Variable: Numeric, Date, Money, Categorical, OrderedCategorical"],"OwnerRItemGuid":"4cdf5a82-8b41-4028-9b6c-d8f791e5d83b","MinInputs":1,"MaxInputs":1,"Height":1,"Duplicates":false,"Values":null,"CheckAlign":null,"Text":null,"Increment":0.0,"Min":0.0,"Max":0.0,"Vertical":null},{"ItemGuid":"00000000-0000-0000-0000-000000000000","ControlName":"GroupVariable","Page":null,"Group":null,"Type":"DropBox","Label":"Group","LabelEmphasised":false,"Value":"79e8a702-536b-4cdd-870e-20acef64d6af","Allowed":null,"Multi":false,"Prompt":"Select the Variable specifying the group that each observation comes from","ErrorMessage":"Group: Group accepts only one input which is of type Variable (Numeric, Date, Money, Categorical or Orderedcategorical).","Invalid":null,"Required":true,"AllowedTypes":["Variable: Numeric, Date, Money, Categorical, OrderedCategorical"],"OwnerRItemGuid":"4cdf5a82-8b41-4028-9b6c-d8f791e5d83b","MinInputs":1,"MaxInputs":1,"Height":1,"Duplicates":false,"Values":null,"CheckAlign":null,"Text":null,"Increment":0.0,"Min":0.0,"Max":0.0,"Vertical":null},{"ItemGuid":"00000000-0000-0000-0000-000000000000","ControlName":"formMu","Page":null,"Group":null,"Type":"TextBox","Label":"Null hypothesis: mu =","LabelEmphasised":false,"Value":"0","Allowed":null,"Multi":false,"Prompt":"Difference between the median of the two samples, assumed under the null hypothesis","ErrorMessage":null,"Invalid":null,"Required":false,"AllowedTypes":null,"OwnerRItemGuid":null,"MinInputs":0,"MaxInputs":0,"Height":0,"Duplicates":false,"Values":null,"CheckAlign":null,"Text":null,"Increment":0.0,"Min":0.0,"Max":0.0,"Vertical":null},{"ItemGuid":"00000000-0000-0000-0000-000000000000","ControlName":"hypothesis","Page":null,"Group":null,"Type":"ComboBox","Label":"Alternative hypothesis: ","LabelEmphasised":false,"Value":"Two-sided","Allowed":null,"Multi":false,"Prompt":"Run a one-sided or two-sided test","ErrorMessage":null,"Invalid":null,"Required":true,"AllowedTypes":null,"OwnerRItemGuid":null,"MinInputs":0,"MaxInputs":0,"Height":0,"Duplicates":false,"Values":["Two-sided","Difference < 0","Difference > 0"],"CheckAlign":null,"Text":null,"Increment":0.0,"Min":0.0,"Max":0.0,"Vertical":null},{"ItemGuid":"00000000-0000-0000-0000-000000000000","ControlName":"type","Page":null,"Group":null,"Type":"ComboBox","Label":"Type of test","LabelEmphasised":false,"Value":"Default","Allowed":null,"Multi":false,"Prompt":"Method by which the p-value is computed","ErrorMessage":null,"Invalid":null,"Required":true,"AllowedTypes":null,"OwnerRItemGuid":null,"MinInputs":0,"MaxInputs":0,"Height":0,"Duplicates":false,"Values":["Default","Exact","Normal approximation","Normal approximation with continuity correction"],"CheckAlign":null,"Text":null,"Increment":0.0,"Min":0.0,"Max":0.0,"Vertical":null},{"ItemGuid":"00000000-0000-0000-0000-000000000000","ControlName":"formOutput","Page":null,"Group":null,"Type":"ComboBox","Label":"Output","LabelEmphasised":false,"Value":"Summary","Allowed":null,"Multi":false,"Prompt":"Select the output type","ErrorMessage":null,"Invalid":null,"Required":true,"AllowedTypes":null,"OwnerRItemGuid":null,"MinInputs":0,"MaxInputs":0,"Height":0,"Duplicates":false,"Values":["Summary","R"],"CheckAlign":null,"Text":null,"Increment":0.0,"Min":0.0,"Max":0.0,"Vertical":null},{"ItemGuid":"00000000-0000-0000-0000-000000000000","ControlName":"formNames","Page":null,"Group":null,"Type":"CheckBox","Label":"Variable names","LabelEmphasised":false,"Value":false,"Allowed":null,"Multi":false,"Prompt":"Display names instead of labels","ErrorMessage":null,"Invalid":null,"Required":false,"AllowedTypes":null,"OwnerRItemGuid":null,"MinInputs":0,"MaxInputs":0,"Height":0,"Duplicates":false,"Values":null,"CheckAlign":"left","Text":null,"Increment":0.0,"Min":0.0,"Max":0.0,"Vertical":null},{"ItemGuid":"00000000-0000-0000-0000-000000000000","ControlName":"formDecimals","Page":null,"Group":null,"Type":"CheckBox","Label":"More decimal places","LabelEmphasised":false,"Value":false,"Allowed":null,"Multi":false,"Prompt":"Display numeric values with eight decimal places","ErrorMessage":null,"Invalid":null,"Required":false,"AllowedTypes":null,"OwnerRItemGuid":null,"MinInputs":0,"MaxInputs":0,"Height":0,"Duplicates":false,"Values":null,"CheckAlign":"left","Text":null,"Increment":0.0,"Min":0.0,"Max":0.0,"Vertical":null},{"ItemGuid":"00000000-0000-0000-0000-000000000000","ControlName":null,"Page":null,"Group":null,"Type":null,"Label":null,"LabelEmphasised":false,"Value":null,"Allowed":null,"Multi":false,"Prompt":null,"ErrorMessage":null,"Invalid":null,"Required":false,"AllowedTypes":null,"OwnerRItemGuid":null,"MinInputs":0,"MaxInputs":0,"Height":0,"Duplicates":false,"Values":null,"CheckAlign":null,"Text":null,"Increment":0.0,"Min":0.0,"Max":0.0,"Vertical":true}]},"calculating":"Idle","showDebug":false,"layout":"OutputOnly","vSplit":0.25,"hSplit":0.45,"updateWarnings":true,"updateMode":"Manual","warnSlow":false,"Options":{"debugconsole":false,"codeposition":"OutputOnly","splitH":0.45,"splitV":0.25,"update warnings":true,"updating":"Manual","warn slow":false}}