Nothing
plot.YPmodel.estimate <-
function(x=c(), Internal=c(), ...)
########################################################
#fun.plot1(bt,ru,fb,Data)
#######################################################
# version 0.1
# Sep 20, 2015
# Junlong Sun
# no-return
#######################################################
# Sep 20, 2015 - v0.1 Create
#necessary Data, InternalParameters
#######################################################
{
plot.YPmodel.survivor(x, Internal)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.