structure(list(x = c(0, 0.04, 0.08, 0.12, 0.16, 0.2, 0.24, 0.28, 
0.32, 0.36, 0.4, 0.44, 0.48, 0.52, 0.56, 0.6, 0.64, 0.68, 0.72, 
0.76, 0.8, 0.84, 0.88, 0.92, 0.96, 1, 1.04, 1.08, 1.12, 1.16, 
1.2, 1.24, 1.28, 1.32, 1.36, 1.4, 1.44, 1.48, 1.52, 1.56, 1.6, 
1.64, 1.68, 1.72, 1.76, 1.8, 1.84, 1.88, 1.92, 1.96, 2), y = c(202.917340888245, 
207.2799432675, 211.738421032108, 216.415760025716, 221.369872189741, 
226.656294866790, 232.410968884116, 238.602872032764, 245.255570420933, 
252.403293345899, 260.020255261165, 268.209881998356, 277.001179956848, 
286.441301789095, 296.469042529503, 306.714116456528, 316.700570651988, 
326.016882404351, 334.549851440646, 342.251683730573, 349.096765508131, 
355.079090652377, 360.391922501712, 365.011633320237, 369.057636576623, 
372.696605689811, 375.919745263709, 378.786695970343, 381.366092408346, 
383.708986650525, 385.776061522755, 387.611554241476, 389.239563860412, 
390.612496977155, 391.778080823902, 392.868661313658, 393.92221154572, 
394.985692817457, 395.975784898795, 396.696717663263, 397.330068882619, 
397.873543502428, 398.326167478271, 398.899790376826, 399.566709462798, 
400.176523676822, 400.626757802801, 400.80805677863, 400.730403254788, 
400.652865792704, 400.660909612043), w = c(1, 1, 1, 1, 1, 1, 
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 
1, 1, 1), yin = c(202.9833, 207.3323, 211.6553, 216.3922, 221.5364, 
226.3882, 232.5383, 238.6157, 245.1267, 252.6265, 259.8586, 268.2868, 
276.9392, 286.1057, 296.4303, 306.7104, 317.0559, 325.9918, 334.6014, 
342.1738, 349.4495, 354.6748, 360.6457, 365.0675, 368.801, 372.8488, 
375.8862, 378.8112, 381.219, 383.8515, 385.7426, 387.509, 389.3488, 
390.7231, 391.6213, 392.9452, 393.814, 394.7333, 396.5701, 396.3315, 
397.3401, 398.2047, 397.984, 398.8198, 399.6553, 400.1255, 400.7106, 
401.0817, 400.6228, 400.3656, 400.8059), data = structure(list(
    x = c(0, 0.04, 0.08, 0.12, 0.16, 0.2, 0.24, 0.28, 0.32, 0.36, 
    0.4, 0.44, 0.48, 0.52, 0.56, 0.6, 0.64, 0.68, 0.72, 0.76, 
    0.8, 0.84, 0.88, 0.92, 0.96, 1, 1.04, 1.08, 1.12, 1.16, 1.2, 
    1.24, 1.28, 1.32, 1.36, 1.4, 1.44, 1.48, 1.52, 1.56, 1.6, 
    1.64, 1.68, 1.72, 1.76, 1.8, 1.84, 1.88, 1.92, 1.96, 2), 
    y = c(202.9833, 207.3323, 211.6553, 216.3922, 221.5364, 226.3882, 
    232.5383, 238.6157, 245.1267, 252.6265, 259.8586, 268.2868, 
    276.9392, 286.1057, 296.4303, 306.7104, 317.0559, 325.9918, 
    334.6014, 342.1738, 349.4495, 354.6748, 360.6457, 365.0675, 
    368.801, 372.8488, 375.8862, 378.8112, 381.219, 383.8515, 
    385.7426, 387.509, 389.3488, 390.7231, 391.6213, 392.9452, 
    393.814, 394.7333, 396.5701, 396.3315, 397.3401, 398.2047, 
    397.984, 398.8198, 399.6553, 400.1255, 400.7106, 401.0817, 
    400.6228, 400.3656, 400.8059), w = c(1, 1, 1, 1, 1, 1, 1, 
    1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 
    1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 
    1, 1, 1, 1, 1, 1)), .Names = c("x", "y", "w")), lev = c(0.777920301316139, 
0.395691136778753, 0.39223298614959, 0.382855531271895, 0.376504835666996, 
0.375394057713106, 0.375366655330408, 0.375352218069442, 0.375337952480690, 
0.375334872313086, 0.375334736287521, 0.375334717795864, 0.375334687004571, 
0.375334678806880, 0.375334678262584, 0.375334678246146, 0.375334678182611, 
0.375334678161596, 0.37533467815968, 0.375334678159676, 0.375334678159552, 
0.3753346781595, 0.375334678159494, 0.375334678159494, 0.375334678159494, 
0.375334678159493, 0.375334678159494, 0.375334678159494, 0.375334678159493, 
0.375334678159499, 0.375334678159550, 0.375334678159643, 0.375334678159565, 
0.375334678161555, 0.375334678181974, 0.375334678233302, 0.375334678207937, 
0.375334678765026, 0.375334686872796, 0.375334713095773, 0.375334711531155, 
0.375334842000881, 0.375337936938489, 0.375350573590796, 0.375355876669598, 
0.375375326022555, 0.376507086083215, 0.382314463609672, 0.387663750550536, 
0.369658785339071, 0.771875298900801), cv.crit = 0.108260272245090, 
    pen.crit = 2.03968157250102, crit = 3.00000018829753, df = 20.0021396949861, 
    spar = 0.419383258661227, lambda = 6.23040190371687e-06, 
    iparms = structure(c(3L, 0L, 13L), .Names = c("icrit", "ispar", 
    "iter")), fit = structure(list(knot = c(0, 0, 0, 0, 0.02, 
    0.04, 0.06, 0.08, 0.1, 0.12, 0.14, 0.16, 0.18, 0.2, 0.22, 
    0.24, 0.26, 0.28, 0.3, 0.32, 0.34, 0.36, 0.38, 0.4, 0.42, 
    0.44, 0.46, 0.48, 0.5, 0.52, 0.54, 0.56, 0.58, 0.6, 0.62, 
    0.64, 0.66, 0.68, 0.7, 0.72, 0.74, 0.76, 0.78, 0.8, 0.82, 
    0.84, 0.86, 0.88, 0.9, 0.92, 0.94, 0.96, 1, 1, 1, 1), nk = 52, 
        min = 0, range = 2, coef = c(202.917340888245, 204.366845916705, 
        207.265832392255, 211.698977357049, 216.368784372196, 
        221.320445308460, 226.568667532409, 232.342653762644, 
        238.526530721715, 245.16845554708, 252.333069615566, 
        259.919026066050, 268.112357687225, 276.890835175184, 
        286.331381353123, 296.431450146893, 306.757073236327, 
        316.824955646967, 326.146528087735, 334.690226428198, 
        342.391674843348, 349.253176581848, 355.176211878047, 
        360.516519820227, 365.109243851314, 369.116304695935, 
        372.771356824684, 375.977902144197, 378.835506180782, 
        381.400248954734, 383.760052450355, 385.813461146999, 
        387.64247209818, 389.285975909137, 390.651007427748, 
        391.7849762428, 392.877572544467, 393.916701461284, 394.988890884717, 
        396.041891904589, 396.698250889697, 397.345410516201, 
        397.900520341215, 398.29376913351, 398.881407994373, 
        399.579341149950, 400.201484182618, 400.673864180512, 
        400.863605912143, 400.672201819546, 400.621802458927, 
        400.660909612043)), .Names = c("knot", "nk", "min", "range", 
    "coef"), class = "smooth.spline.fit"), call = smooth.spline(x = theta.grid, 
        y = EU, df = 20)), .Names = c("x", "y", "w", "yin", "data", 
"lev", "cv.crit", "pen.crit", "crit", "df", "spar", "lambda", 
"iparms", "fit", "call"), class = "smooth.spline")
