>
|
mean := "Nag_MeanInclude":
n := 20:
sigsq := 0.06894097715299176:
tss := 5.063404019999999:
nmod := 32:
nterms := Vector([0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 5], datatype=integer[kernelopts('wordsize')/8]):
rss := Vector([5.063404019999999, 5.021872981610836, 2.504400256872566, 2.033792558702955, 1.556302662527149, 1.536980701902808, 2.43809316825141, 1.746202334318434, 1.592101895299378, 1.496267665868361, 1.470697443158826, 1.458986090473173, 1.439684706601502, 1.438803545844649, 1.328730482955034, 1.085046933797314, 1.425685328311828, 1.390030525118499, 1.389409281541255, 1.320363732523133, 1.276355711100745, 1.25824207806747, 1.217854935490384, 1.064355044934491, 1.063352079567482, 0.9871461021926979, 1.219929564008994, 1.156529834681246, 1.038833684537899, 0.987127249579224, 0.9652626827261775, 0.9651736801418845], datatype=float[8]):
rsq := Vector(32, datatype=float[8]):
cp := Vector(32, datatype=float[8]):
NAG:-g02ecc(mean, n, sigsq, tss, nterms, rss, rsq, cp, 'nmod' = nmod):
|