{"appearance":{"background":"white","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(flipDimensionReduction)\n</pre>\n<pre class='debug-source'>&gt;scree.plot.2 &lt;- ScreePlot(principal.components.analysis)\n</pre>\r\n<div class=\"debug-summarystatistics\">\r\n<table>\r\n<tr><th>Total time:</th><td>6.42s</td></tr>\r\n<tr><th>Time on R server:</th><td title=\"rApacheServe 6.25s (pre 0.00s, post 0.00s) httpget_code() setup for eval 0.03s session$eval 6.21s (pre 0.00s, post 2.25s) unexplained 0.01s apparmor forking (pre 0.03s, post 1.89s)\">6.25s</td></tr>\r\n<tr><th>Time evaluating code:</th><td>2.05s</td></tr>\r\n<tr><th>Bytes sent:</th><td>49,222</td></tr>\r\n<tr><th>Bytes received:</th><td>5,445</td></tr>\r\n</table>\r\n</div>","htmlwidgets":"<div id=\"htmlwidget_container\">\n <div id=\"11442f7a299e\" style=\"width:100%;height:400px;\" class=\"plotly html-widget\"></div>\n</div>\n<script type=\"application/json\" data-for=\"11442f7a299e\">{\"x\":{\"visdat\":{\"114439887eca\":[\"function () \",\"plotlyVisDat\"]},\"cur_data\":\"114439887eca\",\"attrs\":{\"114439887eca\":{\"x\":{},\"y\":{},\"mode\":\"lines+markers\",\"alpha\":1,\"sizes\":[10,100],\"type\":\"scatter\"}},\"layout\":{\"margin\":{\"b\":40,\"l\":60,\"t\":25,\"r\":10},\"title\":\"Scree Plot\",\"yaxis\":{\"domain\":[0,1],\"range\":[0,3.21110325539599],\"title\":\"Eigenvalue\"},\"xaxis\":{\"domain\":[0,1],\"title\":\"Component Number\"},\"hovermode\":\"closest\",\"showlegend\":false},\"source\":\"A\",\"config\":{\"modeBarButtonsToAdd\":[{\"name\":\"Collaborate\",\"icon\":{\"width\":1000,\"ascent\":500,\"descent\":-50,\"path\":\"M487 375c7-10 9-23 5-36l-79-259c-3-12-11-23-22-31-11-8-22-12-35-12l-263 0c-15 0-29 5-43 15-13 10-23 23-28 37-5 13-5 25-1 37 0 0 0 3 1 7 1 5 1 8 1 11 0 2 0 4-1 6 0 3-1 5-1 6 1 2 2 4 3 6 1 2 2 4 4 6 2 3 4 5 5 7 5 7 9 16 13 26 4 10 7 19 9 26 0 2 0 5 0 9-1 4-1 6 0 8 0 2 2 5 4 8 3 3 5 5 5 7 4 6 8 15 12 26 4 11 7 19 7 26 1 1 0 4 0 9-1 4-1 7 0 8 1 2 3 5 6 8 4 4 6 6 6 7 4 5 8 13 13 24 4 11 7 20 7 28 1 1 0 4 0 7-1 3-1 6-1 7 0 2 1 4 3 6 1 1 3 4 5 6 2 3 3 5 5 6 1 2 3 5 4 9 2 3 3 7 5 10 1 3 2 6 4 10 2 4 4 7 6 9 2 3 4 5 7 7 3 2 7 3 11 3 3 0 8 0 13-1l0-1c7 2 12 2 14 2l218 0c14 0 25-5 32-16 8-10 10-23 6-37l-79-259c-7-22-13-37-20-43-7-7-19-10-37-10l-248 0c-5 0-9-2-11-5-2-3-2-7 0-12 4-13 18-20 41-20l264 0c5 0 10 2 16 5 5 3 8 6 10 11l85 282c2 5 2 10 2 17 7-3 13-7 17-13z m-304 0c-1-3-1-5 0-7 1-1 3-2 6-2l174 0c2 0 4 1 7 2 2 2 4 4 5 7l6 18c0 3 0 5-1 7-1 1-3 2-6 2l-173 0c-3 0-5-1-8-2-2-2-4-4-4-7z m-24-73c-1-3-1-5 0-7 2-2 3-2 6-2l174 0c2 0 5 0 7 2 3 2 4 4 5 7l6 18c1 2 0 5-1 6-1 2-3 3-5 3l-174 0c-3 0-5-1-7-3-3-1-4-4-5-6z\"},\"click\":\"function(gd) { \\n // is this being viewed in RStudio?\\n if (location.search == '?viewer_pane=1') {\\n alert('To learn about plotly for collaboration, visit:\\\\n https://cpsievert.github.io/plotly_book/plot-ly-for-collaboration.html');\\n } else {\\n window.open('https://cpsievert.github.io/plotly_book/plot-ly-for-collaboration.html', '_blank');\\n }\\n }\"}],\"cloud\":false,\"displayModeBar\":false},\"data\":[{\"x\":[1,2,3,4,5,6],\"y\":[2.21110325539599,1.42900115601244,0.850941971402167,0.63572433950347,0.496774988096314,0.37645428958962],\"mode\":\"lines+markers\",\"type\":\"scatter\",\"line\":{\"fillcolor\":\"rgba(31,119,180,1)\",\"color\":\"rgba(31,119,180,1)\"},\"xaxis\":\"x\",\"yaxis\":\"y\",\"frame\":null}],\"highlight\":{\"on\":\"plotly_click\",\"persistent\":false,\"dynamic\":false,\"selectize\":false,\"opacityDim\":0.2,\"selected\":{\"opacity\":1}},\"base_url\":\"https://plot.ly\"},\"evals\":[\"config.modeBarButtonsToAdd.0.click\"],\"jsHooks\":{\"render\":[{\"code\":\"function(el, x) { var ctConfig = crosstalk.var('plotlyCrosstalkOpts').set({\\\"on\\\":\\\"plotly_click\\\",\\\"persistent\\\":false,\\\"dynamic\\\":false,\\\"selectize\\\":false,\\\"opacityDim\\\":0.2,\\\"selected\\\":{\\\"opacity\\\":1}}); }\",\"data\":null}]}}</script>\n<script type=\"application/htmlwidget-sizing\" data-for=\"11442f7a299e\">{\"viewer\":{\"width\":\"100%\",\"height\":400,\"padding\":15,\"fill\":true},\"browser\":{\"width\":\"100%\",\"height\":400,\"padding\":40,\"fill\":true}}</script>","htmlwidget-head":"{\"stylesheets\":[\"https://rserverhtmlwidgetasset.azureedge.net/plotly-htmlwidgets-ef6d87e1454c6f9f50a1a5a3e8b42646.css\",\"https://rserverhtmlwidgetasset.azureedge.net/crosstalk-b25ccf47e9892cf2654d5ded8a45d9b7.css\"],\"javascript\":[\"https://rserverhtmlwidgetasset.azureedge.net/htmlwidgets-d2ab507a7e7d3e3d7c2178bda9d4c762.js\",\"https://rserverhtmlwidgetasset.azureedge.net/plotly-latest.min-1cf882c1f4d96a3ae7ac4a9a4483cdb3.js\",\"https://rserverhtmlwidgetasset.azureedge.net/plotly-0ee55de650f6373808867c623e4933c5.js\",\"https://rserverhtmlwidgetasset.azureedge.net/jquery.min-91a24ea414e8c447d647cecab86866c2.js\",\"https://rserverhtmlwidgetasset.azureedge.net/crosstalk.min-b1936a0f8f135773de79f3a54af76d20.js\",\"https://rserverhtmlwidgetasset.azureedge.net/typedarray.min-830ee97537deb99885d830da3312e14d.js\"],\"attachments\":[]}","message":"","warning":"","visible":"yes"},"secondsTaken":6.4237679000000005,"updated":"2017-05-18T22:23:09.5347095Z","lastUpdatedMessage":null,"executedCode":"library(flipDimensionReduction)\nscree.plot.2 <- ScreePlot(principal.components.analysis)","lastSavedCode":"library(flipDimensionReduction)\nscree.plot.2 <- ScreePlot(principal.components.analysis)","highlightedCodeSpans":[{"start":58,"length":29,"index":2}],"tableTransformations":"<TabularTransformer>\r\n <TabularTransform type=\"Truncation\" truncationHeaderType=\"Column\" />\r\n <TabularTransform />\r\n</TabularTransformer>","tabularFilteringOptions":null,"hasGuiControls":true,"guiControls":{"Code":"form.setHeading(\"Scree Plot\");\nform.dropBox({name: \"inputItem\", label: \"Principal Components Analysis or Factor Analysis:\", types: [\"R\"] });","JSError":null,"JSErrorDetails":null,"ControlDefinitionErrors":null,"InputValidationErrors":null,"Controls":[{"ItemGuid":"00000000-0000-0000-0000-000000000000","ControlName":null,"Type":"Heading","Label":null,"Value":null,"Allowed":null,"EmptyListMessage":null,"Multi":false,"Prompt":null,"ErrorMessage":null,"Invalid":null,"Required":false,"AllowedTypes":null,"MinInputs":0,"MaxInputs":0,"Height":0,"Duplicates":false,"Values":null,"CheckAlign":null,"Text":"Scree Plot","Increment":0.0,"Min":0.0,"Max":0.0,"Vertical":null},{"ItemGuid":"00000000-0000-0000-0000-000000000000","ControlName":"inputItem","Type":"DropBox","Label":"Principal Components Analysis or Factor Analysis:","Value":"fe8dfb99-3da2-462b-9206-59827bdea5cc","Allowed":["fe8dfb99-3da2-462b-9206-59827bdea5cc","4c6595b2-9527-4af1-9a1f-0dc42054f69d","b5aa110b-dc63-4693-99ad-3a3698c2ea0f"],"EmptyListMessage":null,"Multi":false,"Prompt":"Select an input which is of type Ritem.","ErrorMessage":"Principal Components Analysis or Factor Analysis:: Principal Components Analysis or Factor Analysis: accepts only one input which is of type Ritem.","Invalid":null,"Required":true,"AllowedTypes":["R"],"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":null,"Type":null,"Label":null,"Value":null,"Allowed":null,"EmptyListMessage":null,"Multi":false,"Prompt":null,"ErrorMessage":null,"Invalid":null,"Required":false,"AllowedTypes":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","size":{"Width":508,"Height":314},"vSplit":0.25,"hSplit":0.45,"updateWarnings":true,"updateMode":"Manual","warnSlow":false,"outputSize":{"Width":508,"Height":314},"Options":{"debugconsole":false,"codeposition":"OutputOnly","size":{"width":508,"height":314},"splitH":0.45,"splitV":0.25,"update warnings":true,"updating":"Manual","warn slow":false}}