of Irreproducible Research!
Description of Statistical Computation | |
---|---|
Author's title | |
Author | *The author of this computation has been verified* |
R Software Module | Rscript (source code is shown below) |
Title produced by software | R console |
Date of computation | Mon, 01 Sep 2008 03:20:24 -0600 |
Cite this page as follows | Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2008/Sep/01/t1220260825jsoxbdw764wjdfu.htm/, Retrieved Sun, 18 Aug 2024 02:29:42 +0000 |
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=14306, Retrieved Sun, 18 Aug 2024 02:29:42 +0000 | |
QR Codes: | |
|
|
Original text written by user: | no comments |
IsPrivate? | No (this computation is public) |
User-defined keywords | key1,key2 |
Estimated Impact | 303 |
Tree of Dependent Computations | |
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data) | |
- [R console] [my R test (plot 1...] [2008-09-01 09:20:24] [d41d8cd98f00b204e9800998ecf8427e] [Current] | |
Feedback Forum | |
Post a new message | |
Dataset | |
Dataseries X: | |
-1.50356705729124 0.507510706793902 -0.67394855825985 -0.0826960154269678 -0.146524362448813 0.632101969971764 0.737042592400944 -0.676829804259727 -0.100194043546593 0.150723433612993 0.755506700747719 0.0851082842655211 -0.443701304563204 0.412131801946146 1.02814979526386 0.965037053103135 -0.859868202279079 -0.965356941598173 0.105407579713154 0.260417565026123 -1.28348286848513 1.72669125512588 0.663234387450732 -0.180960663176317 -0.537147696599018 -1.66322864005866 -0.284407392295713 0.379610262451735 -1.81489864650011 0.138562925902487 1.11015251028106 -0.157742645977232 0.449809611605366 -0.232778730258889 -0.164096484229526 -1.74815923343626 1.04816788785818 -2.94510991971846 -2.00817422625650 -0.787682237987884 0.108612419516412 -0.104400858092734 -1.37287051724349 0.226893027431059 -0.842646790326904 0.513428961091227 0.195003096172567 0.93053707292884 0.148924123984243 0.27712282926655 1.69100837561122 -0.872617125624594 -0.717309411782577 0.49629976598919 -1.03623567130602 -1.08836056006975 -0.443349149519861 0.117218811115490 1.00069977958200 1.97360266249217 -1.08085808112898 1.07455632687906 0.396270593118794 0.282367023934156 0.212773533292306 -0.425048669838062 -2.21947359020641 -0.231987846278417 -0.343193791917147 0.642355268765414 0.841332537392 0.746463374455384 0.51879399538194 0.82892386949306 -0.206990846216180 1.25116518371023 -1.62920400266537 -0.71012677836016 -0.428791938818935 0.331988395132146 1.75912360921667 -0.112687596050873 -0.432928720448203 -0.415530451634218 0.268966389010268 0.472364345116046 0.212520462376322 2.87547989735923 -0.083712653320412 0.763810032322704 0.362546871568487 1.50787687819057 0.051102637910422 -3.00994872729811 0.463496469137284 0.0673572487499338 -0.543659932957087 -0.355132881704747 1.78004150977902 -0.312954054024261 | |
Tables (Output of Computation) | |
> title = 'data(cars) & smoothing splines' > color_of_line = 'blue' > { + library(pspline) + data(cars) + attach(cars) + plot(speed, dist, main = title) + cars.spl <- sm.spline(speed, dist) + pr .... [TRUNCATED] The following object(s) are masked from cars ( position 3 ) : dist speed The following object(s) are masked from cars ( position 4 ) : dist speed The following object(s) are masked from cars ( position 5 ) : dist speed The following object(s) are masked from cars ( position 6 ) : dist speed The following object(s) are masked from cars ( position 7 ) : dist speed The following object(s) are masked from cars ( position 8 ) : dist speed The following object(s) are masked from cars ( position 9 ) : dist speed The following object(s) are masked from cars ( position 10 ) : dist speed The following object(s) are masked from cars ( position 11 ) : dist speed The following object(s) are masked from cars ( position 12 ) : dist speed The following object(s) are masked from cars ( position 13 ) : dist speed The following object(s) are masked from cars ( position 14 ) : dist speed The following object(s) are masked from cars ( position 15 ) : dist speed The following object(s) are masked from cars ( position 16 ) : dist speed The following object(s) are masked from cars ( position 17 ) : dist speed The following object(s) are masked from cars ( position 18 ) : dist speed The following object(s) are masked from cars ( position 19 ) : dist speed The following object(s) are masked from cars ( position 20 ) : dist speed The following object(s) are masked from cars ( position 21 ) : dist speed The following object(s) are masked from cars ( position 22 ) : dist speed The following object(s) are masked from cars ( position 23 ) : dist speed The following object(s) are masked from cars ( position 24 ) : dist speed The following object(s) are masked from cars ( position 25 ) : dist speed The following object(s) are masked from cars ( position 26 ) : dist speed The following object(s) are masked from cars ( position 27 ) : dist speed The following object(s) are masked from cars ( position 28 ) : dist speed The following object(s) are masked from cars ( position 29 ) : dist speed The following object(s) are masked from cars ( position 30 ) : dist speed The following object(s) are masked from cars ( position 31 ) : dist speed Call: smooth.Pspline(x = ux, y = tmp[, 1], w = tmp[, 2], method = method) Smoothing Parameter (Spar): 366.8429 Equivalent Degrees of Freedom (Df): 2.428851 GCV Criterion: 29.54554 CV Criterion: 39.18787 | |
Figures (Output of Computation) | |
Input Parameters & R Code | |
Parameters (Session): | |
par1 = data(cars)& smoothing splines ; par2 = blue ; | |
Parameters (R input): | |
R code (body of R function): | |
{ |