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:18:03 -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/t1220260685wjdp49wxd0xxb38.htm/, Retrieved Sun, 20 Oct 2024 19:16:49 +0000 |
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=14305, Retrieved Sun, 20 Oct 2024 19:16:49 +0000 | |
QR Codes: | |
|
|
Original text written by user: | no comments |
IsPrivate? | No (this computation is public) |
User-defined keywords | key1,key2 |
Estimated Impact | 310 |
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:18:03] [d41d8cd98f00b204e9800998ecf8427e] [Current] | |
Feedback Forum | |
Post a new message | |
Dataset | |
Dataseries X: | |
0.769812008574325 -0.296430815376859 -0.570965305627558 -2.29226735241445 -1.60042433547903 -1.74654610154483 -1.41897496620881 0.95821675740362 0.232351205575535 -0.414354847742930 2.31615441297124 0.449759993793403 0.429177077432713 -1.17462619296977 -0.213201341312549 0.286729067091821 -2.10321797565043 0.144285603320953 0.608910752556689 -1.02129989505492 0.375109673328318 0.409520840052678 0.753189103465582 1.08271899846961 0.448491443015075 -0.786438156555126 0.0906798392984972 -1.07140748542034 -0.0459095347346147 0.760081280792096 -1.52699806774505 -0.083824572435783 0.625155406449445 -0.0137396248148388 0.468964284395676 0.414381311400838 0.107996150380848 -1.23703641992627 -0.537991008208784 -1.31006435948531 -0.686983305019921 0.448306593808746 -1.24234358314785 0.64922250789691 -1.04239779873552 1.63359264060946 0.719749553898745 -0.696399157352184 1.66219234148636 0.0652814573278981 0.916963640221519 -0.997956088580195 0.00999892698928423 1.52608072428585 -0.495769574807583 -0.880251631103344 0.344651557204304 -0.61506602765635 0.444028759333621 0.753305000012337 0.551674560337927 -0.611820490910944 0.410471129660158 -2.78135935438236 -0.577025790729098 -1.52000263166185 -0.990661382713306 1.24285273197634 -0.809725967268682 1.74490127098923 -1.74092158748549 -1.64429375180233 0.646425939162753 -0.0260262455222112 0.113660386435801 -0.868731165168722 -2.11664962686172 -0.90355926910195 -0.62626371329072 -2.14093233613594 -0.0201277149196421 -0.30850063002946 -1.82297324655464 1.02998633759889 -2.33216366308349 0.307616211471887 0.639235325972092 0.597880685842531 1.90452387435692 0.636642187716227 1.16446530905147 -0.949538895160241 -0.00667416379878451 -0.545462225836775 0.42034566059019 0.212406106622606 0.466575340644522 1.07234957475204 1.22366236765938 -1.33485033920062 | |
Tables (Output of Computation) | |
> title = 'data(cars) & smoothing splines' > { + 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 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 ; | |
Parameters (R input): | |
R code (body of R function): | |
{ |