Description Usage Arguments Value Note for S-plus Author(s) References See Also Examples
nordpred.prediction
uses a nordpred.estimate.object
to calculate prediction of cancer incidence and mortality
1 2 | nordpred.prediction(nordpred.estimate.object, startuseage, recent,
cuttrend = c(0, 0.25, 0.5, 0.75, 0.75))
|
nordpred.estimate.object |
A |
startuseage |
Youngest age group which uses regression model as basis for predicted rates |
recent |
Project average trend or use the slope for the last 10 years?
(If |
cuttrend |
Cut trend in predictions? (a vector of proportionsof drift to be cut in each projection period) |
an object of class nordpred
(see nordpred.object
).
Powerlink is made via a special modification in S-PLUS. This works fine for the point estimates, but the variance estimates found via the glm-objects are wrong. For variance estimates, we would rather recommend using R.
Harald Fekjaer and Bjorn Moller (Cancer Registry of Norway)
A website for nordpred is available at: http://www.kreftregisteret.no/software/nordpred/
Background for the methods can be found in: Moller B., Fekjaer H., Hakulinen T., Sigvaldason H, Storm H. H., Talback M. and Haldorsen T 'Prediction of cancer incidence in the Nordic countries: Empirical comparison of different approaches' Statistics in Medicine 2003; 22:2751-2766
An application of the function, using all the default settings, can be found in: Moller B, Fekjaer H, Hakulinen T, Tryggvadottir L, Storm HH, Talback M, Haldorsen T. Prediction of cancer incidence in the Nordic countries up to the year 2020. Eur J Cancer Prev Suppl 2002; 11: S1-S96
Other nordpred: is.nordpred.estimate
,
nordpred.estimate
;
is.nordpred
, nordpred
;
nordpred.estimate.object
;
nordpred.getpred
;
nordpred.object
;
plot.nordpred
;
print.nordpred.estimate
;
print.nordpred
;
summary.nordpred
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | # data (Colon cancer for Norwegian males)
indata
# Create dataset with observed and predicted population
inpop <- cbind(inpop1, inpop2)
# Fit model using powerlink (default):
est <- nordpred.estimate(cases = indata, pyr = inpop, noperiod = 4, startestage = 5)
# Fit model using poisson link:
est2 <- nordpred.estimate(indata, inpop, 4, 5, linkfunc = 'poisson')
# Use estimat object to make predictions:
res <- nordpred.prediction(est,startuseage = 6, cuttrend = c(0, .25, .5, .75, .75), recent = TRUE)
res2 <- nordpred.prediction(est2, startuseage = 6,
cuttrend = c(0, .25, .5, .75, .75), recent = TRUE)
# Get results:
print(res)
nordpred.getpred(res)
summary(res, printpred = FALSE)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.