R/plot.YPmodel.estimate.R

In YPmodel: The Short-Term and Long-Term Hazard Ratio Model for Survival Data

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)

}