{"size":{"Width":644,"Height":355},"appearance":{"background":null,"padding":14,"font":{"family":"Courier New","size":10.0,"bold":false,"italic":false,"underline":false,"strikeout":false,"color":"rgba(0, 72, 168, 1)"},"border":{"on":true,"size":0.0,"style":"solid","color":"#666"},"text":{"wrap":true,"hAlign":"Left","vAlign":"Top","resize":"ResizeShapeToFitText"}},"outputType":"TEXT","widgetStateDict":{},"wikiPageTitle":null,"hasReferences":{"propertyAppearanceFont":false,"propertyAppearanceParagraph":false,"propertyAppearanceWrap":false,"propertyAppearanceBorder":false,"propertyAppearanceBackgroundColor":false,"propertyFilters":false,"propertyWeight":false},"hasChartData":false,"useFastExecutor":true,"outputs":{"text":"Family: binomial \nLink function: logit \n\nFormula:\nchurn ~ SeniorCitizen + s(Tenure) + InternetService + s(MonthlyCharges)\n\nEstimated degrees of freedom:\n8.20 1.97 total = 14.16 \n\nUBRE score: -0.1424217 \n"},"secondsTaken":2.6819309,"updated":"2018-09-19T03:17:24.1995469Z","LastUpdatedMessage":null,"executedCode":"library(httr)\nGET(\"https://docs.displayr.com/images/f/f0/Churn.xlsx\", \n write_disk(tf <- tempfile(fileext = \".xlsx\")))\ndf <- readxl::read_excel(tf, 1L)\nlibrary(mgcv)\nmy.gam <- gam(churn ~ SeniorCitizen + s(Tenure) + InternetService + s(MonthlyCharges), \n data = df, \n family = binomial(logit))\n","lastSavedCode":null,"isStandardRItem":false,"highlightedCodeSpans":[],"tableTransformations":"<TabularTransformer>\r\n <TabularTransform type=\"Truncation\" truncationHeaderType=\"Column\" />\r\n <TabularTransform />\r\n</TabularTransformer>","tabularFilteringOptions":null,"hasGuiControls":false,"calculating":"Idle","showDebug":false,"layout":"Top","vSplit":0.39585352112676053,"hSplit":0.45,"Options":{"debugconsole":false,"codeposition":"Top","splitH":0.45,"splitV":0.39585352112676053}}