Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software ModuleRscript (source code is shown below)
Title produced by softwareR console
Date of computationTue, 26 May 2009 13:22:12 -0600
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2009/May/26/t1243365733xcvga5apxlxyxmf.htm/, Retrieved Sat, 04 May 2024 19:57:44 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=40391, Retrieved Sat, 04 May 2024 19:57:44 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact107
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [R console] [test] [2009-05-26 19:22:12] [b768c7adc2675864c15627b87ad9ef22] [Current]
Feedback Forum

Post a new message
Dataseries X:
-0.813921233270563
1.94191906229130
0.54343696747835
-0.775832439886248
0.301348357858687
2.16505461839861
1.31679617637477
1.58111526066496
0.547330523427117
-0.618478470360295
0.169290647744284
-0.200595588926853
0.0958206062823098
0.385953131674573
1.14839964665789
-1.48060114003114
0.447512398899104
0.0328202535105223
0.962477310803217
0.310317580142361
2.61224438882058
0.194199223759767
-0.354298339810559
-1.33777835286796
0.261243154448815
-0.94990641487860
-0.878494005228243
0.285864937908229
-0.69563457554301
0.402385153114533
-1.18910566390622
0.402191102983682
-1.13684845577095
0.708880313443565
-0.519773098550318
0.60542375288939
0.678493671422564
-0.945405982443614
-0.399076253529337
-2.41145092223181
-1.01447806083284
-0.425380119355502
-0.602203661834898
0.658078757089287
0.241995734148165
-0.69306427034098
-1.29965953549967
-0.62448439655065
0.58402521972919
-0.456699367405061
0.396960598975785
-0.0264870643525518
-0.457877490499174
-0.0911268372038996
0.448455026741262
0.677064209038864
-0.121754539108028
-0.272037112176008
-0.113392039042442
0.102923781322406
-1.01457400191002
-1.11083343611338
0.76674037469375
1.11487688721903
1.77482060901904
-2.13716156206216
-0.782367015608446
0.167022599692597
1.22385362218929
0.850738702293491
-2.36545802655625
0.175447099460792
0.642096120461939
1.06066448650175
0.68609359838932
-0.695960074093149
1.43239286674488
0.351222596239520
-0.522975529323781
-1.10290374200696
1.96526494999405
0.843685805676034
0.178555150328313
-0.370767302334554
-0.749462446140657
1.07312860895939
0.519241926090206
1.05495791773778
0.115867234088446
0.89070594147149
-0.476748206246666
0.313170584545355
0.573119588117124
0.509725025659815
0.409845119155581
-1.08854566702228
-0.208846373015419
0.762755281814258
0.94850190092498
-0.192107497837023
0.586323488543272
0.70558326027957
-1.02367160943078
-1.58587427864223
-0.104790776024965
-2.28626750435585
0.506619920942532
-0.731214007559481
0.929381022594675
0.382857589036400
1.19885055896509
-0.567712066339479
-1.17290598611823
0.664332479339586
-0.914998878965877
0.728899552170265
2.11628273441497
1.38149682728500
-0.483766820721481
0.837778205381383
-1.37049396325427
1.13198953144750
-1.43992273376322
0.317280930658159
-0.557747790546446
-0.731644728387145
2.13775263318597
-1.10181102114187
0.370424323677637
-0.656681292103301
0.638918166621417
0.226836583007449
1.73026570565318
-0.0751699153870608
0.678295756424185
-0.232092856540785
-0.561810355817453
0.285445744855975
2.09489395148798
0.0446040904776171
0.540646124141182
-2.78625581285826
1.01269770779191
-0.525862539086135
0.372424508790269
-1.45750682835534
-0.633698499766814
-0.409598507066397
0.756545826567409
1.33444388311062
Dataseries Y:
0.559341780725113
-0.18520074054351
-0.660139929044103
-1.86425804052255
-0.0574341839136865
-1.44773328639238
-1.44693431421854
0.424945861350139
-0.383073701556126
-1.06872273927395
0.918352406515074
-0.0282683209279455
-0.632338944140264
-0.808011548433975
1.14543664016556
0.95971017895784
1.99706981750774
0.477283071268505
0.752795113695804
0.359813924819319
0.318557607222699
-0.103922152284499
0.473076916153917
0.0878737518893613
-0.188101942317219
0.561067345509419
-0.496544279870003
0.89148591269953
1.60922266362412
1.00495289856431
-0.766282004806443
0.425870396019467
0.141282481791031
-0.23791954826681
-0.634126539226542
0.271207179432126
0.0458181139995257
0.842394864540452
-0.623243579680279
-0.623645655896015
0.487376538066822
-0.075375483039105
-0.0326749289587093
-0.178645291055127
-0.847690362813719
-1.59705369451180
-0.457948137624373
-0.812954193747216
-0.92738888508908
0.0427315932747953
1.18051638780604
-0.572377568192253
-1.79525122442130
-0.718788368574113
0.0229724026434697
-0.311322458954071
-2.31554473093794
-0.794577519328003
0.00254822392966968
-1.02875008857314
0.766462706640003
-0.277047667874641
0.0400312408522883
-0.456374853018096
-0.916816585879925
1.60399522086885
0.291730927426135
1.31199508878202
0.4096039299633
-0.909192002727164
-1.48944308704135
1.26133377199750
2.12805704422449
-0.561503548076774
-1.10963445968948
0.908245012061258
1.16489505337587
0.160889091332043
0.535134625941404
-0.771531947407394
1.11054969326812
0.690600458010576
-0.0972295822284911
-1.9815659832784
1.18460924810446
1.2092163634846
0.387211826064774
0.526926376794228
0.346878571422178
-0.493537698080035
-0.882988348076241
-0.49565817807557
-0.0243693116990891
-1.47616782243748
0.103499037273734
1.02964715750230
-1.54036503392703
1.61916021999140
0.491914635303907
-0.305498641709311
0.0953910193964712
1.67882572037172
0.748843694529969
1.25005386185698
0.47359320048427
-1.21651284613699
0.232275604721188
-2.00794611371655
-0.410074011002401
-1.92231576233923
0.785778754940959
0.566536063249714
0.510340330903243
0.780289751198356
0.82572869657332
-0.558982558599067
-0.105900382431141
-0.823516691093451
-0.680207399831856
-0.708472544254408
-0.709347480600924
0.81205764187097
-0.601655792712593
-1.21079635940445
0.00809840014551832
-0.721449846899254
-0.510720707155332
-1.42536190005695
0.228221701775181
1.1526885962809
0.669488876404289
-0.574844489546791
0.596040533281944
1.23074075658689
0.630265231000052
1.45003129165485
0.767094799872084
-0.0129340809422751
0.801228849969245
-2.11873622244256
1.54573020607334
0.395828770699528
0.142856840002136
1.78716969748650
-0.835486461169577
0.627011736095384
-1.13456426330808
-1.10717749984187
2.47446804919216
-0.67347374788792
> title = 'smoothing splines'

> color_of_default = 'blue'

> {
+     plot(RCx, RCy, main = title)
+     cars.spl <- sm.spline(RCx, RCy)
+     print(cars.spl)
+     lines(cars.spl, col = color_of_default)
+     .... [TRUNCATED] 
Call:
smooth.Pspline(x = ux, y = tmp[, 1], w = tmp[, 2], method = method)

Smoothing Parameter (Spar): 1036510272 
Equivalent Degrees of Freedom (Df): 1.999999 
GCV Criterion: 0.9329424 
CV  Criterion: 0.9321986 
Parameters (Session):
par1 = smoothingsplines ; par2 = blue ;
Parameters (R input):
R code (body of R function):
{

plot(x, y, main = par1)
cars.spl <- sm.spline(x, y)
print(cars.spl)
lines(cars.spl, col = par2)
lines(sm.spline(x, y, df = 10), lty = 2, col = "red")

}